Office: Automatisch aktualisieren

Hallo!
Ein Excel Sheet, welches aus anderen dateien daten anzeigt, soll auf einem Bildschirm alle 5 sekunden aktualisiert werden. Die Files liegen verstreut im Netzwerk. Sinn der Sache: Die Daten werden ständig verändert und neue werden eingepflegt. Eine Übersicht über diese Daten soll am Bildschirm ständig ausgegeben und aktualisiert werden.

ich habe das derzeit mit einem Makro wie folgt versucht:

Sub refreshme()
Application.OnTime Now + TimeValue("00:00:05"), "timer"
Application.Calculate
end sub

refreshme wird in workbook_open() aufgerufen.

Aber: nichts passiert!
F9 hilft leider auch nicht. Man muß das File komplett schließen und wieder öffnen.

Hat jemand eine Idee?

:)

 

Hallo Martin,

Klar passiert nicht. Du rufst ein Makro "timer", das aber nicht existiert.
Richtig müsste es so heissen:

Code:

Achtung: Lies mal die Hilfe und Beispiele zu der .OnTime Methode. Du solltest nämlich die Routine auch löschen, bevor Du Dein Tabellenblatt verlässt, sonst gibts Fehler, bzw. Deine Routine startet ungewollt wieder.

 

hiho

Code:

 

hoppla, natürlich heißt die funktion bei mir auch "timer". ich habs beim herkopieren vertauscht (funktioniert dennoch nicht).

@chris
hier wird der timer genau einmal nach dem Öffnen aufgerufen. danach nciht mehr.

 

Hallo Martin,

Dann müsste Chris's Code mit dieser Änderung funktionieren:
Code:

Ich hab statt timer, RefreshSheet genommen, da timer ein geschützter (Funktions-)Name ist. Wichtig ist, dass RefreshSheet in einem allgemeinen Modul platziert ist (nicht im Arbeitsmappe oder Tabellenblatt!)

 

super! funktioniert. war eigentlich klar daß der funtionsaufruf da drin sein muß. hm *wink.gif*

danke!!!