使用VFP在单词的许多页面中添加许多图片

Question

我需要在word文档的每一页上添加一张图片。

很显然，我的do while + page break不会为我做这项工作。

我该如何解决这个问题？

这是我的代码：

DO WHILE .not. eof ()
oShape = oShapes.addPicture ("C:CartasIconsfirma-bgh-5cm.png", 0 -1,100,300,,)  
oWord.ActiveDocument.Shapes(1).Select
oWord.Selection.ShapeRange.RelativeHorizontalPosition = 2
oWord.Selection.ShapeRange.RelativeVerticalPosition = 4
oWord.Selection.ShapeRange.Left= 3.8*72 && Move 4.2 inches x 72 points/inch
oWord.Selection.ShapeRange.Top = pvertical

***SALTO DE PAGINA***
.InsertBreak
*********************
`end do`

Answer 1

如果在每一页上都放置相同的图像，最好将其设置为水印。这篇文章告诉你如何在Word中做到这一点：https://support.office.com/en-ie/article/Insert-a-watermark-or-change-a-watermark-f90f26a5-2101-4a75-bbfe-f27ef05002de

录制一个宏，看看如何将其转换为Automation代码。