473,326 Members | 2,110 Online
Bytes | Software Development & Data Engineering Community
Post Job

Home Posts Topics Members FAQ

Join Bytes to post your question to a community of 473,326 software developers and data experts.

Printing Labels

I have a database which will be printing out labels for SMALL test tubes
(1/4" high). We have yet to find a reasonably-priced printer (labelwriter)
which can effectively print this on ROLLS of labels....due to slippage, soon
you have the printout missing the label. So we are thinking that we have to
use sheets of labels.

HOWEVER, one job may need 15 labels, another may need 8, etc.

Does anyone have a solution for how to set this up in Access to minimize
wasting labels on the sheets. If the last job leaves off 1/2 down column
one, how can we tell the printer to start the next job down 1/2 column? Or
is it just best to export the data and manage it through MSWord somehow?

Any suggestions would be appreciated.

Andi

Nov 12 '05 #1
2 2959
On Tue, 20 Jan 2004 17:04:47 -0500, "DBQueen" <ir******@bellsouth.net>
wrote:
I have a database which will be printing out labels for SMALL test tubes
(1/4" high). We have yet to find a reasonably-priced printer (labelwriter)
which can effectively print this on ROLLS of labels....due to slippage, soon
you have the printout missing the label. So we are thinking that we have to
use sheets of labels.

HOWEVER, one job may need 15 labels, another may need 8, etc.

Does anyone have a solution for how to set this up in Access to minimize
wasting labels on the sheets. If the last job leaves off 1/2 down column
one, how can we tell the printer to start the next job down 1/2 column? Or
is it just best to export the data and manage it through MSWord somehow?

Any suggestions would be appreciated.

Andi


Andi,
It's not clear from your post whether the label is to be printed in
batches, some 15 of, some 8 of, etc., or whether the label is to be
printed 15 times only.

I'll assume the second scenario. You have one label (or many) to be
printed and the user will input the number of times to repeat them on
the label sheet.
***
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.

It is designed to have all the labels in the Report's Recordsource
printed, starting at Page 1, and continuing through each page of
labels until the end.

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.

--
Fred

Please reply only to this newsgroup.
I do not reply to personal e-mail.
Nov 12 '05 #2
Thank you SO MUCH, Fred. I haven't had a chance to test it, but it looks
like this will do the trick. I was asking just about printing 1 of each
label and making sure that you start with the NEXT label when you start
printing the next batch, but they may want 2 of each label sometimes, so
that's great that you covered it all.

I assume PrintCount counts the items as they prepare to print?

Thanks!

Andi

<fr***@example.invalid> wrote in message
news:2r********************************@4ax.com...
On Tue, 20 Jan 2004 17:04:47 -0500, "DBQueen" <ir******@bellsouth.net>
wrote:
I have a database which will be printing out labels for SMALL test tubes
(1/4" high). We have yet to find a reasonably-priced printer (labelwriter)which can effectively print this on ROLLS of labels....due to slippage, soonyou have the printout missing the label. So we are thinking that we have touse sheets of labels.

HOWEVER, one job may need 15 labels, another may need 8, etc.

Does anyone have a solution for how to set this up in Access to minimize
wasting labels on the sheets. If the last job leaves off 1/2 down column
one, how can we tell the printer to start the next job down 1/2 column? Oris it just best to export the data and manage it through MSWord somehow?

Any suggestions would be appreciated.

Andi


Andi,
It's not clear from your post whether the label is to be printed in
batches, some 15 of, some 8 of, etc., or whether the label is to be
printed 15 times only.

I'll assume the second scenario. You have one label (or many) to be
printed and the user will input the number of times to repeat them on
the label sheet.
***
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.

It is designed to have all the labels in the Report's Recordsource
printed, starting at Page 1, and continuing through each page of
labels until the end.

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.

--
Fred

Please reply only to this newsgroup.
I do not reply to personal e-mail.

Nov 12 '05 #3

This thread has been closed and replies have been disabled. Please start a new discussion.

Similar topics

2
by: qumpus | last post by:
My program right now generates USPS style shipping label using System.Drawing.Graphics. It works fine except that the printer prints really slowly. I want to make my program take advantage of true...
3
by: Grim Reaper | last post by:
I print mailing labels out of Access 2000 databases about 3 to 4 times a week. I have been having problems with one thing since I have been printing mailing labels. I print mailing labels by...
4
by: Arif | last post by:
I C# code prints very slow as compared to a third party barcode printing software. That software prints approximately 10 labels in 2 seconds while my C# code prints 10 labels in 5 to 6 seconds. And...
6
by: Rand | last post by:
Hello anyone, Situation: I want to print 1 or x mailing continuous form labels 1" X 3.5" then change to a different name and print again. Everything works fine except for problem below. ...
3
by: Mika M | last post by:
Hi all! I have made an application for printing simple barcode labels using PrintDocument object, and it's working fine. Barcode printer that I use is attached to the computer, and this...
6
by: MJ | last post by:
Is it possible to print varying numbers of labels from Access?
6
by: Ron | last post by:
Hi, I know Access allows for easy construction of a report setup to print labels from a table/query, etc. I've done that one. It works pretty well for what I need. However, is there an...
11
by: fieldling | last post by:
I have a query which I view through a form. Due to problems with the label wizard printing to a dot-matrix printer I have some code to print out a single label when a command button is clicked. This...
5
by: Ron | last post by:
Hi All, I've got a report that prints mailing labels. It utilizes a routine that asks the number of labels to skip, the number of each label to print, and then prints. It works really well on...
0
isladogs
by: isladogs | last post by:
The next Access Europe meeting will be on Wednesday 6 Mar 2024 starting at 18:00 UK time (6PM UTC) and finishing at about 19:15 (7.15PM). In this month's session, we are pleased to welcome back...
1
isladogs
by: isladogs | last post by:
The next Access Europe meeting will be on Wednesday 6 Mar 2024 starting at 18:00 UK time (6PM UTC) and finishing at about 19:15 (7.15PM). In this month's session, we are pleased to welcome back...
0
by: ArrayDB | last post by:
The error message I've encountered is; ERROR:root:Error generating model response: exception: access violation writing 0x0000000000005140, which seems to be indicative of an access violation...
1
by: PapaRatzi | last post by:
Hello, I am teaching myself MS Access forms design and Visual Basic. I've created a table to capture a list of Top 30 singles and forms to capture new entries. The final step is a form (unbound)...
1
by: CloudSolutions | last post by:
Introduction: For many beginners and individual users, requiring a credit card and email registration may pose a barrier when starting to use cloud servers. However, some cloud server providers now...
1
by: Defcon1945 | last post by:
I'm trying to learn Python using Pycharm but import shutil doesn't work
1
by: Shællîpôpï 09 | last post by:
If u are using a keypad phone, how do u turn on JavaScript, to access features like WhatsApp, Facebook, Instagram....
0
by: af34tf | last post by:
Hi Guys, I have a domain whose name is BytesLimited.com, and I want to sell it. Does anyone know about platforms that allow me to list my domain in auction for free. Thank you
0
by: Faith0G | last post by:
I am starting a new it consulting business and it's been a while since I setup a new website. Is wordpress still the best web based software for hosting a 5 page website? The webpages will be...

By using Bytes.com and it's services, you agree to our Privacy Policy and Terms of Use.

To disable or enable advertisements and analytics tracking please visit the manage ads & tracking page.