eigene Funtion autom. Aktualisieren

[kathu]

Hallo zusammen,

ich habe eine Funktion geschrieben, die mir Datum und Uhrzeit einer Datei ausliest
 
Function Datum_Uhrzeit_Quelldatei() As Date
'Liest Datum und Uhrzeit Quelldatei "Pfad ... Dateiname.xlsx"
 
Datum_Uhrzeit_Quelldatei = FileDateTime("[i]Pfad ... Dateiname.xlsx")[/i]
 
End Function
 
 
Die Funktion habe in einer weiteren Datei in einer beliebigen Zelle und sie liefert auch das gewünschte Ergebnis.
Leider wird der Wert nur aktualisiert wenn ich die Zelle  z.B. mit F2 bearbeite und mit Return bestätige.
 
Die Datei in der die Funktion eingebunden ist erhält automatisch alle 30 Minuten einen refresh.

Leider wird dabei die Funktion nicht erneut aufgerufen.

Gibt es eine Möglichkeit, sobald sich etwas im Workbook ändert ... soll sich auch die Funktion aufrufen.

Hoffe ich habe mich einigermaßen verständlich ausgedrückt

Würde mich über eine Idee sehr freuen.

VG Uwe

[RPP63]

Moin!

Setze vor die Ermittlung des Funktionswertes
Application.Volatile

Aber auch dann erfolgt eine Aktualisierung in der Mappe nur dann, wenn Du ein .Calculate anstößt.
(Bspw. durch einen Zelleneintrag "irgendwo" oder mittels Funktionstaste F9)

Dass das Ganze eine Mappe ausbremsen kann, sollte Dir klar sein!

Gruß Ralf

[kathu]

... danke, ich schau gleich mal. Die Datei ist nicht sonderlich groß, mal sehen ob es eine starke "Bremse" ist.

VG Uwe

[schauan]

Hallöchen,

schreibe ein Sub, welches Dir alle n Minuten das Dateidatum prüft und in die Zelle einträgt.
Suche dazu mal nach Application.OnTime

Falls die Function Teil einer größeren Formel in der Zelle ist, kannst Du das Dateidatum ja in eine andere eintragen und die größere Function bezieht sich dann auch darauf.