Retourne une valeur booléenne indiquant si unargumentVariant facultatif a été passé à un procédure.
Syntaxe
IsMissing( argname )
L’argument argname requis contient le nom d’un argument de procédure Variant facultatif.
Notes
Utilisez la fonction IsMissing pour détecter si des arguments Variant facultatifs ont été fournis lors de l’appel d’une procédure. IsMissing retourne True si aucune valeur n’a été passée pour l’argument spécifié ; sinon, elle retourne False. Si IsMissing retourne True pour un argument, l’utilisation de l’argument manquant dans un autre code peut entraîner une erreur définie par l’utilisateur. Si IsMissing est utilisé sur un argument ParamArray , il retourne toujours False. Pour détecter un ParamArray vide, testez pour voir si la limite supérieure du tableau est inférieure à sa limite inférieure.
Remarque : IsMissing ne fonctionne pas sur les types de données simples (par exemple , Integer ou Double), car, contrairement aux Variants, ils n’ont pas de provision pour un bit d’indicateur « manquant ». Pour cette raison, la syntaxe des arguments facultatifs typés vous permet de spécifier une valeur par défaut. Si l’argument est omis lorsque la procédure est appelée, l’argument aura cette valeur par défaut, comme dans l’exemple ci-dessous :
Remarque : Les exemples suivants illustrent l’utilisation de cette fonction dans un module Visual Basic pour 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 Rechercher et entrez un ou plusieurs termes dans la zone de recherche.
Sub MySub(Optional MyVar As String = "specialvalue") If MyVar = "specialvalue" Then ' MyVar was omitted. Else ...End Sub
Dans de nombreux cas, vous pouvez omettre entièrement le test If MyVar en rendant la valeur par défaut égale à la valeur que MyVar voulez contenir si l’utilisateur l’omet de l’appel de fonction. Cela rend votre code plus concis et plus efficace.
Exemple
Cet exemple utilise la fonction IsMissing pour case activée si un argument facultatif a été passé à une procédure définie par l’utilisateur. Notez que les arguments facultatifs peuvent désormais avoir des valeurs et des types par défaut autres que Variant.
Dim ReturnValue' The following statements call the user-defined' function procedure.ReturnValue = ReturnTwice() ' Returns Null.ReturnValue = ReturnTwice(2) ' Returns 4.' Function procedure definition.Function ReturnTwice(Optional A) If IsMissing(A) Then ' If argument is missing, return a Null. ReturnTwice = Null Else ' If argument is present, return twice the value. ReturnTwice = A * 2 End IfEnd Function
