Forum: Programmieren allgemein
by gabneo,
11. Mär 2009
selber gelöst :cyclops:
Public Sub Workbook_BeforePrint(Cancel As Boolean)
'Quelle: Kolja Aidam IT-Services Copyright 2009
Dim xelRows As Long, i As Long
Application.ScreenUpdating = False
Forum: Programmieren allgemein
by gabneo,
11. Mär 2009
Dabei kommt nur der Code raus den man oben sieht.
Er Erzeugt dann nur .PageSetup.PrintArea = "$A$1:$S$38076"
aber keinen Code der zeigt welche größe er als Vorlage verwendet hat...
Forum: Programmieren allgemein
by gabneo,
11. Mär 2009
Hallo Delphianer,
ich bin am Verzweifeln. Habe schon sehr lange gegoogelt aber nichts gefunden.
Mein Problem ist: Ich habe in Excel eine Liste mit 501 Seiten und möchte den Druckbereich per Makro festlegen. Nur wie kann man die Seitengröße festlegen? Meine Seiten sind immer genau 76 Zeilen Hoch und 20 Zeilen Breit!
Hört sich einfach an, aber über Einfügen von Pagebreaks (HPageBreak,...