Comment convertir des chaînes en casse appropriée à l’aide de VBA

Une chaîne est en casse correcte si la première lettre de chaque mot de la chaîne est en majuscule et si toutes les autres lettres de chaque mot sont en minuscules.

Vous pouvez utiliser la syntaxe suivante dans VBA pour convertir une plage de cellules avec des chaînes à la casse appropriée :

Sub ConvertToProperCase()
    
    Dim i As Integer

    For i = 2 To 10
        Range("B" & i) = StrConv(Range("A" & i), vbProperCase)
    Next i
    
End Sub

Cet exemple particulier convertira chaque chaîne de la plage A2:A10 en casse appropriée et affichera les résultats dans la plage B2:B10 .

L’exemple suivant montre comment utiliser cette syntaxe dans la pratique.

Exemple : convertir des chaînes en casse appropriée à l’aide de VBA

Supposons que nous ayons la colonne de chaînes suivante dans Excel :

Supposons que nous souhaitions convertir chaque chaîne de la colonne A à la casse appropriée et afficher les résultats dans la colonne B :

Nous pouvons créer la macro suivante pour ce faire :

Sub ConvertToProperCase()
    
    Dim i As Integer

    For i = 2 To 10
        Range("B" & i) = StrConv(Range("A" & i), vbProperCase)
    Next i
    
End Sub

Lorsque nous exécutons cette macro, nous recevons le résultat suivant :

La colonne B affiche chaque chaîne de la colonne A dans la casse appropriée.

Remarque : Vous pouvez trouver la documentation complète de la fonction StrConv dans VBA ici .

Ressources additionnelles

Les didacticiels suivants expliquent comment effectuer d’autres tâches courantes dans VBA :

Comment comparer des chaînes dans VBA
Comment supprimer les espaces d’une chaîne dans VBA
Comment remplacer des caractères dans une chaîne dans VBA