Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Anzeige
Inhaltsverzeichnis

Falsche Seite wird gedruckt

Forumthread: Falsche Seite wird gedruckt

Falsche Seite wird gedruckt
25.08.2017 01: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
25.08.2017 01:44:03
onur
wksAusdruck.Select
schon probiert?
AW: Falsche Seite wird gedruckt
25.08.2017 08: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
26.08.2017 00:46:42
Jonas
.
Gerne u. Danke für die Rückmeldung. o.w.T.
27.08.2017 00:37:25
Werner
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
14.05.2026 09:50:42
13.05.2026 19:14:18