Live-Forum - Die aktuellen Beiträge
Datum
Titel
15.10.2025 16:22:17
Datum ist nicht Datum :(
15.10.2025 15:02:20
Blockpfeile mit Makro gehen nicht mehr nach freigabe
15.10.2025 13:51:13
VBA - Fortschrittsbalken unabhängig von Zellen
15.10.2025 13:31:47
WENN Formel mit zwei Bedingungen über 4 Spalten...
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
540to544
540to544
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Tabellenbereich drucken

Forumthread: Tabellenbereich drucken

Tabellenbereich drucken
30.12.2004 21:29:05
WHN
Hallo Leute,
ich möchte einen Tabellenbereich über ein Makro drucken.
Kann mir Jemand ein Beispiel geben?
Gruß Werner
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Tabellenbereich drucken
th.heinrich
hi Werner,
z.b. so
Option Explicit
Sub druckbereich()
Dim prnt As Variant
prnt = "bitte bereich eingeben"
ActiveSheet.PageSetup.PrintArea = InputBox(prnt)
End Sub
in ein ein Modul eingeben, oder

Private Sub Workbook_BeforePrint(Cancel As Boolean)
Dim prnt As Variant
prnt = "bitte bereich eingeben"
ActiveSheet.PageSetup.PrintArea = InputBox(prnt)
End Sub

ruft den Dialog vor dem Drucken auf.
gruss thomas
Anzeige
AW: Tabellenbereich drucken
Ramses
Hallo Thomas
mit
ActiveSheet.PageSetup.PrintArea = Application.InputBox(prn, Type:=8)
geht es besser, weil du den Bereich markieren kannst :-)
Gruss Rainer
danke fuer den hinweis ot.
th.heinrich
Danke für die Hilfe
30.12.2004 23:57:46
WHN
Danke für die Hilfe, jetzt läuft es.
Viele Grüße
Werner
Anzeige
;

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