VBA
Los operadores

Observaciones

Operadores matematicos

Listado por orden de precedencia:

^{1 Se considera que la} multiplicación y la división tienen la misma precedencia.

² La suma y la resta se tratan con la misma prioridad.

Operadores de Concatenacion

VBA es compatible con 2 operadores de concatenación diferentes, + y & y ambos realizan la misma función cuando se usan con los tipos de String : el String mano derecha se agrega al final del String de la izquierda.

Si el operador & se usa con un tipo de variable que no sea una String , se convierte implícitamente en una String antes de concatenar.

Tenga en cuenta que el operador de + concatenación es una sobrecarga del operador de suma + . El comportamiento de + está determinado por los tipos de variables de los operandos y la precedencia de los tipos de operadores. Si ambos operandos se escriben como una String o Variant con un subtipo de String , se concatenan:

Public Sub Example()
    Dim left As String
    Dim right As String
    
    left = "5"
    right = "5"
    
    Debug.Print left + right    'Prints "55"
End Sub

Si cualquiera de los lados es un tipo numérico y el otro lado es una String que se puede convertir en un número, la prioridad de tipo de los operadores matemáticos hace que el operador sea tratado como el operador de suma y se agreguen los valores numéricos:

Public Sub Example()
    Dim left As Variant
    Dim right As String
    
    left = 5
    right = "5"
    
    Debug.Print left + right    'Prints 10
End Sub

Este comportamiento puede dar lugar a errores sutiles y difíciles de depurar, especialmente si se utilizan los tipos Variant , por lo que normalmente solo se debe usar el operador & para la concatenación.

Operadores de comparación

Notas

La sintaxis VBA permite "cadenas" de operadores de comparación, pero estas construcciones generalmente deben evitarse. Las comparaciones siempre se realizan de izquierda a derecha en solo 2 operandos a la vez, y cada comparación da como resultado un Boolean . Por ejemplo, la expresión ...

a = 2: b = 1: c = 0
expr = a > b > c

... se puede leer en algunos contextos como una prueba de si b está entre a y c . En VBA, esto se evalúa de la siguiente manera:

a = 2: b = 1: c = 0
expr = a > b > c
expr = (2 > 1) > 0
expr = True > 0
expr = -1 > 0 'CInt(True) = -1
expr = False

Cualquier operador de comparación que no Is use con un Object como operando se realizará en el valor de retorno del miembro predeterminado del Object . Si el objeto no tiene un miembro predeterminado, la comparación dará como resultado un error 438 en tiempo de ejecución: "El objeto no admite su propiedad o método".

Si el Object está inicializado, la comparación resultará en un error de tiempo de ejecución 91 - "Variable de objeto o Con variable de bloque no establecida".

Si se usa el literal Nothing con cualquier operador de comparación que no sea Is , se producirá un error de compilación: "Uso no válido del objeto".

Si el miembro predeterminado del Object es otro Object , VBA llamará continuamente al miembro predeterminado de cada valor de retorno sucesivo hasta que se devuelva un tipo primitivo o se genere un error. Por ejemplo, suponga que SomeClass tiene un miembro predeterminado de Value , que es una instancia de ChildClass con un miembro predeterminado de ChildValue . La comparación...

Set x = New SomeClass
Debug.Print x > 42

... serán evaluados como:

Set x = New SomeClass
Debug.Print x.Value.ChildValue > 42

Si cualquiera de los operandos es de tipo numérico y el otro es una String o Variant de subtipo String , se realizará una comparación numérica. En este caso, si la String no se puede convertir a un número, se generará un error de tiempo de ejecución 13 - "Falta de coincidencia de tipo" en la comparación.

Si ambos operandos son una String o Variant de subtipo String , se realizará una comparación de cadena en función de la configuración de Opción Comparación del módulo de código. Estas comparaciones se realizan en una base de carácter por carácter. Tenga en cuenta que la representación de caracteres de una String contiene un número no es lo mismo que una comparación de los valores numéricos:

Public Sub Example()
    Dim left As Variant
    Dim right As Variant
    
    left = "42"
    right = "5"
    Debug.Print left > right              'Prints False
    Debug.Print Val(left) > Val(right)    'Prints True
End Sub

Por este motivo, asegúrese de que las variables String o Variant se conviertan en números antes de realizar comparaciones numéricas de inequidad en ellos.

Si un operando es una Date , se realizará una comparación numérica en el valor Doble subyacente si el otro operando es numérico o se puede convertir a un tipo numérico.

Si el otro operando es una String o Variant de subtipo String que se puede convertir en una Date utilizando la configuración regional actual, la String se convertirá en una Date . Si no se puede convertir a una Date en la configuración regional actual, se generará un error de tiempo de ejecución 13 - "No coincide el tipo" en la comparación.

Se debe tener cuidado al hacer comparaciones entre valores Double o Single y valores booleanos . A diferencia de otros tipos numéricos, no se puede suponer que los valores que no son cero sean True debido al comportamiento de VBA de promover el tipo de datos de una comparación que implique un número de punto flotante a Double :

Public Sub Example()
    Dim Test As Double
    
    Test = 42        Debug.Print CBool(Test)             'Prints True.
    'True is promoted to Double - Test is not cast to Boolean
    Debug.Print Test = True             'Prints False
    
    'With explicit casts:
    Debug.Print CBool(Test) = True      'Prints True
    Debug.Print CDbl(-1) = CDbl(True)   'Prints True
End Sub

Bitwise \ Operadores lógicos

Todos los operadores lógicos en VBA se pueden considerar como "anulaciones" de los operadores a nivel de bits del mismo nombre. Técnicamente, siempre se tratan como operadores bitwise. Todos los operadores de comparación en VBA devuelven un valor booleano , que siempre tendrá ninguno de sus bits establecidos ( False ) o todos sus bits establecidos ( True ). Pero tratará un valor con cualquier bit establecido como True . Esto significa que el resultado de convertir el resultado a nivel de bits de una expresión a un operador Boolean (ver Operadores de comparación) siempre será el mismo que tratarlo como una expresión lógica.

Asignar el resultado de una expresión usando uno de estos operadores dará el resultado a nivel de bits. Tenga en cuenta que en las tablas de verdad a continuación, 0 es equivalente a False y 1 es equivalente a True .

And

Devuelve True si las expresiones de ambos lados se evalúan como True .

Or

Devuelve True si cualquiera de los lados de la expresión se evalúa como True .

Not

Devuelve True si la expresión se evalúa como False y False si las evaluaciones de expresión son True .

Not es el único operando sin un operando de la mano izquierda. El Editor de Visual Basic simplificará automáticamente las expresiones con un argumento de la mano izquierda. Si escribe ...

Debug.Print x Not y

... el VBE cambiará la línea a:

Debug.Print Not x

Se realizarán simplificaciones similares a cualquier expresión que contenga un operando de la izquierda (incluidas las expresiones) para Not

Xor

También conocido como "exclusivo o". Devuelve True si ambas expresiones evalúan resultados diferentes.

Tenga en cuenta que aunque el operador Xor se puede usar como un operador lógico, no hay absolutamente ninguna razón para hacerlo, ya que da el mismo resultado que el operador de comparación <> .

Eqv

También conocido como "equivalencia". Devuelve True cuando ambas expresiones evalúan al mismo resultado.

Tenga en cuenta que la función Eqv se usa muy raramente, ya que x Eqv y es equivalente a Not (x Xor y) mucho más legible.

Imp

También conocido como "implicación". Devuelve True si ambos operandos son iguales o si el segundo es True .

Tenga en cuenta que la función Imp es muy rara vez utilizada. Una buena regla general es que si no puede explicar lo que significa, debe usar otra construcción.