Mit welcher Befehlskette kann man erreichen dass, eine Funktion alle Sekunden ausgeführt wird? (Ich will, dass sich die Tabelle alle Sekunden aktualisiert)
Danke
Greetz
Sub Auto()
Sheets("Berechnung").Range("A2").FormulaR1C1 = "=NOW()"
Application.OnTime Now + TimeValue("00:00:01"), "auto"
End Sub