我试图使用range.find方法提取粗体文本，除非整个范围实际上是粗体（不太可能发生太多，它更多的是边缘条件），否则所有内容都是桃色的。 With rngFindRange.Find
.ClearFormatting
.Font.Bold = True
Do
.Execute
If Not .Found Then
Exit Do
End If
我有一个Word文档，其中包含大约4000个表单域，我必须将其导出到数据库。问题在于4000个字段中没有一个在“书签”字段中有信息，因此我无法获取存储在其中的信息。 我试图创建一个宏来帮助写书签（FormField.Name）的过程，但无法设法做到这一点。问题是我想更改用户选择中包含的FormField的名称，只有它们。我已经成功地得出这样的解决方案： Sub Macro2()
Dim
我开发了一个从数据库中提取数据的Word 2003报表生成应用程序。 大多数组织使用英文版的Windows和Office。但是，我们法国办公室的许多用户使用他们的本地版本。如果我使用Word的任何内置标题样式Heading（1-9），则法文版预计Titre（1-9）。 在我目前的解决方案，用户设置一个Form选项和VBA执行以下操作： Dim HeadingStyle as String
Dim