StephenBart
New Member
- Joined
- Jun 22, 2023
- Messages
- 15
- Office Version
- 365
- Platform
- Windows
I am running office 365. I have a macro enabled word template that I use to create a customer proposal document that uses mail merge fields pull customer specific information from a cost estimating work book. When in word I would rather not have to hit -> Mailings, -> Select Recipients, -> Use Existing list, then navigate through sub folders to the file location, select the file, the table and hit open - just to refresh the connection. Can any one suggest a word macro to do this? Alternatively I have excel macro to create the proposal - could this be modified with code to execute the mail merge? Thank you.
Here is my excel marco
Dim iApp As Word.Application
Dim iDoc As Word.Document
Dim FileName As String
Dim Path As String
Path = Range("c58") & "\"
FileName = Range("c61")
Set iApp = CreateObject("Word.Application")
iApp.Visible = True
iApp.Activate
Set iDoc = iApp.Documents.Add(Template:="U:\1000 ADMIN\1990 Templates\PROP_to_LlllFf_by_BartSt_re_CustNa-Street-Cit_RS_nx_YYYYMMDD_rev1.dotm", NewTemplate:=False, DocumentType:=0)
iDoc.SaveAs2 FileName:=Path & FileName & ".docm", FileFormat:=wdFormatXMLDocumentMacroEnabled, AddtoRecentFiles:=False
Here is my excel marco
Dim iApp As Word.Application
Dim iDoc As Word.Document
Dim FileName As String
Dim Path As String
Path = Range("c58") & "\"
FileName = Range("c61")
Set iApp = CreateObject("Word.Application")
iApp.Visible = True
iApp.Activate
Set iDoc = iApp.Documents.Add(Template:="U:\1000 ADMIN\1990 Templates\PROP_to_LlllFf_by_BartSt_re_CustNa-Street-Cit_RS_nx_YYYYMMDD_rev1.dotm", NewTemplate:=False, DocumentType:=0)
iDoc.SaveAs2 FileName:=Path & FileName & ".docm", FileFormat:=wdFormatXMLDocumentMacroEnabled, AddtoRecentFiles:=False