Ovaj će vodič pokazati kako koristiti izraz Ništa u VBA -i
VBA Izjava nije ništa koristi VBA Operator "Je" i provjerava je li objekt dodijeljen varijabli objekta.
123456 | Sub CheckObjectDim rng as RangeAko rng nije ništa ondaSMS poruka "Raspon nije dodijeljen"Završi akoKraj podm |
Također možemo upotrijebiti Not with Is Nothing with If naredbom kako bismo bili sigurni da je raspon dodijeljen varijabli raspona koju smo deklarirali, a zatim pokrenuli kôd koji želimo pokrenuti ako je ta varijabla dodijeljena.
1234567 | Sub CheckAssignedObjectDim rng as RangePostavi rng = raspon ("A1: A6")Ako nije rng je ništa'' Učini neki kod ovdjeZavrši akoKraj podm |
Iskaz Is Nothing možemo koristiti za bilo koju vrstu objekta. Može biti iznimno korisno u sprječavanju pogrešaka u našem kodu gdje objekt možda nije dodijeljen varijabli objekta.
Na primjer, možemo koristiti varijablu radnog lista i dodijeliti je aktivnom listu. Ako to učinimo uspješno, tada možemo odabrati A2 na tom listu.
1234567 | Sub CheckWorksheetObjectZatamni kao radni listPostavite ws = ActiveSheetAko nije, onda nije ništaws.Range ("A2"). OdaberiteZavrši akoKraj podm |
U gornjem kodu će se odabrati ćelija A2. Ako bismo uklonili crtu "Postavite ws = ActiveSheet“, Tada bi naredba If zaobišla tu liniju koda i ćelija A2 ne bi bila odabrana.
Is Nothing se također može koristiti u drugim Microsoft Office aplikacijama kao što su PowerPoint, Outlook, Access i Word. Sljedeći kod provjerava je li Objekt dokumenta dodijeljen dokumentu Active Word.
123456789 | Pod CheckDocumentObjectZatamni wdDoc kao dokumentPostavite wdDoc = ActiveDocumentAko wdDoc nije ništa ondaMsgBox "Dokument nije dodijeljen"DrugoMsgBox "Dokument dodijeljen"Završi akoKraj podm |