我正在制作一个程序,重复创建数量不确定的页面,在所有页面的顶部都有一个位于特定位置的徽标。如果我把所有的东西都放在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
我仍然不太明白为什么它能工作,因为一系列对象/锚的文档对我来说很难理解。。。我试过了,效果很好。出于我的目的,这是有效的,但如果有人知道为什么有效,我很想知道
谢谢你的回答