La instrucción Option Compare en VBA se utiliza para especificar cómo se deben realizar las comparaciones de cadenas de texto dentro de un módulo de VBA. Hay dos modos de comparación que puedes elegir: Binary y Text.

• Option Compare Binary: Las comparaciones entre cadenas se realizan de forma binaria, es decir, caso por caso, de acuerdo con la representación binaria de cada carácter. Esto es el comportamiento predeterminado si Option Compare no se especifica.
• Option Compare Text: Las comparaciones entre cadenas se realizan de forma textual, lo que significa que no se distingue entre mayúsculas y minúsculas.

Para usar la instrucción Option Compare, debes colocarla al principio del módulo, antes de cualquier procedimiento o declaración de variable:

Option Compare Binary ' Comparaciones binarias, distingue entre mayúsculas y minúsculas.

' -OR --

Option Compare Text ' Comparaciones de texto, no distingue entre mayúsculas y minúsculas.

Ejemplo en un módulo de VBA:

Option Compare Text ' Configura las comparaciones de texto sin distinción de mayúsculas y minúsculas.

Sub CompararCadenas()
    Dim cadena1 As String
    Dim cadena2 As String
    
    cadena1 = "Hola"
    cadena2 = "hola"

    If cadena1 = cadena2 Then
        MsgBox "Las cadenas son iguales."
    Else
        MsgBox "Las cadenas son diferentes."
    End If
End Sub

En el ejemplo anterior, el mensaje que se muestra es «Las cadenas son iguales.» porque la comparación no distingue entre mayúsculas y minúsculas debido a la instrucción Option Compare Text.

Ten en cuenta que la configuración que elijas con Option Compare afectará a todas las comparaciones de cadenas en el módulo en el que se declara. No afecta a otros módulos en el mismo proyecto, a menos que también incluyas la instrucción Option Compare con la misma configuración.

Importante: La directiva Option Compare debe ser la primera directiva en un módulo y solo puede aparecer una vez en un módulo. No se puede cambiar en tiempo de ejecución y se aplicará a todas las comparaciones de cadenas en ese módulo.

Conoce nuestra tienda

Ver más productos

Mejora tu nivel y logra tus objetivo

Excel

Access

Power BI

Ayúdanos a hacer crecer el proyecto