ich habe in Excel 8 eine benutzerdefinierte Funktion erstellt, die einen vorgegebenen Bereich durchsucht und immer wenn in der Zelle darüber Zins oder Bonus steht, werden die Beträge summiert:
Function Zinsen(Bereich As Range)
For Each Zelle In Bereich
If Left(Zelle.Offset(-1, 0), 4) = "Zins" _
Or Left(Zelle.Offset(-1, 0), 5) = "Bonus" Then
Zinsen = Zinsen + Zelle
End If
Next Zelle
End Function
https://www.herber.de/bbs/user/16040.xls
Da sich die Anzahl der Spalten des Bereichs ständig ändert, möchte ich für den Bereich gleich die ganzen Zeilen vorgeben. Nun berechnet Excel bei jeder Eingabe in das Blatt die Zellen neu, was wohl auch sein muss, damit sich das Ergebnis in der Funktion ändert. Die Zellberechnung dauert aber bei einem 1GHz PIII jedesmal einige Sekunden. Und je größer die Bereiche, um so länger dauert die Berechnung.
Kann man die Funktion irgendwie schneller machen?
Danke im Voraus für die Hilfe
Gruß Stephan