如何在Word文档的第二页上定位图片VB6



我正在制作一个程序,重复创建数量不确定的页面,在所有页面的顶部都有一个位于特定位置的徽标。如果我把所有的东西都放在for循环中,并在最后包含以下命令来进行分页:

Set oRng = oDoc.Bookmarks("EndOfDoc").Range oRng.InsertBreak

第二次(以及随后的几次(我制作的表格会出现在下一页上,但图像没有。我已尝试将"top"属性设置为

CCD_ 2。

我认为这可能与锚点属性有关,但我不知道它得到了什么数据类型,也不知道它如何影响放置我插入图像使用:

oDoc.Shapes.AddPicture "C:UsersnameDesktopfile.jpg", , , CentimetersToPoints(1.3), CentimetersToPoints(0.9 + pageLength * j), CentimetersToPoints(6.1), CentimetersToPoints(2.9)

图片添加了多次,但都是第一页顶部的.9和第一页左侧的1.3。

我如何才能将图片从某个页面的顶部移动9

编辑:我想避免把它放在标题中,因为这会打乱文档其他元素的对齐

好的,所以对我有效的是:

Set oRng = oDoc.Bookmarks("EndOfDoc").Range oRng.InsertBreak oDoc.Shapes.AddPicture "C:UsersmeDesktopfile.jpg", , , CentimetersToPoints(1.3), CentimetersToPoints(0.9), CentimetersToPoints(6.1), CentimetersToPoints(2.9), oDoc.Bookmarks("EndOfDoc").Range

我仍然不太明白为什么它能工作,因为一系列对象/锚的文档对我来说很难理解。。。我试过了,效果很好。出于我的目的,这是有效的,但如果有人知道为什么有效,我很想知道

谢谢你的回答

相关内容

  • 没有找到相关文章

最新更新