Excel linking with Word

titan2x

New Member
Joined
Sep 27, 2006
Messages
6
Currently I have created a quote package where we enter a series of information pertaining to a project. Within this package there is a 'Job Details' sheet which is where the majority of the customer information is put into. After the 'Job Details' is fully complete a customer sheet is also completed within the same package. Now I wish to get the 'customer sheet' and copy it into Word using a macro for emailing purposes.

My problem is this I used a macro with the help from you, which works; but the information is not centred within Word. Can this macro below be fixed so the margins centre the document ready for print? Also open the "save as" so an employee can save it to whatever he wishes?

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"


End Sub
 

Excel Facts

Which came first: VisiCalc or Lotus 1-2-3?
Dan Bricklin and Bob Frankston debuted VisiCalc in 1979 as a Visible Calculator. Lotus 1-2-3 debuted in the early 1980's, from Mitch Kapor.

Forum statistics

Threads
1,136,261
Messages
5,674,704
Members
419,520
Latest member
Jennifer4Dillon

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Top