Microsoft Excel

Herbers Excel/VBA-Archiv

Bestimmte Zeilen/ Spalten nicht mitdrucken

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

  

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




  

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


 

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