Excel vba liste de validation de données code 1004

Bonjour,

J'essaie via l'enregistreur de macro d'excel de faire une liste de validation de données
j'obtiens une erreur 1004

ma formule =decaler(NOM;;;nb.si(NOM;"><")) fonctionne pourtant bien avec excel ...

voici la modeste macro
----------------------------------

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

Sub menu_auto()   With Range("O13").Validation .Delete .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:=xlBetween, Formula1:="=DECALER(NOM;;;NB.SI(NOM;""><""))" .IgnoreBlank = True .InCellDropdown = True .InputTitle = "" .ErrorTitle = "" .InputMessage = "" .ErrorMessage = "" .ShowInput = True .ShowError = True End With End Sub

---

-----------------------------------
J'ai également essayer de traduire ma formule en anglais qui donne

Code:

---

=offset(NOM;;;countif(NOM;"><"))

---

et sa fonctionne pas non plus.

merci de votre aide.

Bonjour,

la propriété Formula1 attend bien une chaine de caractère matérialisant la formule Excel... à écrire en anglais.

Mais tu l'as mal rédigée, les ; (points virgules) doivent être remplacés par des , (virgules)

Merci de votre aide.

j'ai changé les points-virgules pour des virgules comme vous le proposé
et encore le même message d'erreur ...

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

Sub menu_auto() With Range("O13").Validation .Delete .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _ xlBetween, Formula1:= _ "=offset(nom,,,countif(nom,""><""))" .IgnoreBlank = True .InCellDropdown = True .InputTitle = "" .ErrorTitle = "" .InputMessage = "" .ErrorMessage = "" .ShowInput = True .ShowError = True End With End Sub

---

.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:=xlBetween, Formula1:="=OFFSET(NOM,,,COUNTIF(NOM,""><""))"



Merci beaucoups