A Microsoft Office (Excel, Word) forum. OfficeFrustration

If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below.

Go Back   Home » OfficeFrustration forum » Microsoft Word » Mailmerge
Site Map Home Register Authors List Search Today's Posts Mark Forums Read  

Word 2003 Mail Merge for Labels



 
 
Thread Tools Display Modes
  #1  
Old May 16th, 2010, 06:03 PM posted to microsoft.public.word.mailmerge.fields
Kathe
external usenet poster
 
Posts: 1
Default Word 2003 Mail Merge for Labels

Suddenly I am unable to import an entire database for labels. Only the first
name comes thru. However they are all there somewhere because when I hit
or on top of the wizard they will cycle thru. They won't go on the 5160
label form. I have done this lots of times but suddenly it won't work for
me. Help!
  #2  
Old May 16th, 2010, 11:04 PM posted to microsoft.public.word.mailmerge.fields
Doug Robbins - Word MVP
external usenet poster
 
Posts: 8,239
Default Word 2003 Mail Merge for Labels

Have you used the step to Update the labels?

If you use Alt+F9 in the mail merge main document, do you see a { NEXT }
field before the first { MERGEFIELD fieldname } on all of the labels EXCEPT
the first label on the sheet?

See the article “Mailmerge Labels with Word XP” on fellow MVP Graham Mayor’s
website at:

http://www.gmayor.com/mail_merge_lab...th_word_xp.htm

If you are using a Tablet PC, here is a 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

"Kathe" wrote in message
...
Suddenly I am unable to import an entire database for labels. Only the
first
name comes thru. However they are all there somewhere because when I hit

or on top of the wizard they will cycle thru. They won't go on the 5160
label form. I have done this lots of times but suddenly it won't work for
me. Help!


 




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

vB code is On
Smilies are On
[IMG] code is Off
HTML code is Off
Forum Jump


All times are GMT +1. The time now is 04:25 PM.


Powered by vBulletin® Version 3.6.4
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright 2004-2024 OfficeFrustration.
The comments are property of their posters.