Printing Labels

[Dar]

For the most part I know how to set up and print labels, however, if I have a
sheet of labels in printer that is 3 columns across and 10 rows down and I
want to print the 9th label, counting 1,2,3
4,5,6
7,8,9
only, how do I do that.
The reason being, if I only need a couple names at a time printed, I don't
want to waste all the other labels, so want to be able to pick the label I'm
printing to.
Any solutions out there?

 

[Arvin Meyer [MVP]]

In his book, Access Developer's Handbook, Ken Getz has written some code,
which I cannot share because of copyright, to handle that exact situation.
You can find the book at:

http://www.amazon.com/Access-2002-D...3753455?ie=UTF8&s=books&qid=1191435359&sr=8-1

 

[fredg]

For the most part I know how to set up and print labels, however, if I have a
sheet of labels in printer that is 3 columns across and 10 rows down and I
want to print the 9th label, counting 1,2,3
4,5,6
7,8,9
only, how do I do that.
The reason being, if I only need a couple names at a time printed, I don't
want to waste all the other labels, so want to be able to pick the label I'm
printing to.
Any solutions out there?

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.

 

[Wayne-I-M]

Just a thought - have you tried removeing 8 lables from a 9 lable sheet and
then running it through the printer again.

It "may" work a few times but the problems you will have are not worth a few
extra sheets of lables that you may waste

If you have a lexmark (or simlar) that use heat to transfer the image you
are going to spend a lot of time (and maybe money) un-blocking the feeder
tray - or even worse the toner rollers (about £120 - $250 each)

I would just accept that this is one time when a few pennies extra on lables
wasted are really worth the cost.

As I said - just a thought.