Printing

[DBaker7777]

I have created a database. On the Welcome form the user selects a printer from a combobox. The combo box contains a list of printers available on the users PC. That part works fine; however when I select Dymo on my PC the label prints out perfectly on 1 label. When I go to a different PC and select Dymo to print it prints bits and pieces of the same data over 18 labels and not the 1. I have searched high and low for an answer. The report is set up to print on Default Printer. The model of Dymo is the only thing that might be different on the users PC (For instance Dymo Turbo 400 vs. Dymo Turbo 300). Any help would be greatly appreciated. Thank you

[ranman256]

If layout is different on the 2 printers then you may have to design a report to print specifically to Turbo400, and 1 to Turbo300 (and NOT to default printer)

[DBaker7777]

If layout is different on the 2 printers then you may have to design a report to print specifically to Turbo400, and 1 to Turbo300 (and NOT to default printer)

Even though the labels are the exact same size and name? Is there any work around? The issue will be if I do not know what printer they have. There will be over 300 users.

[davegri]

Have you tried it with both of the printers on your PC, attached one at a time, to see what happens there? Maybe you can solve the problem by investigating that scenario.

[Bulzie]

Could you set the report to print to those specific printers instead of default. Go to Page setup, Page tab, Use Specific Printer. On why it is printing differently, I have used those printers and same thing, had 2 PCs trying to use it and sometimes it would just work different on each PC.

[DBaker7777]

The problem is not everyone has a Dymo some have a Zebra and some need to create a PDF to print so I have created all those reports based on what printer is selected in the combobox of available printers on their pc. In my area alone I have users with 3 different models of Dymo printers. If I set it to a Specific Printer I get that message "Document was previously formatted for the printer ....". This is driving me nuts...this is the last piece I need to complete this project.

[DBaker7777]

Ok it seems to change the paper size when you go to a different PC. Is it possible to program the paper size for the report so it is I don't have to change it manually on every single PC?

[Bulzie]

Paper size should be set in the Page setup of the report. Check to make sure they are correct there. Not sure if you can program paper size on a report when it runs.

[DBaker7777]

Will the paper size change if it is on a different pc or will it stick to the size I select on my PC?

[Bulzie]

Should be saved in the Access program so should be same no matter what PC I would think.

[DBaker7777]

Ok I tried and because the user has to select the Printer from the combobox it does not save the Paper Size. I need it to if the user selects Dymo to default to the "Shipping Label" Page size before printing. Like I said I can do it manually but then when I roll this out I would have to update 300+ PC's.

[davegri]

Screen.ActiveReport.Printer = application.Printers(strPrinter)

You can do this after the report is opened...
Initialize strPrinter with the printer name.
You might have to create a table with all 300 users and define there which printer they should use.
You probably already have a username login table. You could put the default printer there.

Thinking more...
After a user logs in, you could show a form to let the user select the default dymo printer to use from the list of his printers.
After the printer name is selected and stored, you don't show that form again.
Then you use that printer name as in the code above, via a dlookup.

[DBaker7777]

I gave this a try and everything worked until I logged on to an alternate PC. The label name which Access assigned a number to changed. I was hoping I could just put the label name from Dymo in .PaperSize="30256 Shipping", but that also didn't work. I have searched high and low on this matter and just cannot find anything on this or why the paper size changes numbers from PC to PC even though it is the same label.

Private Sub Form_Current()
With Forms!frmboxlabeldymo.Printer
  
 .TopMargin = 57.6
 .BottomMargin = 80.64
 .LeftMargin = 335.52
 .RightMargin = 86.4
 .PaperSize = 224 'This works on my PC, but the number seems to change when I logon to an alternate PC
 End With
DoCmd.PrintOut
End Sub

[Bulzie]

Maybe try using a variable?

Private Sub Form_Current()

Dim vPaperSize as Integer
vPaperSize = 224

With Forms!frmboxlabeldymo.Printer

.TopMargin = 57.6
.BottomMargin = 80.64
.LeftMargin = 335.52
.RightMargin = 86.4
.PaperSize = vPaperSize

End With
DoCmd.PrintOut
End Sub

[DBaker7777]

Worked on my PC, but when I went to another PC it printed 4 labels instead of 1 and did not print on the correct Dymo Label type. The papersize of the label on the PC I just tried was 221, but remained 224 on mine.

Maybe try using a variable?

Private Sub Form_Current()

Dim vPaperSize as Integer
vPaperSize = 224

With Forms!frmboxlabeldymo.Printer

.TopMargin = 57.6
.BottomMargin = 80.64
.LeftMargin = 335.52
.RightMargin = 86.4
.PaperSize = vPaperSize

End With
DoCmd.PrintOut
End Sub