Hallo,
hab dir mal ein Makro erstellt, zum aktualisieren einer freigegebener Arbeitsmappe, konnte das Makro für mehrere Anwender selber nicht testen.
In ein Modul einfügen:
Private t As Boolean
Sub starten()
t = True
zeit = Time + TimeSerial(0, 0, 10) 'Zeit ändern Std, Min, Sek
Application.OnTime zeit, "aktuell"
End Sub
Sub aktuell()
Application.SendKeys ("^%{F5}"), True 'Tastenkombination (Strg, Alt, F5) sollte die Aktuallisierung durchführen
If t = True Then starten
End Sub
Sub beenden() ' Kann das Makro beenden
t = False
End Sub
In diese Arbeitsmappe einfügen:
Private Sub Workbook_Open() 'Makro wird beim öffnen der Datei gestartet.
starten
End Sub
Gruß
fedjo