Wenn Sie Makros entwickeln, ist es oft hilfreich zu wissen, wie viele Zeichen eine Textauswahl enthält. Das folgende VBA-Makro, CharCount, zeigt die Anzahl der Zeichen in einer Auswahl an.

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

_Hinweis: _

Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der WordTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.

Klicken Sie hier, um diese spezielle Seite in einem neuen Browser-Tab zu öffnen.

WordTips ist Ihre Quelle für kostengünstige Microsoft Word-Schulungen.

(Microsoft Word ist die beliebteste Textverarbeitungssoftware der Welt.) Dieser Tipp (746) gilt für Microsoft Word 97, 2000, 2002 und 2003.