cells.select langsam
07.04.2008 15:11:00
Heinzs
mit folgendem Code lösche ich den Inhalt eines Sheets:
sheets("Test").select
if activesheet.autofiler then cells.autofilter
rows ("1:1048576").select
with selection.font
.name = "Arial"
.fontsize="Normal"
.size=10
.strikethrough=false
.superscript=false
end with
cells.select
selection.clear.contents
selection.removesubtotals
Unter Excel 2003 läuft das ganze auch recht performant ab; unter Excel 2007 (egal ob Kompatibilitätsmode oder 2007er Modus) ist das ganze eine mehrstündige Angelegenheit.
Gibt es eine bessere (=schnellere Möglichkeit) unter Excel 2007 im 2007er Modus Sheetinhalte zu löschen?
Danke für Hilfe!
Heinz