Live-Forum - Die aktuellen Beiträge
Datum
Titel
06.10.2025 19:15:29
Mit Uhrzeit rechnen
06.10.2025 18:25:16
Einträge einer Tabelle über Userform ändern
06.10.2025 17:03:04
Makro csv-Datei laden und Int.Tabelle anlegen
06.10.2025 13:07:55
Excel-Blatt automatisch aktualisieren
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
384to388
384to388
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Verstecktes Tabellenblatt drucken

Forumthread: 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
Anzeige

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)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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