VBA n'est rien

Table des matières

Ce didacticiel montrera comment utiliser l'instruction Is Nothing dans VBA

Le VBA La déclaration n'est rien utilise l'opérateur VBA « Est » et vérifie qu'un objet a été affecté à une variable d'objet.

123456 Sous-objet de contrôleDim rng comme plageSi rng n'est rien alorsMsgbox "Plage non attribuée"Fin siFin du sous-marin

Nous pouvons également utiliser Not with Is Nothing avec une instruction If pour nous assurer qu'une plage a été affectée à la variable de plage que nous avons déclarée, puis exécuter le code que nous souhaitons exécuter si cette variable a été affectée.

1234567 Sous-CheckAssignedObjectDim rng comme plageDéfinir rng = Range("A1:A6")Si pas rng n'est rien alors'' faire du code iciFin siFin du sous-marin

Nous pouvons utiliser l'instruction Is Nothing pour tout type d'objet. Cela peut être extrêmement utile pour éviter les erreurs dans notre code lorsqu'un objet peut ne pas être affecté à une variable d'objet.

Par exemple, nous pouvons utiliser une variable de feuille de calcul et l'affecter à la feuille active. Si nous réussissons, nous pouvons sélectionner A2 dans cette feuille.

1234567 Sous-CheckWorksheetObjectDim ws comme feuille de calculDéfinir ws = ActiveSheetSi ce n'est pas le cas, alorsws.Range("A2").SélectionnezFin siFin du sous-marin

Dans le code ci-dessus, la cellule A2 sera sélectionnée. Si nous supprimions la ligne "Définir ws=ActiveSheet", alors l'instruction If contournerait cette ligne de code et la cellule A2 ne serait pas sélectionnée.

Is Nothing peut également être utilisé dans d'autres applications Microsoft Office telles que PowerPoint, Outlook, Access et Word. Le code suivant vérifie si l'objet de document a été affecté au document Word actif.

123456789 Sous-CheckDocumentObjectDim wdDoc en tant que documentDéfinir wdDoc = ActiveDocumentSi wdDoc n'est rien, alorsMsgBox "Document non attribué"AutreMsgBox "Document attribué"Fin siFin du sous-marin

Vous contribuerez au développement du site, partager la page avec vos amis

wave wave wave wave wave