Anzeige
Archiv - Navigation
384to388
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
384to388
384to388
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Verstecktes Tabellenblatt drucken

Verstecktes Tabellenblatt drucken
18.02.2004 09:07:36
Eizinger Michael
Hallo alle zusammen
Kann man eigentlich ein verstecktes Tabellenblatt (Tabelle1) drucken ohne das man es sichtbar macht?

Private Sub CommandButton1_Click()
ActiveWindow.SelectedSheets.PrintOut Copies:=1
End Sub

Vielleicht kann mir jemand helfen.
Danke
Michael

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Verstecktes Tabellenblatt drucken
18.02.2004 09:44:53
AndreasS
Morgen Michael,
man muss das Tabellenblatt sichtbar machen (aber nicht für den Anwender-> application.screenupdating = false).
So müßte es gehen:

Sub Drucken()
'Bildschirm aktualisierung ausschalten...
Application.ScreenUpdating = False
Sheets(1).Visible = -1
'kopieren...
Sheets(1).Copy After:=Sheets(Sheets.Count)
Sheets(1).Visible = 2
'ausdrucken...
Sheets(Sheets.Count).PrintOut
'Meldungen unterdrücken
Application.DisplayAlerts = False
'Kopie löschen
Sheets(Sheets.Count).Delete
Application.ScreenUpdating = True
End Sub

Gruß Andreas
Anzeige
Danke Andreas
18.02.2004 09:48:26
michael
Danke
Da wäre ich in hundert Jahren nicht draufgekommen.
Gruß
Michael
Danke für die Rückmeldung
18.02.2004 10:10:42
AndreasS
Gruß Andreas

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige