Este tutorial demonstrará como usar a instrução Is Nothing no VBA
O VBA Declaração é nada usa o operador “Is” do VBA e verifica se um objeto foi atribuído a uma variável de objeto.
| 123456 | Sub CheckObjectDim rng as RangeSe rng não é nada, entãoMsgbox "Faixa não atribuída"Fim seEnd Sub |
Também podemos usar Not with Is Nothing com uma instrução If para ter certeza de que um Range foi atribuído à variável de intervalo declarada e, em seguida, executar o código que desejamos executar se essa variável tiver sido atribuída.
| 1234567 | Sub CheckAssignedObjectDim rng as RangeDefinir rng = intervalo ("A1: A6")Se não for nada, então'' faça algum código aquiFim seEnd Sub |
Podemos usar a instrução Is Nothing para qualquer tipo de objeto. Pode ser extremamente útil na prevenção de erros em nosso código, onde um objeto pode não ser atribuído a uma variável de objeto.
Por exemplo, podemos usar uma variável de planilha e atribuí-la à Planilha Ativa. Se fizermos isso com sucesso, podemos selecionar A2 nessa planilha.
| 1234567 | Sub CheckWorksheetObjectDim ws como planilhaDefinir ws = ActiveSheetSe não for nada, entãows.Range ("A2"). SelecioneFim seEnd Sub |
No código acima, a célula A2 será selecionada. Se removêssemos a linha “Definir ws = ActiveSheet“, Então a instrução If ignoraria essa linha de código e a célula A2 não seria selecionada.
Is Nothing também pode ser usado em outros aplicativos do Microsoft Office, como PowerPoint, Outlook, Access e Word. O código a seguir verifica se o objeto de documento foi atribuído ao documento do Active Word.
| 123456789 | Sub CheckDocumentObjectDim wdDoc as DocumentDefinir wdDoc = ActiveDocumentSe wdDoc não for nada, entãoMsgBox "Documento não atribuído"OutroMsgBox "Documento atribuído"Fim seEnd Sub |
