Printing on a network printer

[schea061]

I am trying to create a code for printing on clicking a button on excel to print on the following network printer but i am not managing - \\P305762\IDUDOTLP2824

Could you please help ?

 

[rpaulson]

maybe this will help you.

i use this code to create a list of printer that are on the computer.

Sub Printer_List()

Dim x As Long, Printers As Object, arrPrinters As Variant
  With CreateObject("WScript.Network")
    For x = 1 To .EnumPrinterConnections.Count Step 2
     Cells((x + 1) / 2, "A") = .EnumPrinterConnections(x)
    Next
  End With

End Sub

I then use this list as a data validation range.
then the user can select any printer they want.

hth,

Ross