Need to know how to centre the information from Excel in Word using only this macro. All works except the margins are way off. Also the Save As window does not open.
Thanks
Troy
Sub Word_File()
'Sub ControlWord()
' You must pick Microsoft Word 8.0 from Tools>References
' in the VB editor to execute Word commands.
' Create a new instance of Word & make it visible
Set appWD = CreateObject("Word.Application.11")
appWD.Visible = True
Sheets("Customer").Select
'Copy the data for the new document to the clipboard
Range("A1:L116").Copy
' Tell Word to create a new document
appWD.Documents.Add
' Tell Word to paste the contents of the clipboard into the new document
appWD.Selection.Paste
' Save the new document with a sequential file name
appWD.ActiveDocument.SaveAs Filename:="File
Thanks
Troy
Sub Word_File()
'Sub ControlWord()
' You must pick Microsoft Word 8.0 from Tools>References
' in the VB editor to execute Word commands.
' Create a new instance of Word & make it visible
Set appWD = CreateObject("Word.Application.11")
appWD.Visible = True
Sheets("Customer").Select
'Copy the data for the new document to the clipboard
Range("A1:L116").Copy
' Tell Word to create a new document
appWD.Documents.Add
' Tell Word to paste the contents of the clipboard into the new document
appWD.Selection.Paste
' Save the new document with a sequential file name
appWD.ActiveDocument.SaveAs Filename:="File