Object doesn't support this property or method - word object

Hey guys... I've got some code that I'm upgrading but it doesn't like my word object reference at the bottom.

For Each Doc In Documents
Doc.Footers(wdHeaderFooterPrimary).Range.Text = Application.UserName & Date & jobnumber
Doc.PrintOut
Doc.Footers(wdHeaderFooterPrimary).Range.Text = ""
Next Doc


Doc.PrintOut works fine.

here's my whole code:

Please Login or Register  to view this content.

All I need is for these objects to print out on my document

Please Login or Register  to view this content.

If anyone knows a more efficient way to do this besides editing the footer, that would be a welcome option as well.

Originally Posted by xlnitwit

Hi,

Is this code in Word or in Excel? If it's in Excel, you need to get a Word.Application instance before you can start looping through documents.

This is actually in Word... everything has started to blur together... but I'm not opposed to running the script from excel, as long as I can keep the same functionality.

OK, that worked. I was able to add the section parameter in line without doing a loop (there's only one section in each of my documents).

Thanks, xlnitwit!