¿Cómo usar la función VarType en VBA?

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.

Conoce nuestra tienda

Ver más productos

Mejora tu nivel y logra tus objetivo

Excel

Excel cursos

Access

cursos de Access

Power BI

cursos power BI

Ayúdanos a hacer crecer el proyecto

¡Únete a nuestro Grupo de Facebook!

Deja un comentario