Dans ma feuille "Adresses à rectifier" j'ai des informations sur les
colonnes A à AA.
Je voudrais insérer dans la colonne AB (en commencant par la cellule AB2) la
formule : DECALER(Ville;EQUIV(H2;CP;0)-1;0;NB.SI(CP;H2))"
J'ai enregistré la macro suivante :
Range("AB2").Select
With Selection.Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:="=DECALER(Ville;EQUIV(H2;CP;0)-1;0;NB.SI(CP;H2))"
.IgnoreBlank = True
.InCellDropdown = True
.InputTitle = ""
.ErrorTitle = ""
.InputMessage = ""
.ErrorMessage = ""
.ShowInput = True
.ShowError = True
End With
End Sub
MAis il me donne un message d'erreur :
" erreur d'execution 1004"
erreur définie par l'application ou par l'objet"
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
isabelle
bonjour Nadyajah,
si tu pouvais me dire l'adresse des plages Ville et CP, et quel est la valeur de H2, il serait plus facile pour moi de tester la formule. a+ isabelle
Bonjour,
Dans ma feuille "Adresses à rectifier" j'ai des informations sur les colonnes A à AA. Je voudrais insérer dans la colonne AB (en commencant par la cellule AB2) la formule : DECALER(Ville;EQUIV(H2;CP;0)-1;0;NB.SI(CP;H2))" J'ai enregistré la macro suivante : Range("AB2").Select With Selection.Validation .Delete .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _ xlBetween, Formula1:="ÞCALER(Ville;EQUIV(H2;CP;0)-1;0;NB.SI(CP;H2))" .IgnoreBlank = True .InCellDropdown = True .InputTitle = "" .ErrorTitle = "" .InputMessage = "" .ErrorMessage = "" .ShowInput = True .ShowError = True End With End Sub
MAis il me donne un message d'erreur : " erreur d'execution 1004" erreur définie par l'application ou par l'objet"
????
Nadyajah
bonjour Nadyajah,
si tu pouvais me dire l'adresse des plages Ville et CP, et quel est la valeur de H2,
il serait plus facile pour moi de tester la formule.
a+
isabelle
Bonjour,
Dans ma feuille "Adresses à rectifier" j'ai des informations sur les
colonnes A à AA.
Je voudrais insérer dans la colonne AB (en commencant par la cellule AB2) la
formule : DECALER(Ville;EQUIV(H2;CP;0)-1;0;NB.SI(CP;H2))"
J'ai enregistré la macro suivante :
Range("AB2").Select
With Selection.Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:="ÞCALER(Ville;EQUIV(H2;CP;0)-1;0;NB.SI(CP;H2))"
.IgnoreBlank = True
.InCellDropdown = True
.InputTitle = ""
.ErrorTitle = ""
.InputMessage = ""
.ErrorMessage = ""
.ShowInput = True
.ShowError = True
End With
End Sub
MAis il me donne un message d'erreur :
" erreur d'execution 1004"
erreur définie par l'application ou par l'objet"
si tu pouvais me dire l'adresse des plages Ville et CP, et quel est la valeur de H2, il serait plus facile pour moi de tester la formule. a+ isabelle
Bonjour,
Dans ma feuille "Adresses à rectifier" j'ai des informations sur les colonnes A à AA. Je voudrais insérer dans la colonne AB (en commencant par la cellule AB2) la formule : DECALER(Ville;EQUIV(H2;CP;0)-1;0;NB.SI(CP;H2))" J'ai enregistré la macro suivante : Range("AB2").Select With Selection.Validation .Delete .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _ xlBetween, Formula1:="ÞCALER(Ville;EQUIV(H2;CP;0)-1;0;NB.SI(CP;H2))" .IgnoreBlank = True .InCellDropdown = True .InputTitle = "" .ErrorTitle = "" .InputMessage = "" .ErrorMessage = "" .ShowInput = True .ShowError = True End With End Sub
MAis il me donne un message d'erreur : " erreur d'execution 1004" erreur définie par l'application ou par l'objet"
