VBA中的Word.Table,更改TableStyle

时间:2016-01-13 11:19:23

标签: vb.net ms-word

我有Microsoft.Office.Interop.Word.Table,我希望它具有Word的默认“Quicktables”之一的样式。

QuickTables =插入 - >表 - > QuickTables

在德语中,QuickTable被称为“矩阵”,我认为英语应该是相同的。

如何在我的VB应用程序中使我的表具有此样式?

1 个答案:

答案 0 :(得分:0)

这些是BuildingBlocks。如果从列表中插入条目时录制宏,则可以看到。这也将为您提供插入"快速表"的(VBA)语法。

注意1:确切的文件路径会有所不同,具体取决于Office的版本和用户的系统配置(IT可能会更改存储BuildingBlocks模板的默认路径)。这是我系统的结果:

    Application.Templates( _
    "C:\Users\[profile designation]\AppData\Roaming\Microsoft\Document Building Blocks\1033\14\Built-In Building Blocks.dotx" _
    ).BuildingBlockEntries("Calendar 2").Insert Where:=Selection.Range, _
    RichText:=True

注2:BuildingBlock名称可能因UI语言而异。如果您的代码应该以各种语言运行,那么您需要研究文字字符串,存储它们,并根据WordApplication.Language调用相关字符串(文件路径中的1033,例如,我安装的LangaugeID。)

注3:对于VB.NET替换"应用程序"使用对象变量名称,您将使用Word.Application。此外,Insert方法需要括号:Insert(Where:= Selection.Range,RichText:= True)