I am able to open and print the document, but when I try to close the Word app, I get the message that it is still printing.... How do I have it wait until the printing is done to close?

This is my code, any suggestions will be greatly appreciated.

Dim WordApp As Object
Set WordApp = CreateObject("Word.Application")

WordApp.Visible = False

WordApp.Documents.Open (MyDocument)
WordApp.ActiveDocument.Printout

WordApp.ActiveDocument.Close
WordApp.quit
Set WordApp = Nothing

Thank you for your help.