Este tutorial demostrará cómo usar la declaración Is Nothing en VBA
El VBA Es una declaración de nada utiliza el operador "Is" de VBA y comprueba que se haya asignado un objeto a una variable de objeto.
| 123456 | Sub CheckObjectAtenuar como rangoSi rng no es nada, entoncesMsgbox "Rango no asignado"Terminara siEnd Sub |
También podemos usar Not with Is Nothing con una instrucción If para asegurarnos de que se haya asignado un Rango a la variable de rango que declaramos y luego ejecutar el código que deseamos ejecutar si esa variable ha sido asignada.
| 1234567 | Sub CheckAssignedObjectAtenuar como rangoEstablecer rng = Rango ("A1: A6")Si no es nada, entonces'' hacer un código aquíTerminara siEnd Sub |
Podemos usar la declaración Is Nothing para cualquier tipo de objeto. Puede ser extremadamente útil para prevenir errores en nuestro código donde un objeto podría no estar asignado a una variable de objeto.
Por ejemplo, podemos usar una variable de la hoja de trabajo y asignarla a la Hoja activa. Si lo hacemos con éxito, entonces podemos seleccionar A2 en esa hoja.
| 1234567 | Sub CheckWorksheetObjectDim ws como hoja de trabajoEstablecer ws = ActiveSheetSi no es nada entoncesws.Range ("A2"). SeleccioneTerminara siEnd Sub |
En el código anterior, se seleccionará la celda A2. Si elimináramos la línea "Establecer ws = ActiveSheet“, Entonces la instrucción If omitiría esa línea de código y la celda A2 no sería seleccionada.
Is Nothing también se puede utilizar en otras aplicaciones de Microsoft Office como PowerPoint, Outlook, Access y Word. El siguiente código comprueba si el objeto de documento se ha asignado al documento de Word activo.
| 123456789 | Sub CheckDocumentObjectDim wdDoc como documentoEstablecer wdDoc = ActiveDocumentSi wdDoc no es nada, entoncesMsgBox "Documento no asignado"DemásMsgBox "Documento asignado"Terminara siEnd Sub |
