有没有办法用WORD统计一篇文章
楼上的方法正确
另外还可以使用宏，下面的内容我专门给你写的，看一下吧
1。 ALT+F8打开宏
2。 在宏名中输入任意宏名Macro1，然后点创建
3。 在打开的代码编辑窗中，粘贴以下代码，其中y = "要搜索的字符在这里"中引号内的部分就是你要搜索的字符，自行编辑
----------------------此行以下为代码----------------------
Sub Macro1()
'
' Macro1 Macro
' 宏在 2006-8-27 由 Qibanyu 录制
'
Selection。 Find。ClearFormatting
Dim x As Integer
x ...全部
楼上的方法正确
另外还可以使用宏，下面的内容我专门给你写的，看一下吧
1。 ALT+F8打开宏
2。 在宏名中输入任意宏名Macro1，然后点创建
3。 在打开的代码编辑窗中，粘贴以下代码，其中y = "要搜索的字符在这里"中引号内的部分就是你要搜索的字符，自行编辑
----------------------此行以下为代码----------------------
Sub Macro1()
'
' Macro1 Macro
' 宏在 2006-8-27 由 Qibanyu 录制
'
Selection。
Find。ClearFormatting
Dim x As Integer
x = 0
Dim y As String
y = "要搜索的字符在这里"
With Selection。
Find
。Text = y
。Replacement。Text = ""
。Forward = True
。Wrap = wdFindContinue
。
Format = False
。MatchCase = False
。MatchWholeWord = False
。MatchByte = True
。
MatchWildcards = False
。MatchSoundsLike = False
。MatchAllWordForms = False
End With
While Selection。
Find。Execute
x = x + 1
Wend
Selection。TypeParagraph
Selection。TypeParagraph
Selection。
TypeParagraph
Selection。TypeText Text:="在该文档中共找到" + y
Selection。TypeText Text:=x
Selection。
TypeText Text:="个"
End Sub
--------------------------此行以上为代码--------------------
4。保存Ctrl+s保存代码
5。
回到要统计的文档中，仍然ALT+F8打开宏，然后点运行
6。
此时文档最下端便会出现“在该文档中共找到文档*个”，其中*为数字，该数字就是你要统计的词在当前出现的次数
注意：
每次执行第5步，即点运行之后，文档会发生改变（最后一个关键字被取代），所以每次统计完后，请点菜单中的撤销恢复文档。收起
