请教关于ole操作word自动生成目录的问题
请教一下,我现在用ole操作word生成一篇文档,但是不知道怎么生成文档的目录。
在word2007中录制了一段宏
ActiveDocument.AttachedTemplate.BuildingBlockEntries("自动目录 1").Insert _
Where:=Selection.Range, RichText:=True
请问怎么转成ole代码,非常感谢!
[解决办法]
大概是这个么意思。
Variant vRange = vWordApp.OlePropertyGet("Selection").OlePropertyGet("Range");
Variant vAttach = vWordApp.OlePropertyGet("ActiveDocument").OlePropertyGet("AttachedTemplate");
Variant vBlock = vAttach.OlePropertyGet("BuildingBlockEntries").OleFunction("Item", "自动目录 1");
vBlock.OleFunction("Insert", vRange, true);