Tento tutoriál ukáže, ako používať príkaz Is Nothing vo VBA
VBA Je nič vyhlásenie používa operátor VBA „Is“ a kontroluje, či je objekt priradený k premennej objektu.
| 123456 | Sub CheckObjectDim rng as RangeAk je rng nič, potomMsgbox „Rozsah nebol priradený“Koniec AkKoniec pod |
Môžeme tiež použiť príkaz Not with Is Nothing s príkazom If, aby sme sa uistili, že rozsah bol priradený deklarovanej premennej rozsahu, a potom spustite kód, ktorý chceme spustiť, ak bola táto premenná priradená.
| 1234567 | Sub CheckAssignedObjectDim rng as RangeNastaviť rng = rozsah ("A1: A6")Ak nie je nič, potom'' Sem zadajte kódKoniec AkKoniec pod |
Príkaz Is Nothing môžeme použiť pre akýkoľvek typ objektu. To môže byť veľmi užitočné pri predchádzaní chybám v našom kóde, kde objekt nemusí byť priradený k premennej objektu.
Môžeme napríklad použiť premennú pracovného hárka a priradiť ju k aktívnemu listu. Ak to urobíme úspešne, potom v tomto hárku môžeme vybrať A2.
| 1234567 | Sub CheckWorksheetObjectDim ws ako pracovný listNastaviť ws = ActiveSheetAk nie, nie je nič, potomws.Range ("A2"). VyberteKoniec AkKoniec pod |
Vo vyššie uvedenom kóde bude vybratá bunka A2. Ak by sme odstránili riadok „Nastaviť ws = ActiveSheet“, Potom by príkaz If obišiel tento riadok kódu a bunka A2 by nebola vybraná.
Is Nothing je možné použiť aj v iných aplikáciách Microsoft Office, ako sú PowerPoint, Outlook, Access a Word. Nasledujúci kód kontroluje, či bol objekt dokumentu priradený k dokumentu Active Word.
| 123456789 | Sub CheckDocumentObjectDim wdDoc ako dokumentNastaviť wdDoc = ActiveDocumentAk wdDoc nie je nič, potomMsgBox "Dokument nebol priradený"InakMsgBox "Dokument priradený"Koniec AkKoniec pod |
