Printing Labels on Avery 5160?? Help Please!

[Joshua Miller]

I ma printing on Avery 5160 labels and I would like to
select where to start printing on the sheet or type in the
print start position. Thanks! Questions or answers email
please as I might not use this newsgroup right! Thanks!

Joshua Miller
(e-mail address removed)

 

[Bill Stanton]

Joshua,

I've enclosed below Steve Schapel's reply to your question, which I
had a few months ago.... it works perfectly.
Bill Stanton

=============================================

Courtesy of Fred Gutkind...

"The following will permit skipping used label positions.
First make sure your label report is properly printing a full sheet of
labels.

Then add a Report Header to your label report.
Add 2 text boxes to the Header.
1) Name one SkipControl
Leave it's control source unbound

2) Name the other SkipCounter
Set it control Source to =[Skip How Many?]

Now code the Report Header Format event as below:

Private Sub ReportHeader_Format(Cancel As Integer, FormatCount As
Integer)
[SkipControl] = "Skip"
Cancel = True
End Sub

Next code the Detail Print event:

Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
If PrintCount <= [SkipCounter] And [SkipControl] = "Skip" Then
Me.NextRecord = False ' Skip missing labels on sheet
Me.PrintSection = False
Else
[SkipControl] = "No" ' Print labels
Me.PrintSection = True
Me.NextRecord = True
End If
End Sub

When you run the report it will ask how many labels to skip (enter 0
for none). Then it will run, printing the first label at the
indicated position +1. "

- Steve Schapel, Microsoft Access MVP