Opening Existing Word file from Excel VBA

Try

Please Login or Register  to view this content.

having made a reference to the Word object model.

That worked great.

THANK YOU

I have added the printout method to the file that I am opening, and after the printout method, I want Word to close. I've tried a few lines but all it does is close the document. ANy way to close Word entirely?

Try

Please Login or Register  to view this content.

at the end.

Ok that Worked!!!!

One last thing! (Sorry)

The doc that I have is set up so that a warning on the print margins comes up when I print it. It prints just fine, but I want it to no give that warning. Any code for that?

You could try

Please Login or Register  to view this content.

Already tried that. It comes up with a box stating:

Please wait while Word finishes all pending print jobs.

And when you click cancel print, it displays the doc and the margin warning is there.
Here is my code for reference:

Please Login or Register  to view this content.

Ok I found out an alternative!

Just for anyone else who needs to know this!

My situation:

Wanting to have a button in excel for my users to print a letter template. (A standard thank you letter in this case)

My problem:

Margins

My fix (Thanks to Excel Forum Members and myself)

Excel Code:

Sub OpenWord()
Dim WordApp As Word.Application

Set WordApp = Nothing
Set WordApp = New Word.Application

WordApp.Visible = False


WordApp.Documents.Open "C:\HL1.docm"
End Sub

Word Code:

Private Sub Document_Open()
With Application
.DisplayAlerts = wdAlertsNone
.PrintOut Background:=False
.Quit (wdDoNotSaveChanges)

End With

End Sub