打开WORD,依次点击:工具-宏-宏-在“宏名”框内输入宏名(好比:NumToTxt)-单击“创建”按钮
创建一段如下的代码
Sub NumToTxt()
ActiveDocument.Content.ListFormat.ConvertNumbersToText
End Sub
保存将宏保存到Normal模板,然后关闭VBA窗口并返回Word。
打开你要处理的WORD文档,依次点击:工具-宏-宏-选中NumToTxt这个我们刚刚创建的宏(选中后在“宏名”框内会显示NumToTxt)-运行