Makro-Durchlauf schneller möglich ?
04.04.2004 10:16:51
Günther
bitte um eure Hilfe
bin in VBA nicht sehr versiert, daher meine Frage:
kann man unteres Makro anders formulieren, das es schneller geht (dauert immens lange)
Dim L As Integer
For L = 40 To 514
Cells(L, 164) = 0
Cells(L, 165) = 0
Cells(L, 166) = 0
Cells(L, 167) = 0
Cells(L, 168) = 0
Cells(L, 170) = 0
Cells(L, 179) = 0
Cells(L, 180) = 0
Cells(L, 181) = 0
Cells(L, 182) = 0
Cells(L, 183) = 0
Cells(L, 184) = 0
Cells(L, 185) = 0
Cells(L, 186) = 0
Cells(L, 195) = 0
Cells(L, 196) = 0
Cells(L, 197) = 0
Cells(L, 198) = 0
Cells(L, 199) = 0
Cells(L, 200) = 0
Cells(L, 201) = 0
Cells(L, 202) = 0
Cells(L, 203) = 0
Cells(L, 204) = 0
Cells(L, 208) = 0
Next
Wäre für einen Tip dankbar (obige Felder müssen am Tagesende auf 0 gestellt werden, dienen am nächsten Tag als neuer Berechnungsfelder - der Zusatz "clearcontents" hat immer Fehlerhafte Werte verursacht)
mit lieben Grüßen
Günther