Dieses Tutorial zeigt, wie Sie die Is Nothing-Anweisung in VBA verwenden
Die VBA Ist Nichts-Aussage verwendet den VBA-Operator „Is“ und prüft, ob ein Objekt einer Objektvariablen zugewiesen wurde.
| 123456 | UnterprüfobjektDim rng als RangeWenn rng nichts ist, dannMsgbox "Bereich nicht zugewiesen"Ende WennEnd Sub |
Wir können Not mit Is Nothing auch mit einer If-Anweisung verwenden, um sicherzustellen, dass der von uns deklarierten Range-Variablen ein Range zugewiesen wurde, und dann den Code ausführen, den wir ausführen möchten, wenn diese Variable zugewiesen wurde.
| 1234567 | Unter CheckAssignedObjectDim rng als RangeSetze rng = Bereich("A1:A6")Wenn nicht rng nichts ist, dann'' hier etwas Code machenEnde WennEnd Sub |
Wir können die Is Nothing-Anweisung für jeden Objekttyp verwenden. Es kann äußerst nützlich sein, um Fehler in unserem Code zu vermeiden, bei denen ein Objekt möglicherweise keiner Objektvariablen zugewiesen ist.
Beispielsweise können wir eine Arbeitsblattvariable verwenden und sie dem aktiven Blatt zuweisen. Wenn wir dies erfolgreich tun, können wir A2 in diesem Blatt auswählen.
| 1234567 | Unter CheckWorksheetObjectDim ws als ArbeitsblattSet ws = ActiveSheetWenn nicht ws nichts ist, dannws.Range("A2").SelectEnde WennEnd Sub |
Im obigen Code wird die Zelle A2 ausgewählt. Wenn wir die Zeile „ws=ActiveSheet einstellen“, dann würde die If-Anweisung diese Codezeile umgehen und Zelle A2 würde nicht ausgewählt.
Is Nothing kann auch in anderen Microsoft Office-Anwendungen wie PowerPoint, Outlook, Access und Word verwendet werden. Der folgende Code überprüft, ob das Dokumentobjekt dem Active Word-Dokument zugewiesen wurde.
| 123456789 | Unter CheckDocumentObjectwdDoc als Dokument dimmenwdDoc = ActiveDocument setzenWenn wdDoc nichts ist, dannMsgBox "Dokument nicht zugewiesen"AndersMsgBox "Dokument zugewiesen"Ende WennEnd Sub |
