Hallo erstmal,
ich möchte ein recht einfaches Programm (unter Excel) schreiben, daß nach einer bestimten Anzahl von Sekunden die Bildschirmfarbe ändert.
Mein Problem dabei ist, wie schaff ich es, daß ich jedes Sekunde ein Signal bekomme, mit dem ich den „Sekundenzähler“ takten kann?
Schon mal vielen Dank für die Hilfe!
Hallo erstmal,
Hi,
erstelle ein Modul schreib folgende Sub hinein:
Public Sub Zeit()
Application.OnTime Now + TimeValue("0:00:05"), "Zeit"
MsgBox "Diese Messagebox erscheint alle 5 Sekunden"
End Sub
Die Zeile mit der Messagebox kannst du mit deiner gewünschten Prozedur ersetzen.
Am Anfang muss die Sub „Zeit“ einmal aufgerufen werden; danach ruft sie sich nach der jeweiligen Zeit immer wieder selber auf.
Gruß.Timo
ich möchte ein recht einfaches Programm (unter Excel)
schreiben, daß nach einer bestimten Anzahl von Sekunden die
Bildschirmfarbe ändert.Mein Problem dabei ist, wie schaff ich es, daß ich jedes
Sekunde ein Signal bekomme, mit dem ich den „Sekundenzähler“
takten kann?Schon mal vielen Dank für die Hilfe!
Danke!
Ein kleiner Fehler, man muß es als Makro schreiben!
Hi,
Danke!
Bitte.
Ein kleiner Fehler, man muß es als Makro schreiben!
Wie bitte definierst du Makro?
Und wie bitte definierst du das, was ich dir gepostet habe?
Gruß.Timo
Man fragt höflich an, man bekommt prompt eine völlig zutreffende, brauchbare Antwort …
Und dann mäkelt man besserwisserisch an der Wortwahl herum. Solche Freunde haben wir gern.
Erich
Danke!
Ein kleiner Fehler, man muß es als Makro schreiben!
Hi Zondan,
hast Recht:
Public Sub Makro()
Application.OnTime Now + TimeValue(„0:00:05“), „Makro“
MsgBox „Diese Messagebox erscheint alle 5 Sekunden“
End Sub
*grien*
Reinhard
sorry falls ich hier jemandem verärgert hab, mich persönlich hat der Fehler nicht gestört, aber vielleicht liest jemand mit, der sich nicht auskennt, versucht es aus und verzweifelt dann an der Fehlermeldung!