Contenido
En VBA, la función VarType se utiliza para determinar el tipo de una variable o expresión. Esta función devuelve un valor entero que corresponde a una constante de enumeración que representa el tipo de dato de la variable, por ejemplo, si es un entero, una cadena, un objeto, etc.
Aquí te muestro cómo usar la función VarType en VBA:
VBA
Sub EjemploVarType()
Dim intVariable As Integer
Dim strVariable As String
Dim dateVariable As Date
Dim objVariable As Object
Dim boolVariable As Boolean
Dim dblVariable As Double
intVariable = 10
strVariable = "Hola Mundo"
dateVariable = Date
Set objVariable = Worksheets(1)
boolVariable = True
dblVariable = 3.14159
' Uso de VarType para obtener el tipo de variable
Debug.Print "intVariable es del tipo: " & VarType(intVariable)
Debug.Print "strVariable es del tipo: " & VarType(strVariable)
Debug.Print "dateVariable es del tipo: " & VarType(dateVariable)
Debug.Print "objVariable es del tipo: " & VarType(objVariable)
Debug.Print "boolVariable es del tipo: " & VarType(boolVariable)
Debug.Print "dblVariable es del tipo: " & VarType(dblVariable)
End Sub
Al ejecutar este subproceso, la ventana Inmediato en el editor de VBA mostrará el tipo de cada una de las variables:
- intVariable es del tipo: 2
- strVariable es del tipo: 8
- dateVariable es del tipo: 7
- objVariable es del tipo: 9
- boolVariable es del tipo: 11
- dblVariable es del tipo: 5
Cada número representa un tipo de dato diferente, según las siguientes constantes de enumeración de VBA:
VB
Const vbEmpty = 0 ' Valor no inicializado (vacío)
Const vbNull = 1 ' Valor nulo
Const vbInteger = 2 ' Valores enteros
Const vbLong = 3 ' Valores enteros largos
Const vbSingle = 4 ' Valores de punto flotante de precisión simple
Const vbDouble = 5 ' Valores de punto flotante de precisión doble
Const vbCurrency = 6 ' Valores monetarios
Const vbDate = 7 ' Valores de fecha
Const vbString = 8 ' Valores de cadena
Const vbObject = 9 ' Objetos
Const vbError = 10 ' Valores de Error
Const vbBoolean = 11 ' Valores Booleanos
Const vbVariant = 12 ' Valores Variant (pueden contener cualquier tipo)
Const vbDataObject = 13 ' Un objeto de acceso a datos
Const vbDecimal = 14 ' Valores decimales
Const vbByte = 17 ' Valores de byte
Const vbArray = 8192 ' Un arreglo (se combina con otro valor, por ejemplo, vbInteger + vbArray)
Puedes usar VarType junto con estas constantes para hacer más legible tu código si necesitas validar o trabajar con tipos de datos específicos.