Posts by drnicket

drnicket · Jun 19th 2014

Re: Macro to open Word and Start Mail Merge

Quote from Shoo;169245

Hi, I have the same query - how do I set the data source as per ender's post?

This is what I used. I simply recorded a macro of me setting the Data Source.

Code

Sub OpenDataSource()
'
' OpenDataSource Macro
'
'
    ActiveDocument.MailMerge.MainDocumentType = wdFormLetters
    ActiveDocument.MailMerge.OpenDataSource Name:= _
        "C:\FILENAME.XLSM", ConfirmConversions:=False _
        , ReadOnly:=False, LinkToSource:=True, AddToRecentFiles:=False, _
        PasswordDocument:="", PasswordTemplate:="", WritePasswordDocument:="", _
        WritePasswordTemplate:="", Revert:=False, Format:=wdOpenFormatAuto, _
        Connection:= _
        "Provider=Microsoft.ACE.OLEDB.12.0;User ID=Admin;Data Source=C:\FILENAME.XLSM;Mode=Read;Extended Properties=""HDR=YES;IMEX=1;"";Jet OLEDB:System database="""";Jet OLEDB:Registry Path="""";Jet OLEDB:Engine Type=35;Jet OLEDB:Database Lo" _
        , SQLStatement:="SELECT * FROM `'SHEETNAME$'`", SQLStatement1:="", _
        SubType:=wdMergeSubTypeAccess
End Sub

Display More

drnicket · Jun 19th 2014

Re: Mail Merge - Excel to Word Macro Edit

Quote from JSpectrum;607051

Hello,

Below is the macro I am using and it is working nicely, but I need help with a tweak and can't get it to work.

This macro, enabled in Excel, is part of a chain of macros and will open Word, run the mail merge, save and close Excel. However, there is a macro in Word that I need to run but don't know how to activate it. Is there a code that I am missing that can be added to the end of the macro included?

Thank you,

Display More

Code

wdApp.Run "macroname"