Printing a label in a certain area on a report

[Guest]

I created a label report using the label wizard. I open the report using an
Event Procedure. If a user wants to print only 1 label and the sheet he or
she is using only has labels left at the bottom of the sheet, can I pass the
report something that will tell it which specific label to start with or
print on? I was thinking that once the user enters a record, he or she could
just print the label for that record right there. But, there might not always
be a label at the top left corner of the sheet as it is being used. Thanks.

 

[fredg]

I created a label report using the label wizard. I open the report using an
Event Procedure. If a user wants to print only 1 label and the sheet he or
she is using only has labels left at the bottom of the sheet, can I pass the
report something that will tell it which specific label to start with or
print on? I was thinking that once the user enters a record, he or she could
just print the label for that record right there. But, there might not always
be a label at the top left corner of the sheet as it is being used. Thanks.

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 OnPrint event:

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

End Sub
=====

When you are ready to run the label report, it will ask how many to
skip.
Then it will run the report.