Using Mail Merge on Word from a laptop

  • Thread starter news-server.cfl.rr.com
  • Start date
N

news-server.cfl.rr.com

When doing a mail merge using word 2007 and excel 2007 on a laptop, only the
first 5 records will be merged and the rest of the records are ignored. I
tried everything, but, only the first 5 records are available for merge.
Even when I bring up the recipient list, only the first 5 records show, even
though there are more than that on my excel spreadsheet. I read on another
site that there is a problem with the mail merge routine when doing the
merge using a laptop. Is there some type of fix I can apply to resolve this
problem?
 
M

macropod

Hi,

AFAIK, there is no mailmerge issue with laptops, per se. There has been an issue with certain tablet PCs and, if that's what you're
referring to, see: http://support.microsoft.com/kb/898630

If the problem is simply that you're doing a label merge and you can only see the first 5 records, then:
.. if there are only 5 records/page, you simply need to execute the merge
.. if there are more than 5 records/page, you need to ensure the fields for the remaining labels on that page have been inserted.
 
D

Doug Robbins - Word MVP

Are you merging to labels?

Macro to overcome the problem with propagation of mail merge field fields
with a label type mail merge when using a Tablet PC and some other Computers
that have Tablet PC Functionality available:
Sub MailMergePropagateLabel()
Dim atable As Table
Dim i As Long, j As Long
Dim source As Cell, target As Cell
Dim myrange As Range
Set atable = ActiveDocument.Tables(1)
Set source = atable.Cell(1, 1)
Set myrange = source.Range
myrange.Collapse wdCollapseStart
ActiveDocument.Fields.Add Range:=myrange, Text:="NEXT", _
PreserveFormatting:=False
source.Range.Copy
For j = 2 To atable.Columns.Count
Set target = atable.Cell(1, j)
If target.Range.Fields.Count > 0 Then
target.Range.Paste
End If
Next j
For i = 2 To atable.Rows.Count
For j = 1 To atable.Columns.Count
Set target = atable.Cell(i, j)
If target.Range.Fields.Count > 0 Then
target.Range.Paste
End If
Next j
Next i
atable.Cell(1, 1).Range.Fields(1).Delete
End Sub

It is suggested that you put this code into a template that you save in the
Word Startup folder so that it becomes an add-in and will be available
whenever you need it. As the macro has the same name as the Word Command
that is supposed to do the job, this macro will run when the Update Labels
button is used when setting up the mail merge label main document.


--
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, originally posted via msnews.microsoft.com
 

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