fehler beim kompilieren
30.07.2002 17:46:39
djobst
Mit der folgenden anweisung soll es möglich werden,mehrere Drucker direkt aufzurufen.
aber schon nach der ersten zeile erscheint eine fehlermeldung "bezeichner".
Ich komme da also nicht weiter, habe aber auch zu wenig routine. was läuft falsch?
hier also:
Sub danke für eure stellungnahme.
Dim strAktDrucker As String
strakt drucker= application.Active Printer
Active sheet.Printout.ActivePrinter:="
Application.ActivePrinter = strAktDrucker
End Sub