Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
200to204
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
200to204
200to204
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Druckbereich löschen

Druckbereich löschen
10.01.2003 13:56:21
Stefan
hallo,

ich habe mehrere tabellen in einer datei. bei mnachen wurde ein druckbereich festgelegt, was mir probleme beim drucken macht. wie kann ich auf einen schlag den druckbereich in allen tabellen löschen ???

vielen dank


gruß

stefan

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Druckbereich löschen
10.01.2003 14:00:11
Klaus
Hallo Stefan,

Sub printareaweg()
ActiveSheet.PageSetup.PrintArea = ""
End Sub

Dies löscht den Druckbereich, musst Du nur noch eine for each Schleife basteln, die dann alle Sheets in der Mappe anspricht. Gibt es aber unter Recherche. Muss jetzt weg, Büro zu, endlich Wochenende.
Gruss
Klaus

Re: Druckbereich löschen
10.01.2003 14:02:34
andreas e
hallo steafn

Sub Makro2()
For i = 1 To Worksheets.Count
Sheets(i).PageSetup.PrintArea = ""
Next
End Sub

gruß
andreas e

Re: Druckbereich löschen
10.01.2003 14:08:57
DANKE
.

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige