L'opérateur VBA « Is » est utilisé pour comparer deux références d'objets.
Si les références d'objet sont les mêmes, Est retournera VRAI. Si les références d'objet sont différentes, Est renverra FAUX.
C'est rien
L'utilisation la plus courante du Est est de vérifier si un objet a été affecté à une variable objet.
Vous pouvez voir comment cela fonctionne dans la procédure ci-dessous :
| 123456789101112 | Sous n'est rien ()Dim ws As Feuille de calcul'Définir ws = ActiveSheetSi ws n'est rien alorsMsgBox "Non attribué"AutreMsgBox "Attribué"Fin siFin du sous-marin |
Ceci est utile pour éviter les erreurs causées par un objet qui n'est pas affecté à la variable objet.
Intersection - n'est rien
Généralement, cela est utilisé avec les événements de modification de feuille de travail pour identifier si la plage cible se situe dans une plage spécifiée.
| 1234567 | Private Sub Worksheet_Change (ByVal Target As Range)Si pas d'intersection (cible, plage("a1:a10")) n'est rien alorsMsgBox "Intersection"Fin siFin du sous-marin |
Est - Comparer des objets
L'opérateur Is peut également être utilisé pour comparer des objets.
Regardons un exemple. Ici, nous allons affecter deux feuilles de calcul aux objets de feuille de calcul rng1 et rng2, en testant si les deux objets de feuille de calcul stockent la même feuille de calcul :
| 12345678910111213 | Sous-ComparerObjets()Dim ws1 en tant que feuille de calcul, ws2 en tant que feuille de calculDéfinir ws1 = Sheets("Sheet1")Définir ws2 = Sheets("Sheet2")Si ws1 est ws2 alorsMsgBox "Même WS"AutreMsgBox "Différents WS"Fin siFin du sous-marin |
Bien sûr, les objets de la feuille de calcul ne sont pas les mêmes, donc « Différents WS » est renvoyé.
