Questo tutorial dimostrerà come utilizzare l'istruzione Is Nothing in VBA
Il VBA Non è niente dichiarazione utilizza l'operatore VBA "Is" e verifica che un oggetto sia stato assegnato a una variabile oggetto.
123456 | Sub CheckObjectDim rng come intervalloSe rng non è niente alloraMsgbox "Intervallo non assegnato"Finisci seFine sottotitolo |
Possiamo anche usare Not with Is Nothing con un'istruzione If per assicurarci che sia stato assegnato un Range alla variabile range che abbiamo dichiarato e quindi eseguire il codice che desideriamo eseguire se tale variabile è stata assegnata.
1234567 | Sub CheckAssignedObjectDim rng come intervalloImposta rng = Intervallo ("A1: A6")Se non rng non è niente allora''fai un po' di codice quiFinisci seFine sottotitolo |
Possiamo usare l'istruzione Is Nothing per qualsiasi tipo di oggetto. Può essere estremamente utile per prevenire errori nel nostro codice in cui un oggetto potrebbe non essere assegnato a una variabile oggetto.
Ad esempio, possiamo utilizzare una variabile del foglio di lavoro e assegnarla al foglio attivo. Se lo facciamo con successo, possiamo selezionare A2 in quel foglio.
1234567 | Sub CheckWorksheetObjectDim ws come foglio di lavoroImposta ws = ActiveSheetSe non è niente alloraws.Range("A2").SelezionaFinisci seFine sottotitolo |
Nel codice sopra, verrà selezionata la cella A2. Se dovessimo rimuovere la linea "Imposta ws=ActiveSheet“, quindi l'istruzione If ignorerebbe quella riga di codice e la cella A2 non verrebbe selezionata.
Is Nothing può essere utilizzato anche in altre applicazioni di Microsoft Office come PowerPoint, Outlook, Access e Word. Il codice seguente verifica se l'oggetto documento è stato assegnato al documento di Word attivo.
123456789 | Sub CheckDocumentObjectDim wdDoc come documentoImposta wdDoc = ActiveDocumentSe wdDoc non è niente alloraMsgBox "Documento non assegnato"AltroMsgBox "Documento assegnato"Finisci seFine sottotitolo |