Automatisieren von Word zum Ausführen eines Seriendrucks aus...
wrdDataDoc = wrdApp.Documents.Open("C:\DataDoc.doc") For iCount = 1 To 2 wrdDataDoc.Tables.Item(1).Rows.Add() Next iCount ' Fill in the data. FillRow(wrdDataDoc, 2, "Steve", "DeBroux", _ "4567 Main Street", "Buffalo, NY 98052") FillRow(wrdData...