0
如果有一种方法(直接或使用VBA)获取Building Block Organizer中出现的所有构建基块列表,即构建基块的名称,图库,类别,模板,行为等。我不想提取自动文本部分或类似的东西。我只是希望能够获得并打印Building Blocks Organizer中展示的Bilding Blocks和其他信息的完整列表。Word 2007:获取积木列表?
非常感谢! D
如果有一种方法(直接或使用VBA)获取Building Block Organizer中出现的所有构建基块列表,即构建基块的名称,图库,类别,模板,行为等。我不想提取自动文本部分或类似的东西。我只是希望能够获得并打印Building Blocks Organizer中展示的Bilding Blocks和其他信息的完整列表。Word 2007:获取积木列表?
非常感谢! D
构建块条目存储在几个Word模板文件中。如果要遍历所有可用的构建块,则必须迭代所有已加载的Word模板。您可以使用以下宏来执行此操作:
Sub ListBuildingBlocks()
Dim oTemplate As Template
Dim oBuildingBlock As BuildingBlock
Dim i As Integer
For Each oTemplate In Application.Templates
For i = 1 To oTemplate.BuildingBlockEntries.Count
Set oBuildingBlock = oTemplate.BuildingBlockEntries.item(i)
Debug.Print oBuildingBlock.Name + vbTab _
+ oBuildingBlock.Type.Name + vbTab _
+ oBuildingBlock.Category.Name + vbTab _
+ oTemplate.FullName
Next
Next
End Sub
嗨0xA3,非常感谢您的回复。我在Word的Visual Basic编辑器中运行代码,但没有得到任何结果。你将如何调整宏以使其将结果写入空白文档?再次感谢,D – 2013-03-04 11:52:06
上面的代码示例打印到VBA编辑器的* Immediate Window *。如果要写入新文档,则需要自己创建文档并写入此文档。 – 2013-03-04 13:39:58
我甚至都不知道有这样一个事物,就像一个imnmedaite窗口。它甚至没有开放。这就是为什么我没有得到任何结果。非常感谢您的帮助! – 2013-03-05 07:30:23