Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
End of Word Document and Append from Excel VB
I am currently successfully moving data from Excel to Word and now want to
use Excel VB to append several word files together (created from Excel 2003 on Windows XP Pro). I have two questions related to this. 1) I want to know how to move the insert point to the end of the Word document I open before I insert the next document. I recorded a macro in Word and then tried: WordApp.ActiveDocument.Selection.EndKey Unit:=6 But it didn't work. Does anyone know what will work? Please provide code examples. 2) I then want to insert a Word document at this end point. From that same Word macro, I learned and planned to use: WordApp.ActiveDocument.Selection.InsertFile Filename:="File1.doc" _ , Range:="", ConfirmConversions:=False, Link:=False, Attachment:=False will this work? If not what will work? Please provide code examples. Thanks M |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
End of Word Document and Append from Excel VB
Hi Modeerf60,
Try something along the lines of: Dim oRng As Range With WordApp.ActiveDocument .Range.Characters.Last.InsertAfter vbCrLf Set oRng = .Range.Characters.Last oRng.InsertFile FileName:="File1.doc", ConfirmConversions:=False, Link:=False, Attachment:=False End With -- Cheers macropod [Microsoft MVP - Word] "Modeerf60" wrote in message ... I am currently successfully moving data from Excel to Word and now want to use Excel VB to append several word files together (created from Excel 2003 on Windows XP Pro). I have two questions related to this. 1) I want to know how to move the insert point to the end of the Word document I open before I insert the next document. I recorded a macro in Word and then tried: WordApp.ActiveDocument.Selection.EndKey Unit:=6 But it didn't work. Does anyone know what will work? Please provide code examples. 2) I then want to insert a Word document at this end point. From that same Word macro, I learned and planned to use: WordApp.ActiveDocument.Selection.InsertFile Filename:="File1.doc" _ , Range:="", ConfirmConversions:=False, Link:=False, Attachment:=False will this work? If not what will work? Please provide code examples. Thanks M |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
change excel document into word document | Excel Discussion (Misc queries) | |||
convert excel document to word document (not a picture) | Excel Discussion (Misc queries) | |||
How do I convert a word document into a Excel document | Excel Discussion (Misc queries) | |||
How to change a excel document into a word document? | Excel Discussion (Misc queries) | |||
How do I convert Word document into an Excel document? | Excel Discussion (Misc queries) |