Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.word.mailmerge.fields
|
|||
|
|||
Mail Merge - can you change the sequance it populates the labels
Hello
We are using Office 2003. By default when you run the mail merge to labels, it populates the addresses into a label form from left to right then continues on the next row. Is there anyway to have the merge populate the form from top to bottom then move to the right to populate the next coloum? Thank you for any assitance. Sharon |
#2
Posted to microsoft.public.word.mailmerge.fields
|
|||
|
|||
Mail Merge - can you change the sequance it populates the labels
Not without re-ordering your data source. If the data source is a Word table
then Doug's macro below will do that - Sub SortData() ' Macro to assign numbers to data source so that it can be sorted to cause 'labels to print down columns Dim Message, Title, Default, labelrows, labelcolumns, _ i As Integer, j As Integer, k As Integer Message = "Enter the number of labels in a row" ' Set prompt. Title = "Labels per Row" ' Set title. Default = "3" ' Set default. ' Display message, title, and default value. labelcolumns = InputBox(Message, Title, Default) Message = "Enter the number of labels in a column" ' Set prompt. Title = "Labels per column" ' Set title. Default = "8" ' Set default. labelrows = InputBox(Message, Title, Default) With ActiveDocument.Tables(1) ..Columns.Add BeforeColumn:=ActiveDocument.Tables(1).Columns(1) ..Rows(1).Range.Cut End With k = 1 For i = 1 To ActiveDocument.Tables(1).Rows.Count - labelcolumns For j = 1 To labelrows ActiveDocument.Tables(1).Cell(i, 1).Range.InsertBefore _ k + (j - 1) * labelcolumns i = i + 1 Next j k = k + 1 i = i - 1 If k Mod labelcolumns = 1 Then k = k - labelcolumns + _ labelcolumns * labelrows Next i ActiveDocument.Tables(1).Sort FieldNumber:="Column 1" ActiveDocument.Tables(1).Rows(1).Select Selection.Paste ActiveDocument.Tables(1).Columns(1).Delete End Sub 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 Arc-is-t wrote: Hello We are using Office 2003. By default when you run the mail merge to labels, it populates the addresses into a label form from left to right then continues on the next row. Is there anyway to have the merge populate the form from top to bottom then move to the right to populate the next coloum? Thank you for any assitance. Sharon |
Reply |
Thread Tools | |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
My mail merge for labels will only update the first 3 labels | Mailmerge | |||
How do I change the order labels are sorted in mail merge? | Mailmerge | |||
Mail merge to continuous labels skips labels between pages | Mailmerge | |||
Word Labels into Mail Merge Labels | Mailmerge | |||
How do I change the size of labels in a mail merge? | Mailmerge |