labels

  • Thread starter Thread starter Tony
  • Start date Start date
T

Tony

I am using Access 2000. Is it possible either to skip
printing specific labels in a database? Also is it
possible to multi-print a WHOLE sheet of labels with the
ONE specified address?
 
I have Access 2002 but had Access 2000 also. You can skip
the printing and only select the ones you want. You have
to remember that it change alittle with XP. But you go
through the Wiard in Word and it walk throught the steps
one by one. The very first thing it will you what do you
want to do and you say labels,then ask you type(name
Avery 8160 or what ever you have) of labels,then it ask
you what data base then it ask you to select the people.
It is set at a dauft that everyone in the data base will
be selected. If you want to choose to take them out then
just uncheck the box next to the person you don't want to
make a label for. Then to to the next set. Also on the
multi-print on a whole sheet you can do that to. In XP
then main you have to worry about is doing that first box
correctly and you update along the side and all your box
will have all the field in it and then it will say
something like view labals and it will fill the field
with all the person and there addresses. I have work with
Access and have all address phone numbers and everything
right there. I update the labels ever so offen. I just
did over 320 for wife. If you are still having trouble
please let know. I learned on my own and it took awhile
but I got it.
 
I am using Access 2000. Is it possible either to skip
printing specific labels in a database? Also is it
possible to multi-print a WHOLE sheet of labels with the
ONE specified address?
Click to expand...
 
I am using Access 2000. Is it possible either to skip
printing specific labels in a database? Also is it
possible to multi-print a WHOLE sheet of labels with the
ONE specified address?
Click to expand...

This will permit you to enter the number of times to repeat the
labels,
as well as skip missing label positions on an already used sheet.

First make sure your label report properly prints 1 label per record.

Then add a Report Header to the label report.
Add 3 unbound text boxes to the header.
1) Set the Control Source to:
= [Skip how many]
Name this control SkipCounter
2) Leave the second control unbound.
Name this control SkipControl
3) Set the third control's Control Source to:
=[Repeat how many]
Name it RepeatCounter

Next code the Report Header OnFormat event:

Private Sub ReportHeader_Format(Cancel As Integer, FormatCount As
Integer)
[SkipControl] = "Skip"
Cancel = True
End Sub
=======
Now code the Detail OnPrint Event:
(Note that intMyPrint is Static!!)

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

End Sub
=========

When you run the report, it will ask how many labels to skip, then how
many times to repeat each label.

Hope this has helped.
 
Back
Top