Where do I find the mail merge vba code?

try this tutorial

https://www.youtube.com/watch?v=0nBcxc5zt1Q

The following early-binding Excel macro runs a Word mailmerge.
The data source is defined by the string starting with 'strWorkbookName ='. As coded, it uses the workbook the macro is stored in.
The mailmerge main document is defined on the line starting with 'Set wdDoc ='. As coded, it uses a document named ‘MailMergeMainDocument’ stored in the same folder as the Excel workbook from which the macro is run as the mailmerge main document.
The mailmerge SQL query is defined on the line starting with Const strQry As String ='. As coded, it gets everything from a worksheet named 'Sheet1'.

Please Login or Register  to view this content.

If you actually do the setup of your mailmerge main document as such (so you can do all the correct mergefield insertions), the simplest method of identifying the data source and the connect & query strings it employs so you can add them to the macro above is to use a Word macro like:

Please Login or Register  to view this content.

Only a few minor coding changes are needed to send the outputs to email. Of course, had you said up-front that's what you were wanting to automate, I might have provided the appropriate code...

Insert:
, i As Long
after:
wdDoc As Word.Document

Replace:

Please Login or Register  to view this content.

with:

Please Login or Register  to view this content.

Replace:

Please Login or Register  to view this content.

with:

Please Login or Register  to view this content.

Now all you need to do is provide the appropriate:
• 'MailSubject' details - which could even be in a field in the data source; and
• 'MailAddressFieldName' reference from the data source.

Note that the additional code I posted has the line:
If Trim(.DataFields("Last_Name")) = "" Then Exit For
I should have explained that that code is to provide an exit if, as often happens with Excel workbooks, the used range extends beyond the data. You could use any suitable field name, rather than just one named 'Last_Name'.

Come to think of it, depending on what you're doing you may not even need the loop - just the change in type & destination, plus the parameters for the 'MailFormat', 'MailSubject' and 'MailAddressFieldName'.

Ignore - mouse bounce or more likely the ExcelForum lurgies...

SQL can extract data either from Excel Sheets or Named ranges (and probably a defined range like 'A100:F250 - but I've never had a need to use that).

If you are using a sheet as the source then that is identifed to the database driver with the '$' after the sheet name. If a named range is the source the '$' is omitted...

I have yet to research how I can integrate prior libraries

Take it that you don't. The convention is develop on the older, slower machine with the earlier versions. References will always be upgraded automatically if moved to a machine with a later version, but will never be down-graded.

Your post does not comply with Rule 1 of our Forum RULES. Your post title should accurately and concisely describe your problem, not your anticipated solution.

Use terms appropriate to a Google search. Poor thread titles, like Please Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will be addressed according to the OP's experience in the forum: If you have less than 10 posts, expect (and respond to) a request to change your thread title. If you have 10 or more posts, expect your post to be locked, so you can start a new thread with an appropriate title.

To change a Title go to your first post, click EDIT then Go Advanced and change your title, if 2 days have passed ask a moderator to do it for you.

(This thread should receive no further responses until this moderation request is fulfilled, as per Forum Rule 7)

@ Norie - The Title was constructed at the time my first question in the thread was posed as best as I thought would correspond. Since that time through the continuous help of some very patient people, I have learned that I was barking up the wrong tree and they have continued to give me support and redirect my attention in a continuing learning process, building upon each prior work. Yes, the point we are now at does deviate from where I started; does this mean as a concept is built upon one is to change the initial title of the post? I am glad to comply; I simply am a bit confused for in the beginning the initial response was to the post I presented, correcting my confusion, and the title was commensurate with the initial post to the best of my confusion.

You yourself have personally helped me in a number of instances; I mean no disrespect, simply clarification.

edit: Interesting enough (to me), we are back to that same block from my original post seemingly having a problem in my implementation! I still truly wish I could create different "instances" of it with varying Word mailmerges so I could learn from them-

I find that if I change the ReadOnly in:

Please Login or Register  to view this content.

to True, it does show the recordcount = 1 and when I test wdDoc.MailMerge.DataSource.DataFields("Company") I get the correct result.

Now to figure out what else is going wrong for me as it didn't pump out the email!

@ Norie, ctd.... I attempted to change the title using "edit": "Advanced" and did a change there, but it seemed to only affect the one post. When I returned to update findings, the title was the first one that was used upon starting this thread. Am I approaching this incorrectly? Can you assist?

Originally Posted by brucemc777

Running into a bit of an obstacle here.

As speculated, I copy all visible filtered records to another sheet that for better or worse I named "MailMerge". To make it simple I filtered so only one record would show (one with my email address) along with the HeaderRowRange to Worksheets("MailMerge"), which also is Sheet3.

I tried three variations on the line defining the SQL query

As I indicated in post #3, if you do the mailmerge setup in the normal manner using the document, you can then run the second macro I posted there to extract these details.

PS: I fail to see how the thread title was ever non-compliant.

@macropod - I suspect I might have been trying to rush it all; I've been taking in a lot of new information from you, alansidman and cytop and trying to assimilate it all while dealing with bringing two daughters back from college (adding to the two at home so I am hopelessly outnumbered). Yes, another excuse. But not a bad one...

Anyway, thank-you, very much. I will go back to Post #3.

edit: I went back to Post #3: Embarrassment...

Also, still trying to define why the email(s) are not sending. Picking through everything to get a deeper understanding I notice that wdMergeSupType is set to Access. As I see nothing for Excel in the types I suspect this is the equivalent setting but at this point I don't trust in my suspicions and thought I should ask-

edit # 2Another "Ah-ha!" moment...
My misinterpretation of

Please Login or Register  to view this content.

With warnings/Alerts suppressed I was going through and educating myself line-by-line on this, then when I was almost there anyway I allowed alerts to be on, so I got my SQL notice, but then I ran into an alert advising that I needed a valid email address. As I was almost there anyway I was picking through details looking up MailAddressFieldName, MailSubject and MailFormat, which was when my dang bad presumption struck me like getting hit in the head.

Thank-you folks for sticking with me, very, very much. Gonna close this one out!

(That just means I will open a new thread with whatever I trip over next...)

If you want to send the mailmerge output as an attachment, you can use '.MailAsAttachment = True' but, if you want to attach another document, you're going to have to automate Outlook - a whole different ballgame. See, for example: http://word.mvps.org/FAQs/MailMerge/...ttachments.htm