用VBA（Microsoft Word）计算选择中的字符

发表于： 2020年11月12日 2020年11月12日

开发宏时，了解文本选择中有多少个字符通常会很有帮助。下面的VBA宏CharCount将显示所选内容中的字符数。

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

注意：

如果您想知道如何使用此页面（或_WordTips_网站上的任何其他页面）上描述的宏，我准备了一个包含有用信息的特殊页面。

点击此处在新的浏览器标签中打开该特殊页面。

_WordTips_是您进行经济有效的Microsoft Word培训的来源。

（Microsoft Word是世界上最流行的文字处理软件。）本技巧（746）适用于Microsoft Word 97、2000、2002和2003。