Exemple de code de macro pour modifier la casse du texte dans Excel

Résumé

Bien que Microsoft Excel ait des fonctions qui changent la casse du texte, il peut arriver que vous souhaitiez modifier la casse du texte par programmation.

Cet article contient trois exemples de macros Microsoft Visual Basic pour Applications (sous-procédures) que vous pouvez utiliser pour modifier les lettres d’une chaîne de texte en majuscules, en minuscules ou en majuscules (la première lettre de chaque mot est majuscule). Ces actions sont similaires aux fonctions Excel, =UPPER(), =LOWER() et =PROPER().

Informations supplémentaires

Microsoft fournit des exemples de programmation à titre d’illustration uniquement, sans garantie expresse ou implicite. Cela inclut, sans s’y limiter, les garanties implicites de qualité marchande ou d’adéquation à un usage particulier. Cet article suppose que vous êtes familiarisé avec le langage de programmation présenté et les outils utilisés pour créer et déboguer des procédures. Les ingénieurs du support technique Microsoft peuvent vous aider à expliquer les fonctionnalités d’une procédure particulière, mais ils ne modifient pas ces exemples pour fournir des fonctionnalités supplémentaires ou construire des procédures pour répondre à vos besoins spécifiques.

Sub Uppercase()
   ' Loop to cycle through each cell in the specified range.
   For Each x In Range("A1:A5")
      ' Change the text in the range to uppercase letters.
      x.Value = UCase(x.value)
   Next
End Sub

Sub Lowercase()
   ' Loop to cycle through each cell in the specified range.
   For Each x In Range("B1:B5")
      x.Value = LCase(x.Value)
   Next
End Sub

Sub Proper_Case()
   ' Loop to cycle through each cell in the specified range.
   For Each x In Range("C1:C5")
      ' There is not a Proper function in Visual Basic for Applications.
      ' So, you must use the worksheet function in the following form:
      x.Value = Application.Proper(x.Value)
   Next
End Sub

Références

Pour plus d’informations sur l’utilisation des fonctions de feuille de calcul pour modifier la casse du texte, cliquez sur le numéro d’article suivant pour afficher l’article dans la Base de connaissances Microsoft :

263580 Comment modifier la casse du texte dans Excel

Pour plus d’informations sur l’obtention d’aide sur Visual Basic pour Applications, cliquez sur le numéro d’article suivant pour afficher l’article dans la Base de connaissances Microsoft :

305326 Liste des ressources de programmation pour Visual Basic pour Applications