Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.word.mailmerge.fields
|
|||
|
|||
How to Setup an Event Processor
Word 2003. I would like to use the MailMergeBeforeRecordMerge event with my
mailmerge document. How do I set this up so that it is triggered each time before a new merge record is processed. I tried placing the exmaple code in the code space for ThisDocument, but it does not work that way. The code is: Private Sub MailMergeApp_MailMergeBeforeRecordMerge(ByVal Doc As Document, Cancel As Boolean) Static LastGolfer As String Dim intZipLength As Integer, CurrentGolfer As String intZipLength = Len(ActiveDocument.MailMerge.DataSource.DataFields (6).Value) 'Cancel merge of this record only if 'the zip code is less than five digits If intZipLength 5 Then Cancel = True End If End Sub -- Dr. Doug Pruiett Good News Jail & Prison Ministry www.goodnewsjail.org |
#2
Posted to microsoft.public.word.mailmerge.fields
|
|||
|
|||
How to Setup an Event Processor
It sounds like you might be using a hammer to crack a nut. You may be able
to do what you want by using the Skip Record If field, checking for the value of the sixth data field. However, see the "Individual Merge Letters" item on fellow MVP Graham Mayor's website at: http://www.gmayor.com/individual_merge_letters.htm If you are using Word XP or later, the "Add-in to Merge Letters to Separate Files" that I have written and that can be downloaded from that site will allow you to create each letter as a separate file with a filename taken from a field in the data source with a minimum of fuss. If you study all of the code in that add-in you may get an idea how to get the event processor to work. Note, you will also need to have followed the information in the article "Writing application event procedures" at: http://www.word.mvps.org/FAQs/Macros...lassEvents.htm -- Hope this helps. Please reply to the newsgroup unless you wish to avail yourself of my services on a paid consulting basis. Doug Robbins - Word MVP "Chaplain Doug" wrote in message ... Word 2003. I would like to use the MailMergeBeforeRecordMerge event with my mailmerge document. How do I set this up so that it is triggered each time before a new merge record is processed. I tried placing the exmaple code in the code space for ThisDocument, but it does not work that way. The code is: Private Sub MailMergeApp_MailMergeBeforeRecordMerge(ByVal Doc As Document, Cancel As Boolean) Static LastGolfer As String Dim intZipLength As Integer, CurrentGolfer As String intZipLength = Len(ActiveDocument.MailMerge.DataSource.DataFields (6).Value) 'Cancel merge of this record only if 'the zip code is less than five digits If intZipLength 5 Then Cancel = True End If End Sub -- Dr. Doug Pruiett Good News Jail & Prison Ministry www.goodnewsjail.org |
Reply |
Thread Tools | |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
How do I setup a template for Avery 5366 file folder labels? | Microsoft Word Help | |||
Footer Margins in Page Setup | Page Layout | |||
different page setup for sections | Page Layout | |||
Page Setup Window | Page Layout | |||
Event firing for Word | Microsoft Word Help |