Go Back  Xtreme Visual Basic Talk > Legacy Visual Basic (VB 4/5/6) > VBA / Office Integration > Word, PowerPoint, Outlook, and Other Office Products > MS Word Mail Merges?

Thread Tools Display Modes
Old 02-27-2001, 11:41 PM
Posts: n/a
Question MS Word Mail Merges?

I am using MS Word's Mail Merge to create personalized certificates from a MS Access Database, I have it all working, but now I want to program a simple loop to go through all records and print them all out automatically. So I thought I would just put a DO While loop in there and it would work, but how do you specify Do While NOT eof() because this has not been working, so I tried rs.eof() and set my recordset up,but that did not work. Can someone tell me where to start or any info.

Reply With Quote
Old 02-27-2001, 11:43 PM
Posts: n/a
Default My Mail Merge Sample Code

Sub Macro1()

Dim MyMerge As MailMerge
Set MyMerge = ActiveDocument.MailMerge

ActiveDocument.MailMerge.ViewMailMergeFieldCodes = wdToggle
ActiveDocument.MailMerge.DataSource.ActiveRecord = wdFirstRecord

Do While Not EOF()
If MyMerge.State = wdMainAndDataSource Then
SendKeys "{enter}"
With ActiveDocument.MailMerge
.Destination = wdSendToPrinter
End With
End If


End Sub

Also, am I using the sendkey in the correct place?

Reply With Quote

Currently Active Users Viewing This Thread: 1 (0 members and 1 guests)
Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is Off
HTML code is Off

Forum Jump


Free Publications
The ASP.NET 2.0 Anthology
101 Essential Tips, Tricks & Hacks - Free 156 Page Preview. Learn the most practical features and best approaches for ASP.NET.
Programmers Heaven C# School Book -Free 338 Page eBook
The Programmers Heaven C# School book covers the .NET framework and the C# language.
Build Your Own ASP.NET 3.5 Web Site Using C# & VB, 3rd Edition - Free 219 Page Preview!
This comprehensive step-by-step guide will help get your database-driven ASP.NET web site up and running in no time..