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

时间:2008-09-19 17:40:44

标签: ms-word word-vba

我正在为我工​​作的公司制作一份文档“向导”。它是一个.dot文件,其头部由一些文本和一些表单字段组成,还有许多VBA代码。文档的主体作为OLE对象从单独的.doc文件中拉入。

目前,这是以Shape而非InlineShape完成的。我这样做是因为我可以绝对定位Shape,而InlineShape总是出现在文档的开头。

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

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

我使用的版本是Word 97。

2 个答案:

答案 0 :(得分:2)

InlineShape被视为一封信。因此,相同的技术。

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

答案 1 :(得分:-1)

我的最终代码最终使用ThisDocument.Paragraphs来获取我需要的范围。但是GSerg指出我正确的方向使用Range来获取我需要的对象。