VBA – Majuscules, Minuscules et Noms Propres – Fonctions de casse

Ce tutoriel montre comment utiliser les fonctions UCASE, LCASE et STRCONV en VBA.

Lorsque vous travaillez en VBA, vous avez souvent besoin de convertir des chaînes de caractères en minuscules, en majuscules ou en casse correcte (casse de type « nom propre »). Ceci est possible en utilisant les fonctions UCase, LCase et StrConv.

Ces fonctions sont importantes lorsque vous manipulez des chaînes de caractères dans VBA, car ce dernier est sensible à la casse. Si vous souhaitez que VBA ne tienne pas compte de la casse, vous devez ajouter l’option Compare Text en haut de votre module. Vous pouvez en savoir plus à ce sujet ici : Empêcher le VBA d’être sensible à la casse

UCase – Convertir une Chaîne en Majuscules

La fonction UCase de VBA convertit toutes les lettres d’une chaîne en majuscules. Il n’y a qu’un seul argument, qui peut être une chaîne, une variable avec une chaîne ou une valeur de cellule. Cette fonction est souvent utilisée si vous voulez comparer deux chaînes de caractères. Voici le code de la fonction UCase :

Dim strTexte As String
Dim strTexteMaj As String

strTexte = "Fonction Ucase en cours d'exécution"

strTexteMaj = UCase(strTexte)

MsgBox strTexteMaj

Dans cet exemple, nous souhaitons convertir toutes les lettres de la variable strTexte en majuscules et affecter la chaîne convertie à la variable strTexteMaj. À la fin, nous affichons le résultat de la chaîne convertie dans une boîte de message.

LCase – Convertir une Chaîne en Minuscules

Si vous souhaitez convertir toutes les lettres d’une chaîne en minuscules, vous devez utiliser la fonction LCase. Cette fonction a un argument, le même que celui de la fonction UCase. Voici le code de la fonction LCase :

Dim strTexte As String
Dim strTexteMin As String

strTexte = "EXÉCUTION DE LA FonctiON Lcase"

strTexteMin = LCase(strTexte)

MsgBox strTexteMin

Dans cet exemple, nous convertissons toutes les lettres de la variable strTexte en minuscules. Ensuite, la chaîne convertie est affectée à la variable strTexteMin.

StrConv – Conversion d’une Chaîne de Caractères en Casse de Type « Nom Propre »

La fonction StrConv vous permet de convertir une chaîne de texte en casse de type « nom propre » c’est à dire que tout le texte est en minuscule sauf la première lettre de chaque mot. Cette fonction possède deux arguments. Le premier est la chaîne de caractères que vous voulez convertir. Le second est le type de conversion que vous souhaitez. Afin de convertir une chaîne de caractères en casse de type nom propre, vous devez lui attribuer la valeur vbProperCase. Le code de la fonction est le suivant

Dim strTexte As String
Dim strTexteNomPropre As String
    
strTexte = "Exécution de la fonction de casse nom propre"
    
strTexteNomPropre = StrConv(strTexte, vbProperCase)
    
MsgBox strTexteNomPropre

Vous verrez dans l’exemple comment la fonction fonctionne. Elle prend la chaîne de caractères de la cellule B1, la convertit en casse correcte et renvoie la valeur dans la cellule A1.

StrConv – Conversion d’une Chaîne de Caractères en Majuscules ou Minuscules

À l’aide de la fonction StrConv, vous pouvez également convertir une chaîne en majuscules ou en minuscules. Pour ce faire, il suffit de définir le deuxième argument sur vbUpperCase ou vbLowerCase :

strTexteConverti = StrConv(strTexte, vbUpperCase)

strTexteConverti = StrConv(strTexte, vbLowerCase)

VBA Upper, Lower, et Proper Case – Fonctions de Casse dans Access

Tous les exemples ci-dessus fonctionnent exactement de la même manière dans Access VBA et dans Excel VBA.

Private Sub NomClient_ApresMiseAJour()
   'Cette opération permet de convertir le texte du champ du nom du client en majuscules
   Me.ClientName = UCase(Me.ClientName)
End Sub

VBA Coding Made Easy

Stop searching for VBA code online. Learn more about AutoMacro - A VBA Code Builder that allows beginners to code procedures from scratch with minimal coding knowledge and with many time-saving features for all users!


Learn More!