print labels from userform
Try this.
Application.ActivePrinter = "\\ABTAPA1491\P01VAL149107 on Ne06:"
ActiveWindow.SelectedSheets.PrintOut Copies:=Val(Me.Textbox4.Value),
ActivePrinter:= "\\ABTAPA1491\P01VAL149107 on Ne06:", Collate:=True
Hope this helps! If so, let me know, click "YES" below.
--
Cheers,
Ryan
"jeff" wrote:
I'll try this again.
From Userform1, the user enters info in textboxes 1, textbox2 and
textbox3, then he enters a number in textbox4. The user will then
click the PRINT button on the userform.
the info from textboxes 1-3 are entered on Sheet1.
Here's the code to print this info onto a label, using the recorder.
Application.ActivePrinter = "\\ABTAPA1491\P01VAL149107 on Ne06:"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
"\\ABTAPA1491\P01VAL149107 on Ne06:", Collate:=True
The only thing I need is to know is how to apply the value from
textbox4 to the middle line above where it says PrintOut Copies:=1
I want the value of textbox4 to replace the value of 1.
This value will change each time a user runs this.
I know this will probably involve putting the value of textbox4 into
memory, but I don't know the proper syntax for this.
If you know VBA, and understand what I'm asking for, please respond. I
would appreciate it.
Thanks
j.o.
.
|