Fonction Excel VBA TRIM (expliquée avec des exemples)

Excel dispose déjà d'une fonction de feuille de calcul TRIM que vous pouvez utiliser pour vous débarrasser des espaces de début, de fin et supplémentaires entre les mots/chaînes.

Il existe également une fonction TRIM dans VBA (et elle fait exactement la même chose - supprimez les espaces supplémentaires).

Pourquoi avons-nous également besoin d'une fonction TRIM dans VBA ?

Juste question !

Alors que vous pouvez travailler avec la fonction TRIM intégrée dans les feuilles de calcul Excel pour vous débarrasser des espaces. dans certains cas, vous devrez peut-être le faire en utilisant VBA.

Cela pourrait faire partie d'un plus grand code.

Syntaxe de la fonction VBA TRIM

COUPER (Chaîne)

« String » est l'argument qui peut être une chaîne de texte ou une variable contenant une chaîne de texte.

Apprenons à utiliser la fonction VBA TRIM avec quelques exemples.

Exemple 1 - Affichage du résultat dans une boîte de message

Supposons que vous ayez le texte suivant dans la cellule A1

Notez qu'il y a des espaces avant et après la phrase.

Le code ci-dessous prendrait cette phrase et afficherait le résultat après avoir coupé les espaces supplémentaires

Sub TrimExample1() MsgBox Trim(Range("A1")) End Sub

Il y a une chose importante à savoir lors de l'utilisation de la fonction TRIM dans VBA - elle ne supprimera que les espaces de début et de fin. Il ne supprimera pas les espaces supplémentaires entre les mots (ce que fait la fonction TRIM intégrée dans la feuille de calcul).

Par exemple, supposons que vous ayez le texte suivant dans la cellule A1 (avec des espaces supplémentaires entre les mots) :

Si j'utilise le code VBA ci-dessus, il affichera une boîte de message comme indiqué ci-dessous :

Comme vous pouvez le voir dans le résultat de la boîte de message, les espaces supplémentaires entre les mots ne sont pas supprimés par la fonction VBA TRIM.

Alors quelle est l'alternative?

Si vous souhaitez supprimer les espaces de début, de fin ainsi que les doubles espaces entre les mots, il est préférable d'utiliser le code suivant :

Sub TrimExample1() MsgBox WorksheetFunction.Trim(Range("A1")) End Sub

Le code ci-dessus utilise la fonction TRIM de la feuille de calcul (au lieu d'utiliser la fonction TRIM dans VBA).

Remarque : la fonction VBA Trim ne supprime pas les caractères autres que les espaces, tels que les sauts de ligne (vbNouvelleLigne, vbCrLf) etc.

Exemple 2 - Supprimer rapidement les espaces de début et de fin d'une plage de cellules

Supposons que vous ayez un ensemble de données comme indiqué ci-dessous où il y a des espaces de début et de fin :

Vous pouvez utiliser le code ci-dessous pour nettoyer instantanément ces données et supprimer tous les espaces de début et de fin :

Sub TrimExample1() Dim Rng As Range Set Rng = Sélection pour chaque cellule dans Rng Cell.Value = Trim(Cell) Next Cell End Sub

Le code ci-dessus parcourt toutes les cellules de la sélection et supprime les espaces de début et de fin.

Vous aimerez peut-être également les didacticiels Excel/VBA suivants :

• 10 façons de nettoyer les données dans Excel.
• Fonction de fractionnement Excel VBA.
• Fonction Excel VBA InStr.
• Fonction VBA LCase.
• Fonction VBA UCase.
• Création d'une fonction définie par l'utilisateur (UDF) dans Excel VBA.