Funktion zur Zeit der Neuberechnung Zeit der Arbeitsmappe

Question

Ich bin für eine eingebaute Funktion oder vielleicht ein VBA-Segment suchen, den mir die Wiederberechnungszeit für eine Tabelle gibt die Berechnung

Dank vervollständigen!

Answer 1

Option explicit 
Function CalculationTime() as date 
Dim Start as date 
Start = now 
Application.calculate 
Do until application.calculationstate = xldone 
Doevents 
Loop 
CalculationTime = now - Start 
End function 

Ungetestet und geschrieben auf Handy, sorry für schlechte Formatierung. Gibt ein Datum (Zeitdauer) zurück, aber Sie könnten formatieren (CalculationTime, "mm: ss"), um als Zeichenfolge zurückzugeben, oder Funktion ändern, um als Double zurückzukehren, dann mit 24 * 60 * 60 multiplizieren, um Sekunden zu erhalten. Wenn Sie mehr Genauigkeit wollten, könnten Sie Ticker/Timer-Funktion verwenden.