données validation

Marsh Posté le 01-03-2005 à 17:47:19

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

Marsh Posté le 01-03-2005 à 17:47:19

Marsh Posté le 01-03-2005 à 20:36:39

Essaie plutôt :

Code :

If Range("C16" ).Value="S" And Not Val(Range("H16" ).Value) < 0 Then
Msgbox "Erreur : .. ton message ..",vbCritical,"Erreur ( titre )"
Exit Sub
End If

Marsh Posté le 02-03-2005 à 10:21:59

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

Marsh Posté le 02-03-2005 à 11:12:32

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

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed

Name *

Email *

URL

Message *