VBA Excel: De epsonprinter selecteren

  • Onderwerp starter Onderwerp starter Thee
  • Startdatum Startdatum
Status
Niet open voor verdere reacties.

Thee

Gebruiker
Lid geworden
4 apr 2001
Berichten
73
Ik heb een programma, wat alleen op een epsonprinter mag printen, maar heb problemen met uitlezen van de beschikbare printers.

'Set the specified printer driver as the "default printer."
For Each prnPrinter In ?.Printers
If LCase(Left(prnPrinter.DeviceName, 5)) = "epson" Then
Application.ActivePrinter = prnPrinter
msgbox "Epsonprinter gevonden."
Exit For
End If
Next

Wat moet er op "?.Printers" staan? Wie kan mij helpen?
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan