Solved: user form

[CCkfm2000]

hi all..

what i need is some info on how to get the active printer name to be displayed on a user form.

currently i've got this far

Private Sub Label2_Click()
Label2 = Application.ActivePrinter
End Sub

i need this to be updated when the user form is displayed.

thanks

[lucas]

This uses a funtion from one of Malcolm's KB entries. You will have to change the printer name between the "" in the userform initialize statement to reflect your printer.
see attached:

[lucas]

This works for Activeprinter....sorry I missed it the first time.

Private Sub UserForm_initialize()
Printer = Application.ActivePrinter
Label1.Caption = Printer
End Sub


and it looks like you don't need the funtion....sorry for the confusion I was in a bit of a hurry.

[CCkfm2000]

thats done the trick.

thanks lucas