给WORD批量添加拼音

word中的拼音指南功能默认的每次最多只能给30个汉字添加拼音，如果上百上千汉字，根本不实用。

所以需要另辟蹊径，首先在每个字的后面添加一个空格（因为添加拼音以后，拼音可能会挨的太近导致粘连视觉效果不好，我个人觉得，所以我一般都是每个字后面先添加一个空格。）

使用该帖子的 方法：想给Word中每个文字后面添加一个空格，两种方法轻松解决 (baidu.com)

第二种方法就是通过通配符来实现。通过Ctrl+H快捷键调出替换窗格，在上面输入“?”，在下面输入“^& ”  [注意，^& 的后面有一个空格哦]，然后在更多里面点选“通配符”，确定就可以了，记得下面的通配符一定要勾选，否则是不起作用的哦！

 然后使用  教师媒体工作者实用小功能，word批量添加拼音_哔哩哔哩_bilibili

这帖子提供的方法即可

Sub 清除拼音()
    charNum = ActiveDocument.Characters.Count
    For i = 1 T