Bonjour,
 
je voudrais créer une formule de validation qui oblige l'utilisateur à entrer un numéro inférieur à 0 si la cellule C16 est égale à S.
 
J'ai tapé le code suivant:
 
Range("H16" ).Select
 
With Selection.Validation
 .Delete
 .Add Type:=xlValidateCustom, AlertStyle:=xlValidAlertStop, Operator:= _
  xlBetween, Formula1:="=si(C16=""S"";H16<0"
 .IgnoreBlank = True
 .InCellDropdown = True
 .InputTitle = ""
 .ErrorTitle = ""
 .InputMessage = ""
 .ErrorMessage = ""
 .ShowInput = True
 .ShowError = True
 
End With
 
Mais malheureusement cela ne marche pas. J'ai l'impression qu'il ne reconnait pas la fonction SI.
 
Que dois-je faire ?
 
 
merci

Essaie plutôt :

ce n'est pas ça que je cherche à faire. je cherche à reproduire la fonction qu'on peut utliser dans excel, menu données, validation, formulées

j'ai trouver, il faut remplacer le si par if et le ; par ,