Lorsque vous développez des macros, il est souvent utile de connaître le nombre de caractères dans une sélection de texte. La macro VBA suivante, CharCount, affichera le nombre de caractères dans une sélection.

Sub CharCount()

Dim Title As String     Dim CharCount As Integer     Dim Message As String

Title = "CharCount"

CharCount = Len(Selection)

Message = LTrim(Str(CharCount)) + " character"

If CharCount <> 1 Then Message = Message + "s"

MsgBox Message, vbOKOnly, Title End Sub

_Note: _

Si vous souhaitez savoir comment utiliser les macros décrites sur cette page (ou sur toute autre page des sites WordTips), j’ai préparé une page spéciale qui comprend des informations utiles.

lien: / wordribbon-WordTipsMacros [Cliquez ici pour ouvrir cette page spéciale dans un nouvel onglet de navigateur].

WordTips est votre source pour une formation Microsoft Word rentable.

(Microsoft Word est le logiciel de traitement de texte le plus populaire au monde.) Cette astuce (746) s’applique à Microsoft Word 97, 2000, 2002 et 2003.