Vba 如何查找以*开头的文本并将其格式化为粗体

我需要搜索以“*”开头的文本，然后将单词格式化为粗体

这就是我到目前为止所做的：

带有ActiveDocument.Range的

和…一起找
.ClearFormatting
.Replacement.ClearFormatting
.Text=“*”
.Replacement.Text=“”
.Forward=True
.Format=False
.Wrap=wdFindStop
.MatchWildcards=True
.执行
以
找，找，找到
.选择
.Font.Bold=True
结束选择
.倒塌
.Find.Execute
环
以
端接头

您可以使用查找和替换来完成此操作，无需代码。MVP的网站上有一个很好的解释通配符的用法。