Mailmerge FindEntry problem

D

Dorak

In Word, I have a letterhead template that contains a writer's block in table
format. The macro that gets data from an Excel table works fine in Word
2003, but in Word 2007 the merge does not execute. It pulls data only from
the first row of the table.
Could someone advise me as to what might be wrong? Below is my code.

Sub findentry()
'
' findentry Macro
' Macro recorded 8/7/2007 by Admin
'
ActiveDocument.MailMerge.MainDocumentType = wdFormLetters
ActiveDocument.MailMerge.OpenDataSource Name:= _
"N:\Templates\EmployeeData.xls", ConfirmConversions:=False,
ReadOnly:= _
False, LinkToSource:=True, AddToRecentFiles:=False,
PasswordDocument:="", _
PasswordTemplate:="", WritePasswordDocument:="",
WritePasswordTemplate:= _
"", Revert:=False, Format:=wdOpenFormatAuto, Connection:= _
"Provider=Microsoft.Jet.OLEDB.4.0;Password="""";User ID=Admin;Data
Source=N:\Templates\EmployeeData.xls;Mode=Read;Extended
Properties=""HDR=YES;IMEX=1;"";Jet OLEDB:System database="""";Jet
OLEDB:Registry Path="""";Jet OLEDB:Database Password="""";Jet OLEDB:Engine
Ty" _
, SQLStatement:="SELECT * FROM `AllPersonnel$`", SQLStatement1:="", _
SubType:=wdMergeSubTypeAccess
ActiveDocument.MailMerge.ViewMailMergeFieldCodes = wdToggle
WordBasic.MailMergeFindEntry
End Sub
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top