CVErr, fonction

Important :  Cet article a été traduit automatiquement, voir l’avertissement. Vous pouvez consulter la version en anglais de cet article ici.

Renvoie une donnée de type variante de sous-type erreur contenant un numéro d’erreur fourni par l’utilisateur.

Syntaxe

CVErr ( errornumber )

La requis errornumberargument est n’importe quel numéro d’erreur valide.

Remarques

La fonction CVErr permet de créer des erreurs définies par l’utilisateur dans les procédures créés par l’utilisateur. Par exemple, si vous créez une fonction qui accepte plusieurs arguments et renvoie normalement une chaîne, vous pouvez avoir votre fonction évaluer les arguments d’entrée pour vous assurer qu’ils sont dans une plage acceptable. Si elles ne sont pas, il est probable que votre fonction ne retourne pas ce que vous attendiez. Dans ce cas, CVErr vous permet de renvoyer un numéro d’erreur qui vous indique l’action à effectuer.

Notez que la conversion implicite d’une erreur n’est pas autorisée. Par exemple, vous ne pouvez pas affecter directement la valeur de retour de CVErr à un variable qui n’est pas une variante. Toutefois, vous pouvez effectuer une conversion explicite (à l’aide de CInt, CDbl, etc.) de la valeur renvoyée par CVErr et assigner à une variable de la type de données appropriée.

Exemple

Remarque : Exemples suivants illustrent l’utilisation de cette fonction dans une Visual Basic pour le module d’Applications (VBA). Pour plus d’informations sur l’utilisation de VBA, sélectionnez Référence du développeur dans la liste déroulante en regard de recherche et entrez un ou plusieurs termes dans la zone de recherche.

Cet exemple utilise la fonction CVErr pour renvoyer un Variant dont VarType est vbError (10). La fonction définie par l’utilisateur CalculateDouble retourne une erreur si l’argument passé n’est pas un nombre. Vous pouvez utiliser CVErr pour renvoyer des erreurs définies par l’utilisateur à partir de procédures définies par l’utilisateur ou pour retarder le traitement d’une erreur d’exécution. Utilisez la fonction IsError pour vérifier si la valeur représente une erreur.

' Call CalculateDouble with an error-producing argument.
Sub Test()
Debug.Print CalculateDouble("345.45robert")
End Sub
' Define CalculateDouble Function procedure.
Function CalculateDouble(Number)
If IsNumeric(Number) Then
CalculateDouble = Number * 2 ' Return result.
Else
CalculateDouble = CVErr(2001) ' Return a user-defined error
End If ' number.
End Function

Remarque : Avertissement traduction automatique : cet article a été traduit par un ordinateur, sans intervention humaine. Microsoft propose cette traduction automatique pour offrir aux personnes ne maîtrisant pas l’anglais l’accès au contenu relatif aux produits, services et technologies Microsoft. Comme cet article a été traduit automatiquement, il risque de contenir des erreurs de grammaire, de syntaxe ou de terminologie.

Développez vos compétences
Découvrez des formations
Accédez aux nouvelles fonctionnalités en avant-première
Rejoignez le programme Office Insider

Ces informations vous ont-elles été utiles ?

Nous vous remercions pour vos commentaires.

Merci pour vos commentaires. Il serait vraisemblablement utile pour vous de contacter l’un de nos agents du support Office.

×