excel - 在 Excel VBA 中使用 Word 内置样式

Question

我正在尝试使用 VBA 从 Excel 写入 word 文档。但是，当我尝试将样式标题 1 应用于文本时，它必须是英文版的 Office。我如何参考内置的办公室风格？

这就是我现在得到的：

wrdApp.Selection.Style = "Heading 1"
wrdApp.Selection.TypeText Text:= "Test heading"

我想要类似的东西（使其国际化），但这不起作用：

wrdApp.Selection.Style = WdBuiltinStyle.wdStyleHeading1
wrdApp.Selection.TypeText Text:= "Test heading"

Answer 1

你有正确的想法。尝试简单：

wrdApp.Selection.Style = wdStyleHeading1

或不引用 Word/late 绑定，使用常量值

wrdApp.Selection.Style = -2

可以在此处找到枚举列表：

http://msdn.microsoft.com/en-us/library/office/aa211923(v=office.11​​).aspx