Werte einsetzen
18.07.2013 19:40:49
Lorenz
mit untenstehenden Codeschnipsel werden benannte Formeln in die betroffenen Zellen eingesetzt.
Hier der Code:
For i = 3 To a
With ThisWorkbook.Sheets(3)
.Cells(2, 13) = "=benannteFormel1"
.Cells(i, 13) = "=benannteFormel2"
.Cells(i, 14) = "=benannteFormel3"
.Cells(i, 15) = "=benannteFormel4"
USW....
End With
Next i
Die Formel der Zelle wir durch den Wert ersetzt(mit Value=Value).
Jetzt die Frage:
Ist es sinnvoller(schneller) mittels Schleife oder soll es nach dem Motto:
with .Cells(2, 13)
.Value "=benannteFormel1"
.Value=.Value
if .Value = 0 then .Value=""
end with
PS.: die Formeln befinden sich in ca.: 9000 Zellen
Gruß
Lorenz