在Word VBA中指定新inlineshape的位置?

时间:2020-03-06 14:27:04  来源:igfitidea点击:

我正在为我工​​作的公司编写文档"向导"。这是一个.dot文件,其头包含一些文本和一些表单字段以及许多VBA代码。文档的主体作为OLE对象从单独的.doc文件中拉入。

当前,这是作为"形状"而不是" InlineShape"完成的。我这样做是因为我可以绝对定位Shape的位置,而InlineShape总是出现在文档的开头。

问题是当标题的大小改变时," Shape"不会移动。如果由于特殊情况需要有人在标题中添加或者删除行,则他们还需要移动定义正文的对象。这很痛苦,如果可能的话,我想避免这种情况。

长话短说,如何在Word中使用VBA定位" InlineShape"?

我使用的版本是Word 97.

解决方案

InlineShape被视为字母。因此,相同的技术。

ThisDocument.Range(15).InlineShapes.AddPicture "1.gif"

我的最终代码使用ThisDocument.Paragraphs获得了所需的范围。但是GSerg向我指出了使用"范围"将我的对象放到需要放置的正确方向。