Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Copy Data From Excel Into a MSWord Document
Hi folks,
As a follow on to my previous question (Thanks again for the help)......I want to copy and paste data from MS Excel into MS Word. Is this even possible with VBA? For example: If I have text in cell B3, and I want to copy it into my MSWord document, right justify it and format it to be Bold and Italic......then I want to enter a space below this text in MS Word, and copy in the cell value from cell A4 onto the next line of my Word document left justified? Does that make sense....can I do this? |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Copy Data From Excel Into a MSWord Document
Jon Peltier has some really good information on this topic...
http://peltiertech.com/Excel/XL_PPT.html Mark "dimm" wrote in message ... Hi folks, As a follow on to my previous question (Thanks again for the help)......I want to copy and paste data from MS Excel into MS Word. Is this even possible with VBA? For example: If I have text in cell B3, and I want to copy it into my MSWord document, right justify it and format it to be Bold and Italic......then I want to enter a space below this text in MS Word, and copy in the cell value from cell A4 onto the next line of my Word document left justified? Does that make sense....can I do this? |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Copy Data From Excel Into a MSWord Document
Thankyou, that helps a lot, but I have another question. John gives a macro
example for pasting into word as below from Excel, but what if the user has another instance of Word open apart from my file (myfile.doc). How do I specify that myfile.doc should be selected instead of any other open word document? ' Reference existing instance of Word Set WDApp = GetObject(, "Word.Application") ' Reference active document Set WDDoc = WDApp.ActiveDocument ' Reference active slide ' Copy the range Selection.Copy ' Paste the range WDApp.Selection.PasteSpecial Link:=False, DataType:=wdPasteRTF, _ Placement:= wdInLine, DisplayAsIcon:=False ' Clean up Set WDDoc = Nothing Set WDApp = Nothing End If End Sub "Mark Ivey" wrote: Jon Peltier has some really good information on this topic... http://peltiertech.com/Excel/XL_PPT.html |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Copy Data From Excel Into a MSWord Document
Jon may be able to answer that question better than me...
Mark "dimm" wrote in message ... Thankyou, that helps a lot, but I have another question. John gives a macro example for pasting into word as below from Excel, but what if the user has another instance of Word open apart from my file (myfile.doc). How do I specify that myfile.doc should be selected instead of any other open word document? ' Reference existing instance of Word Set WDApp = GetObject(, "Word.Application") ' Reference active document Set WDDoc = WDApp.ActiveDocument ' Reference active slide ' Copy the range Selection.Copy ' Paste the range WDApp.Selection.PasteSpecial Link:=False, DataType:=wdPasteRTF, _ Placement:= wdInLine, DisplayAsIcon:=False ' Clean up Set WDDoc = Nothing Set WDApp = Nothing End If End Sub "Mark Ivey" wrote: Jon Peltier has some really good information on this topic... http://peltiertech.com/Excel/XL_PPT.html |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
Copy Data From Excel Into a MSWord Document
I just did this yesterday:
http://www.microsoft.com/office/comm...r=US&sloc=&p=1 Clearly, you will have to customize it a little for your own situation, but that should give you (most of) what you want. Regards, Ryan-- -- RyGuy "Mark Ivey" wrote: Jon may be able to answer that question better than me... Mark "dimm" wrote in message ... Thankyou, that helps a lot, but I have another question. John gives a macro example for pasting into word as below from Excel, but what if the user has another instance of Word open apart from my file (myfile.doc). How do I specify that myfile.doc should be selected instead of any other open word document? ' Reference existing instance of Word Set WDApp = GetObject(, "Word.Application") ' Reference active document Set WDDoc = WDApp.ActiveDocument ' Reference active slide ' Copy the range Selection.Copy ' Paste the range WDApp.Selection.PasteSpecial Link:=False, DataType:=wdPasteRTF, _ Placement:= wdInLine, DisplayAsIcon:=False ' Clean up Set WDDoc = Nothing Set WDApp = Nothing End If End Sub "Mark Ivey" wrote: Jon Peltier has some really good information on this topic... http://peltiertech.com/Excel/XL_PPT.html |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Can I import data from MSWord into Excel? How Please? | Excel Discussion (Misc queries) | |||
How do I Export Excell line data to MSWord automatically | Excel Discussion (Misc queries) | |||
Using txtMy_GotFocus or txtMy_LostFocus in MSWord or Excel | Excel Programming | |||
copy excel worksheet into msword with row, column headings and gr. | Excel Discussion (Misc queries) | |||
MSWORD to EXCEL | Excel Discussion (Misc queries) |