Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 17:40:39
16.10.2025 17:25:38
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

dyn. Printarea

Forumthread: dyn. Printarea

dyn. Printarea
03.05.2005 13:16:33
Chris
Hi Leute,
ich will in meiner Tabelle, ein dynamisches Printarea anlegen. Hierbei ist die erste Zelle, die Zelle mit dem aktuellen Datum und die letzte Zalle liegt in Spalte "AV" und 60 Zeilen tiefer als die erste Zelle.
Habt ihr ne Idee wie man das in VBA lösen kann?
Gruß
Christoph
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
dyn. Druckbereich ab aktuellem Datum
03.05.2005 21:51:51
Beate
Hallo Christoph,
lege fogendes Makro ins Codefenster "dieseArbeitsmappe". So springt es bei jedem Druckauftrag oder auch bei Seitenansicht an und legt den Druckbereich dynamisch fest:

Private Sub Workbook_BeforePrint(Cancel As Boolean)
Dim myRange As Range
For Each myRange In ActiveSheet.UsedRange
If myRange.Value = Date Then myRange.Select
Next
ActiveSheet.PageSetup.PrintArea = Range(ActiveCell, Cells(ActiveCell.Row + 60, ActiveCell.Column + 48 - ActiveCell.Column)).Address
End Sub

Gruß,
Beate
Anzeige
;

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