XL 2010 (resolu par mapomme) Vba Validation

pierrejean

XLDnaute Barbatruc
Lorsque je souhaite n'autoriser qu'un numérique je crée une validation et utilise l'enregistreur de macro pour éventuellement répéter cette opération
L'enregistreur me donne:
Code:
Sub Macro5()
    With Selection.Validation
        .Delete
        .Add Type:=xlValidateCustom, AlertStyle:=xlValidAlertStop, Operator:= _
        xlBetween, Formula1:="=ESTNUM(A1)"
        .IgnoreBlank = True
        .InCellDropdown = True
        .InputTitle = ""
        .ErrorTitle = ""
        .InputMessage = ""
        .ErrorMessage = ""
        .ShowInput = True
        .ShowError = True
    End With  
End Sub
Or si je lance cette macro j'ai un bug sur la ligne
.Add Type:=xlValidateCustom, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:="=ESTNUM(A1)"

Ou diable me planté-je ????
 

mapomme

XLDnaute Barbatruc
Supporter XLD
Bonjour pierrejean ;),

Si on remplace "=ESTNUM(A1)" par "=isnumber(a1)", ça fonctionne (chez moi).

On doit pouvoir raccourcir avec:
VB:
.Add Type:=xlValidateCustom, AlertStyle:=xlValidAlertStop, Formula1:="=isnumber(A1)"
 
Dernière édition:

mapomme

XLDnaute Barbatruc
Supporter XLD
Re pierrejean,

J'ai été quelques fois confronté à ce type de difficulté et j'avais cherché très lontemps (et c'est pourquoi je me souviens de la solution) avant d'essayer la formule US. C'est malgré tout étrange : l'américain écrit le français mais ne sait pas le relire. Ils sont bizarre ces gens là! :confused:
 

Discussions similaires


Haut Bas