Jens,

A couple of tips to speed up your program.

1) ScreenUpdating = False (will run faster as screen doesn't need to be
updated.)
2) Visible = False (If you don't need it on screen)
3) With appWord.Application.ActiveDocument.Paragraphs(1).R ange.Font
.Name = "Arial"
.Size = BRIEF_FONTGROESSE_ADRESSE_KLEIN
End With
(All the other settings are the default values so don't need to be set
unless you're changing them)

There are other ways to speed it up, like changing the For Next loops to Do
loops.
One of the Excel MVPs (Can't remember which one, but Google will find it)
has a web page dedicated to speeding up VBA.
Although this is specifically for Excel, most of the recommendations will
apply to Word VBA as well.

HTH
Henry

"Jens 'Kluesi' Kluesener" wrote in message
...
Hi

Sorry for my crossposting. I found this NG after I posted the question in
microsoft.public.excel. I do my best next time.

I have got created an Excel Script that creates a Word Document. A bill.
But for only 8 bill entries the script needs to much time. For this
entries
it works about 30 secounds. If you want to help me look at this page:

www.kluesener.info/excel.html

And if you find anything that saves time please tell me how I can do it
better.

Sorry for my bad english

Many Thanks

Jens