Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Falsche Seite wird gedruckt

Forumthread: Falsche Seite wird gedruckt

Falsche Seite wird gedruckt
24.08.2017 23:24:09
Jonas
Hallo Leute,
grübel schon länger an dieser Stelle.
Problem ist dass nicht die Seite von Ausdruck gedruckt wird sondern die Seite von der das Makro gestartet wurde.
Wo liegt mein Fehler? :(
Sub Ausdruck()
Dim wksAusdruck As Worksheet
Set wksAusdruck = Workbooks("Ausdruck.xls").Worksheets("Seite9")
Application.ScreenUpdating = False
With wksAusdruck
ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=1, ActivePrinter:=" _
Drucker3", Collate:=True
End With
End Sub

Liebe Grüße
Jonas
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Falsche Seite wird gedruckt
24.08.2017 23:44:03
onur
wksAusdruck.Select
schon probiert?
AW: Falsche Seite wird gedruckt
25.08.2017 06:44:11
Werner
Hallo Jonas,
lass doch das ActiveWindow.SelectedSheets weg. So druckst du immer das momentan aktuelle Sheet, und das ist halt nun mal das, auf dem du dich gerade befindest, aus.
Public Sub Ausdruck()
Dim wksAusdruck As Worksheet
Set wksAusdruck = Workbooks("Ausdruck.xls").Worksheets("Seite9")
Application.ScreenUpdating = False
With wksAusdruck
.PrintOut From:=1, To:=1, Copies:=1, ActivePrinter:="Drucker3", Collate:=True
End With
End Sub
Gruß Werner
Anzeige
Danke Werner .. das war es! owT
25.08.2017 22:46:42
Jonas
.
Gerne u. Danke für die Rückmeldung. o.w.T.
26.08.2017 22:37:25
Werner
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige