Bonjour,
Voici mon probleme.
Je veux nomer une plage sur une feuil2 et l'affecter au cellules de la feuil1 (colonne A).
J'ai donc utilisé l'editeur de macro pour voir le code. Mais quand je lance la macro j'ai une erreur (alors que la manipulation fontionne "a la main")
Voici mon code si quelqu'un a une idée
L'erreur se situe au niveau du ".Add Type"
merci de votre aide
Voici mon probleme.
Je veux nomer une plage sur une feuil2 et l'affecter au cellules de la feuil1 (colonne A).
J'ai donc utilisé l'editeur de macro pour voir le code. Mais quand je lance la macro j'ai une erreur (alors que la manipulation fontionne "a la main")
Voici mon code si quelqu'un a une idée
Sub Macro1()
'
' Macro1 Macro
'
'
Sheets("Feuil2").Select
Range("A3:A8").Select
ActiveWorkbook.Names.Add Name:="Clients", RefersToR1C1:="=Feuil2!R3C1:R8C1"
ActiveWorkbook.Names("Clients").Comment = ""
Sheets("Feuil1").Select
Columns("A:A").Select
With Selection.Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:="=Clients"
.IgnoreBlank = True
.InCellDropdown = True
.InputTitle = ""
.ErrorTitle = ""
.InputMessage = ""
.ErrorMessage = ""
.ShowInput = True
.ShowError = True
End With
End Sub
L'erreur se situe au niveau du ".Add Type"
merci de votre aide