View Single Post
  #5   Report Post  
Graham Mayor
 
Posts: n/a
Default

You want your cake and your ha'penny
Propagate will only be available with the document type set to label, but
propagate will add the next fields also. Change the document type to label
propagate the labels, then change it back to form letter and with the field
content displayed (ALT+F9) use the replace function to replace ^d NEXT with
nothing. Then add NEXT fields to the cells where you require them. or leave
them off for a page of labels for each address.

The following macro will do all of this except add the next fields:


Sub DuplicateLabels()

'Change the document type to mailing label
ActiveDocument.MailMerge.MainDocumentType = _
wdMailingLabels

'propagate the labels
WordBasic.MailMergePropagateLabel

'display the field codes so they can be removed
ActiveWindow.View.ShowFieldCodes = True
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting

'search for and remove the {next} fields

'added by the propagation and which are not required
With Selection.Find
..Text = "^d NEXT"
..Replacement.Text = ""
..Forward = True
..Wrap = wdFindContinue
..Format = False
..MatchCase = False
..MatchWholeWord = False
..MatchWildcards = False
..MatchSoundsLike = False
..MatchAllWordForms = False
End With
Selection.Find.Execute replace:=wdReplaceAll

'revert the document type to a normal document
ActiveDocument.MailMerge.MainDocumentType = _

wdFormLetters
End Sub


See http://www.gmayor.com/installing_macro.htm


--

Graham Mayor - Word MVP

My web site www.gmayor.com
Word MVP web site http://word.mvps.org



PeteB wrote:
Ok, I got the fields in place, but the Propagate button is grayed
out. I would like to roll out the same fields to every label without
having to customize every label. Is that possible?
The key here is that I don't want Next Record at all. I need the same
address on every label.
Thanks for the help.

"Graham Mayor" wrote:

Create the label document first from the new document option in the
envelope/label wizard, then use this as the basis for a form letter
merge (rather than a label type merge). Put your next record fields
wherever you want them.

--

Graham Mayor - Word MVP

My web site www.gmayor.com
Word MVP web site http://word.mvps.org


PeteB wrote:
I want to create multiple mailing labels for one record in my data
source. How do I prevent the Next Record from automatically
appearing when I create my labels?
Do I have to remove them manually from all 29 labels?