Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

How to change parameters in code to enable report to print

Status
Not open for further replies.

palgya

Technical User
Sep 3, 2002
34
0
0
US
Hello all,
I have a form that the user can update info on their clients. What they wanted to be able to do is print individual labels from this form, so I thru a checkbox on the form with a button that when clicked would print these labels. The other twist was that they could also choose how many labels to skip on a full sheet of labels so that they could reuse the sheet and how many of each label to print. Hope this makes sense. Here's my code.

Static Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
Dim intMyPrint As Integer
If PrintCount <= [SkipCounter] And [SkipControl] = &quot;Skip&quot; Then
Me.NextRecord = False
Me.PrintSection = False
intMyPrint = 0
Else
[SkipControl] = &quot;No&quot;
Me.PrintSection = True
Me.NextRecord = True
intMyPrint = intMyPrint + 1
If intMyPrint Mod [RepeatCounter] = 0 Then
Me.NextRecord = True
intMyPrint = 0
Else
Me.NextRecord = False
End If
End If

End Sub

Any help would be helpful.
Thanks in Advance.
Paul
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top