Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Druckbereich automatisch anpassen

Druckbereich automatisch anpassen
05.07.2004 08:23:24
Martin
Guten Morgen und Helaaaas,
ich lasse mir per Makro eine Datei mit Daten aus einer anderen erstellen und möchte nun gleichzeitig die neu erstellte Datei in das richtige Format bringen. Seitenränder einstellen usw. funktinioniert auch ohne Probleme. Da ich aber je nach Urpsrungsdatei eine unterschiedliche Anzahl von Daten in die neue transportiere, ergibt sich jedesmal das Problem, dass der Druckbereich unterschiedlich ausfällt.
Kann man per VBA realisieren, dass Excel automatisch bis zum letzten Rahmen bzw. letzten Wert den Druckbereich anpaßt? Dabei bitte beachten, dass nicht immer alle Zeilen und Spalten mit Inhalt befüllt sein müssen, d.h. Excel muss suchen, in welcher max Spalte bzw. Zeile IRGENDWANN ein Wert vorkommt.
Danke und Gruß
Martin
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Druckbereich automatisch anpassen
P@ulchen
Hi Martin,
probier folgendes:


Sub Letzte()
Dim LZeile%, LSpalte%
LZeile = RealLastCell(ActiveSheet).Row
LSpalte = RealLastCell(ActiveSheet).Column
Set druckrange = Range(Cells(1, 1), Cells(LZeile, LSpalte))
ActiveSheet.PageSetup.PrintArea = druckrange.Address
End Sub
Gruß aus Leipzig
P@ulchen
Das Forum lebt auch von den Rückmeldungen !
Anzeige
Danke an P@ulchen!!! oT
05.07.2004 11:07:42
Martin
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
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