I checked the Forum and other sources and couldn
![]() |
Patch reliability is unclear. Unless you have an immediate, pressing need to install a specific patch, don't do it. |
SIGN IN | Not a member? | REGISTER | PLUS MEMBERSHIP |
-
Printing Multiple Labels per Sheet (A2K)
Home » Forums » AskWoody support » Productivity software by function » MS Access and database help » Printing Multiple Labels per Sheet (A2K)
- This topic has 17 replies, 4 voices, and was last updated 18 years, 9 months ago.
Viewing 1 reply threadAuthorReplies-
WSHansV
AskWoody Lounger -
WSAGMCon
AskWoody Lounger -
WSHansV
AskWoody LoungerAugust 20, 2006 at 10:56 am #1025444You could add a Yes/No field ysnPrinted to the table, and base the report on a query that selects the first ten records for which ysnPrinted = No.
In the code used to open the report, check whether there are enough records in the query, and issue a warning if there aren’t.
After the report has been opened, offer the option to set ysnPrinted to Yes.See the attached crude demo.
-
WSAGMCon
AskWoody LoungerAugust 20, 2006 at 12:12 pm #1025446Hans,
Thanks again. I’ll try your version and also attempt to do one where there is no need for the user to say yes or no, but “AUTOMATICALLY” print when it reaches 10. Manual intervention would only be necessary at the end of the whole session when everyone is finished or when the application is closed.
As a point of interest and a bit of forewarning. This is going to be done on a two-drawer printer where one drawer will be selected for labels and the other one for one page Warranty Reports which will be ‘AUTOMATICALLY” printed when generated by pre-determined conditions. Hoo Haw!
Stay tuned.
-
WSAGMCon
AskWoody LoungerAugust 20, 2006 at 12:58 pm #1025452Hans,
Let the games continue.
The records that are being created are based on a query, [qry CNMstr].
The size of the file is continually be incremented by the number of records added, and is currently sitting at 3094.
Based on your code and using my labels:
Private Sub cmdLabels_Click()
Dim intCount As Integer
Dim strSQL As String
intCount = DCount(“*”, “qry CNMstr”)
If intCount = 0 Then
MsgBox “There are no labels to be printed.”, vbInformation
Exit Sub
ElseIf intCount < 10 Then
If MsgBox("There are fewer than ten labels to be printed." & vbCrLf & _
"Do you want to print them anyway?", _
vbQuestion + vbYesNo + vbDefaultButton2) = vbNo Then
Exit Sub
End If
End If
DoCmd.OpenReport "rpt LogIn – Label", acViewPreview
If MsgBox("Do you want to mark the labels as printed?", _
vbQuestion + vbYesNo) = vbYes Then
strSQL = "UPDATE [qry CNMstr] SET ysnPrinted = True"
DoCmd.RunSQL strSQL, True
End If
End SubHad I said Yes,
I would have printed out 3094 labels.
Where did I go wrong?
-
WSHansV
AskWoody Lounger -
WSAGMCon
AskWoody Lounger -
WSladyengr
AskWoody LoungerAugust 21, 2006 at 8:44 pm #1025642Sorry to butt in, but I have had this same issue. I solved it with a Dymo thermal label printer. Set the label report page setup property to print to “specific printer” (meaning the Dymo) and leave the warranty sheet as the LaserJet default printer. This way no 1 person would have to wait for several other people to get their work done before they could get their output. The printers are cheap (especially on eBay). I just replaced one for $80, including shipping. The one I replaced had been in service for 3 years. Pro is never changing ink/toner. Only con I can think of is that the labels do come in a roll – print one and tear it off with the little metal teeth (just like with aluminum foil). If several labels come out in quick succession you actually have to tear or cut the backing paper OR just peel off the label you need.
Hope that helps – sure solved my dilemna years ago!
Kathi -
WSAGMCon
AskWoody LoungerAugust 21, 2006 at 10:26 pm #1025655Kathi!
Thanks kindly for “butting” in. Having been there and done that and solved your similar problem, I appreciate your helping me out. Suggestions and clues like yours are never considered to be “butting” in. I really appreciate your insights. If only I could comment further with respect to these great straight lines thrown my way…..
Seriously, thanks again and cheers,
-
-
-
-
WSMarkLiquorman
AskWoody LoungerAugust 20, 2006 at 10:59 am #1025445-
WSAGMCon
AskWoody LoungerAugust 20, 2006 at 12:17 pm #1025447Mark,
Thanks for the input. Yes, all and sundry have their little front ends ( on the computer ) and all have a button which currently would print one label at at time. All I need do with this little fella is add the “Are you up to 10 yet?” logic. That sounded simple, didn’t it?
Worse case scenario in all of this is some type of label printer that prints out 1 label at a time whenever their record is saved. Certainly not continuous form dot-matrix which is right up their with punched cards, but a laser-like quality printer. Know of any?
Cheers,
-
WSMarkLiquorman
AskWoody LoungerAugust 20, 2006 at 12:50 pm #1025451Actually, I was thinking of a button that would manually print all labels. That is, if they enterred 8 labels and had no more, they would then click the “Print Now” button and all 8 would print-out. They wouldn’t have to do anything when the 10th label was input, the system would automatically print a sheet of labels.
There are are specialty label printers out there that would allow you to economically print 1 label at a time. Labels come on a roll.
-
WSAGMCon
AskWoody LoungerAugust 20, 2006 at 1:05 pm #1025453Sorry Mark,
Once more have I miscontrued you folks due to minimal description. I should have mentioned that I assumed it would be labels on a roll, but providing laser printer-like quality. Sorry about that.
As you can gather by my response to Hans, that the thick is plottening. It would have to be the last labels Not Printed since the last print job. This means of course that I should have put a ” Gee, I’ve already been printed” indicator on my file. I’ve done that somewhere in my distant past, so I’d best go looking for it.
Unless of course you have an easier more logical suggestion.
Thanks again,
-
WSMarkLiquorman
AskWoody Lounger -
WSAGMCon
AskWoody LoungerAugust 20, 2006 at 4:11 pm #1025459 -
WSMarkLiquorman
AskWoody LoungerAugust 20, 2006 at 4:31 pm #1025461No! No! No! When I say a temporary table, I mean a table who contents are temporary. The user has no involvement in this at all. As info for each label is entered, an record is added into the table. Each time an entry is written to this table, you merely have to do a DCount to find out how many records are there. If there are 10, then print labels and Delete contents of table (just pop a msgbox asking user something like “Did labels print OK?” before you actually delete the records).
-
WSAGMCon
AskWoody LoungerAugust 20, 2006 at 4:47 pm #1025463Hi Mark,
Panic easily, don’t I.
It sounds close to an ideal solution. That’s the good news. The bad news is, and I have no problem in admitting this, as this is another of countless areas I’ve never dealt with in using Access, I have absolutely no clue as to how to do this based on some of the code reflected above that I’m dealing with. If it’s not too much to ask, a small bit of code or sample database would be more than appreciated. Sorry about the imposition,
-
-
-
Viewing 1 reply thread -

Plus Membership
Donations from Plus members keep this site going. You can identify the people who support AskWoody by the Plus badge on their avatars.
AskWoody Plus members not only get access to all of the contents of this site -- including Susan Bradley's frequently updated Patch Watch listing -- they also receive weekly AskWoody Plus Newsletters (formerly Windows Secrets Newsletter) and AskWoody Plus Alerts, emails when there are important breaking developments.
Get Plus!
Welcome to our unique respite from the madness.
It's easy to post questions about Windows 11, Windows 10, Win8.1, Win7, Surface, Office, or browse through our Forums. Post anonymously or register for greater privileges. Keep it civil, please: Decorous Lounge rules strictly enforced. Questions? Contact Customer Support.
Search Newsletters
Search Forums
View the Forum
Search for Topics
Recent Topics
-
System Restore and Updates Paused
by
veteran
19 minutes ago -
Windows 10/11 clock app
by
Kathy Stevens
2 hours, 2 minutes ago -
Turn off right-click draw
by
Charles Billow
3 hours, 33 minutes ago -
Introducing ChromeOS M137 to The Stable Channel
by
Alex5723
7 hours, 4 minutes ago -
Brian Wilson (The Beach Boys) R.I.P
by
Alex5723
8 hours, 15 minutes ago -
Master patch listing for June 10, 2025
by
Susan Bradley
8 hours, 41 minutes ago -
Suggestions for New All in One Printer and a Photo Printer Windows 10
by
Win7and10
43 minutes ago -
Purchasing New Printer. Uninstall old Printer Software First?
by
Win7and10
14 hours, 43 minutes ago -
KB5060842 Issue (Minor)
by
AC641
19 hours, 16 minutes ago -
EchoLeak : Zero Click M365 Copilot leak sensitive information
by
Alex5723
21 hours, 48 minutes ago -
24H2 may not be offered June updates
by
Susan Bradley
4 hours, 12 minutes ago -
Acronis : Tracking Chaos RAT’s evolution (Windows, Linux)
by
Alex5723
1 day, 10 hours ago -
June 2025 updates are out
by
Susan Bradley
10 hours, 29 minutes ago -
Mozilla shutting Deep Fake Detector
by
Alex5723
2 days, 1 hour ago -
Windows-Maintenance-Tool (.bat)
by
Alex5723
1 day, 10 hours ago -
Windows 11 Insider Preview build 26200.5641 released to DEV
by
joep517
2 days, 3 hours ago -
Windows 11 Insider Preview build 26120.4250 (24H2) released to BETA
by
joep517
2 days, 3 hours ago -
Install Office 365 Outlook classic on new Win11 machine
by
WSrcull999
2 days, 3 hours ago -
win 10 to win 11 with cpu/mb replacement
by
aquatarkus
1 day, 19 hours ago -
re-install Windows Security
by
CWBillow
2 days, 6 hours ago -
WWDC 2025 Recap: All of Apple’s NEW Features in 10 Minutes!
by
Alex5723
2 days, 10 hours ago -
macOS Tahoe 26
by
Alex5723
2 days, 4 hours ago -
Migrating from win10 to win11, instructions coming?
by
astro46
15 hours, 59 minutes ago -
Device Eligibility for Apple 2026 Operating Systems due this Fall
by
PKCano
1 day, 19 hours ago -
Recommended watching : Mountainhead movie
by
Alex5723
1 day, 20 hours ago -
End of support for Windows 10
by
Old enough to know better
10 minutes ago -
What goes on inside an LLM
by
Michael Covington
1 day, 14 hours ago -
The risk of remote access
by
Susan Bradley
9 hours, 56 minutes ago -
The cruelest month for many Office users
by
Peter Deegan
59 minutes ago -
Tracking protection and trade-offs in Edge
by
Mary Branscombe
2 days ago
Recent blog posts
Key Links
Want to Advertise in the free newsletter? How about a gift subscription in honor of a birthday? Send an email to sb@askwoody.com to ask how.
Mastodon profile for DefConPatch
Mastodon profile for AskWoody
Home • About • FAQ • Posts & Privacy • Forums • My Account
Register • Free Newsletter • Plus Membership • Gift Certificates • MS-DEFCON Alerts
Copyright ©2004-2025 by AskWoody Tech LLC. All Rights Reserved.