在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向我指出了使用"范围"将我的对象放到需要放置的正确方向。