Choosing starting label

[RolandB]

I can have a single address label printed from Word (manual address entry or
select from Contacts) and be able to specify the 'starting' row and column.
The nice thing of this feature is that I can use the same sheet over and over
until all the labels are used up. I can start at the top or bottom also!
Does anyone know how to specify the starting point for a 'label' mailmerge
with multiple labels. I know I can edit my Excel database and put in
'blanks' to move down the page but would rather be able to say to start on
Row n and Column m and then have it continue for the rest of the sheet and
flow to R1 C1 if it flows over!

 

[Doug Robbins - Word MVP]

The only way to do it is to insert the necessary number of blank records
into the datasource to force the first record with data to be printed on the
first available label.

--
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

 

[Graham Mayor]

I feel another macro coming on

--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP


<>>< ><<> ><<> <>>< ><<> <>>< <>><<>

 

[RolandB]

I probably will not be the one to do the macro bit but certainly I could
build a case for cost efficiency. Some software I'm dealing with does it and
it really is cost effective! Thank you Doug and Graham for your time!
Roland

 

[Doug Robbins - Word MVP]

Here it is:

Dim MMMDoc As Document
Dim dsource As Document
Dim dtable As Table
Dim i As Long, j As Long
Set MMMDoc = ActiveDocument
With MMMDoc.MailMerge
If .MainDocumentType = wdMailingLabels Then
If .State = wdMainAndDataSource Then
Set dsource = Documents.Open(.DataSource.Name)
Set dtable = dsource.Tables(1)
i = InputBox("Enter the number of labels that have already been
used on the sheet.", "Set Starting Label")
If IsNumeric(i) Then
With dtable
For j = 1 To i
.Rows.Add BeforeRow:=.Rows(2)
Next j
End With
End If
.Destination = wdSendToNewDocument
.Execute
End If
End If
End With
dsource.Close wdDoNotSaveChanges

It is intended to be run after the main document is set up and ready to be
run. For XP and later, it could be incorporated into the add-in used for
mailmerging to separate documents and modified slightly so that it first
asked if you wanted to start from the first label on the sheet. The one
add-in could then be used for both purposes.

I'll get around to making that modification later.
--
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

 

[Sandie Scrivens]

Maybe you need to think about getting out more! Use complete sheets for
merging and use your part sheets for youe single labels!