Seite einrichten dauert leider sehr lange...
16.12.2003 15:09:01
Thomas
Wenn ich mir eine Seite einrichten möchte dauert dies leider sehr lange. Kann man dass irgendwie verhindern?
With ActiveSheet.PageSetup
.LeftMargin = Application.InchesToPoints(0.787401575)
.RightMargin = Application.InchesToPoints(0.787401575)
.TopMargin = Application.InchesToPoints(0.984251969)
.BottomMargin = Application.InchesToPoints(0.984251969)
.HeaderMargin = Application.InchesToPoints(0.4921259845)
.FooterMargin = Application.InchesToPoints(0.4921259845)
.PaperSize = xlPaperA4
.FirstPageNumber = xlAutomatic
.Order = xlDownThenOver
End With
Gruß
Thomas