Bestimmte Zeilen/ Spalten nicht mitdrucken

Bild

Betrifft: Bestimmte Zeilen/ Spalten nicht mitdrucken
von: raceface
Geschrieben am: 30.07.2008 22:23:23

Hallo,
Ich habe verschiedene Tabellen, aus denen ich per Script nur bestimmte Zeilen und Spalten (z.B. A1-H49+K1-K49) ausdrucken möchte. Ich habe schon ein Makro gebastelt, mit dem ich den Druckbereich festlegen kann, nur leider nicht über mehrere Bereiche. Dann habe ich versuch einfach Spalten auszublenden, die werden aber trotzdem mitgedruckt, wenn sie in dem Druckbereich sind, den ich im Makro festlege.
Hier der Code


Sub drucken()
With Sheets("Rack1")
    Columns("I:K").EntireColumn.Hidden = True
    .PageSetup.PrintArea = Range("H10:L21").Address
    .PageSetup.LeftMargin = Application.InchesToPoints(1)
    .PrintOut
    .PageSetup.PrintArea = ""
    Columns("I:K").EntireColumn.Hidden = False
End With
End Sub


Hat jemand eine Idee?
Danke
Andy

Bild

Betrifft: AW: Bestimmte Zeilen/ Spalten nicht mitdrucken
von: Tino
Geschrieben am: 30.07.2008 22:34:16
Hallo,
mit dem ausblenden sollte es eigentlich funktionieren.
Sind Deine Spalten auch wirklich zum Zeitpunk des Ausdrucks ausgeblendet?
Gruß Tino

www.VBA-Excel.de



Bild

Betrifft: AW: Bestimmte Zeilen/ Spalten nicht mitdrucken
von: raceface
Geschrieben am: 31.07.2008 02:41:33
Ich konnte das Problem dadurch lösen, dass ein Skript erst alle Tabellen durch Verstecken formatiert. Danach kann jede Tabelle per Script problemlos ordentlich gedruckt werden.
Andy

 Bild

Beiträge aus den Excel-Beispielen zum Thema "Bestimmte Zeilen/ Spalten nicht mitdrucken"