Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
140to144
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
140to144
140to144
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

alle Arbeitsmappen formatieren und drucken?

alle Arbeitsmappen formatieren und drucken?
26.07.2002 21:20:24
Steve
Hallo zusammen,

ich möchte gerne das folgende Makro von Gerd erweitern (https://www.herber.de/forum/messages/140516.html). Es soll alle Tabellenblätter formatieren (Spaltenbreite optimal, Querformat) und möglichst die Tabellenbezeichnung in der linken Kopfzeile wiedergeben. Dann sollen alle Tabellenblätter mit einem weiteren Makro ausgedruckt werden. Geht das ?

Vielen Dank
Steve

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

Betreff
Datum
Anwender
Anzeige
Re: alle Arbeitsmappen formatieren und drucken?
28.07.2002 18:28:46
Gerd
Hallo Steve,

Sub DruckBlaetterQuer()
For Each Blatt In Sheets
With Blatt
.Cells.EntireColumn.AutoFit
With .PageSetup
.LeftHeader = Blatt.Name
.Orientation = xlLandscape
End With
.PrintOut
End With
Next Blatt
End Sub
macht das Gewünschte in einem Makro.

Gruß
Gerd

Vielen Dank...
28.07.2002 19:51:53
Steve
Dank Dir.

Steve

Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige