使用Word内置样式与Excel VBA

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 /后期绑定，使用常量值

wrdApp.Selection.Style = -2

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

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