Validation.Add, méthode (Excel)

  • Article

Cette méthode ajoute la validation de données à la plage spécifiée.

Syntaxe

expression. Add (Type, AlertStyle, Operator, Formula1, Formula2)

Expression Variable qui représente un objet Validation .

Parameters

Nom Requis/Facultatif Type de données Description
Type Requis XlDVType Type de validation.
AlertStyle Facultatif Variant Style d'alerte de validation. Il peut s’agir de l’une des constantes XlDVAlertStyle suivantes : xlValidAlertInformation, xlValidAlertStop ou xlValidAlertWarning.
Opérateur Facultatif Variant Opérateur de validation des données. Il peut s’agir de l’une des constantes XlFormatConditionOperator suivantes : xlBetween, xlEqual, xlGreater, xlGreaterEqual, xlLess, xlLessEqual, xlNotBetween ou xlNotEqual.
Formula1 Facultatif Variant La première partie de l’équation de validation des données. La valeur ne doit pas dépasser 255 caractères.
Formula2 Facultatif Variant Deuxième partie de l’équation de validation des données lorsque Operator est xlBetween ou xlNotBetween (sinon, cet argument est ignoré).

Remarques

La méthode Add requiert différents arguments selon le type de validation, comme l’indique le tableau suivant :

Type de validation Arguments
xlValidateCustom Formula1 est obligatoire, Formula2 est ignoré. Formula1 doit contenir une expression qui renvoie True lorsque l'entrée de données est valide et False si ce n'est pas le cas.
xlInputOnly AlertStyle, Formula1 ou Formula2 sont utilisés.
xlValidateList Formula1 est obligatoire, Formula2 est ignoré. Formula1 doit contenir soit une liste de valeurs séparées par des virgules, soit une référence de feuille de calcul à cette liste.
XlValidateWholeNumber, xlValidateDate, xlValidateDecimal, xlValidateTextLength, ou xlValidateTime Formula1 ou Formula2 doit être spécifié, voire les deux.

Exemple

Cet exemple montre comment ajouter la validation de données à la cellule E5.

With Range("e5").Validation 
 .Add Type:=xlValidateWholeNumber, _ 
 AlertStyle:= xlValidAlertStop, _ 
 Operator:=xlBetween, Formula1:="5", Formula2:="10" 
 .InputTitle = "Integers" 
 .ErrorTitle = "Integers" 
 .InputMessage = "Enter an integer from five to ten" 
 .ErrorMessage = "You must enter a number from five to ten" 
End With

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.