Frage zu VBA und Word

[Jörg Lorenz]

Hi,

kann mir jemand n tipp geben, wie der entsprechende VBA code aussehen muss, damit das in word funktioniert ?

Word-VBA ist zwar nicht so mein Ding, aber eine einfache Schleife könnte die sein:

Dim bytI As Byte

For bytI = 1 To 5
    Selection.TypeText "Kennummer: " & Format(bytI, "000")
    ActiveDocument.PrintOut
    Selection.MoveLeft Unit:=wdWord, Count:=3, Extend:=wdExtend
    Selection.Delete
Next

Viele Grüße

Jörg