Comment utiliser l’instruction Option Compare dans VBA ?

L’instruction `Option Compare` dans VBA est utilisée pour définir la façon dont les chaînes de caractères sont comparées dans un module. Vous pouvez placer cette instruction en haut de votre module pour spécifier si les comparaisons de chaînes doivent être sensibles à la casse ou non, ou si elles doivent être basées sur l’ordre binaire.

Voici comment utiliser les différentes options :

   Option Compare Binary

   Option Compare Text

   Option Compare Database

Option Compare Binary : Les comparaisons de chaînes sont sensibles à la casse et basées sur l’ordre binaire. Cela signifie que les lettres minuscules sont considérées comme supérieures aux lettres majuscules. Par exemple, “a” est supérieur à “A”.
Option Compare Text : Les comparaisons de chaînes ne sont pas sensibles à la casse. Cela signifie que “A” est considéré comme égal à “a”.
Option Compare Database : Cette option est spécifiquement utilisée dans les bases de données Microsoft Access. Les comparaisons de chaînes sont effectuées en fonction des paramètres locaux de la base de données actuelle, ce qui peut varier selon les paramètres régionaux ou d’autres configurations de la base de données.

Dans la pratique, vous devez placer l’instruction `Option Compare` tout en haut de votre module, avant toute procédure ou déclaration de variable. Voici un exemple :

Option Compare Text

Sub ExampleComparison()
    Dim str1 As String
    Dim str2 As String

    str1 = "Hello"
    str2 = "hello"

    ' Avec Option Compare Text, cela affichera "Equal" parce que la comparaison est insensible à la casse
    If str1 = str2 Then
        MsgBox "Equal"
    Else
        MsgBox "Not Equal"
    End If
End Sub

Choisissez l’option qui convient le mieux à vos besoins en fonction de la manière dont vous souhaitez que les comparaisons de chaînes soient effectuées dans votre application.

facebooklinkedin