Uhrzeitentabelle in Excel mit Alarm/Signal bei Erreichen der jew. Uhrzeit versehen

Computer: Software & Programmierung Office Software
#1

Hallo zusammen,

Ich habe eine Excel Tabelle, die alle Events an einem Tag auflistet, die ich zu beginn kurz checken muss. Das ich dabei während meiner anderen Arbeit nciht vergesse, wäre es hilfreich, wenn ein kurzer Signalton kommen würde, beim Start von jedem Event.
Die tabelle sieht folgendermaßen aus:
https://drive.google.com/file/d/0BzrFFj3Ys-Yqc01PRzR…wobei die wichtige Uhrzeit die letzte Spalte ist.
Gibt es dazu irgendeine Lösung? Oder vltl ein Programm, das die Uhrzeiten als csv einlesen kann und dann daraus einzelne Alarme generiert?
Vielen Dank schonmal!

vg
Kua

#2

Hallo Kuaidao,

ich habe ein wenig in Google geschnüffelt:

http://www.excel-training.de/makro_text_fr.asp?ID=35…

lg

#3

Hallo Kua,

ich hoffe, du kommst mit dem VBA Editor zurecht. Dann versuch mal Folgendes:
Folgenden Code kopiere in den Codebereich deines Tabellenblattes:

Option Explicit

Sub starten()
 Dim ersteZeile As Long, z As Long
 Dim spalte As String

 ersteZeile = 1 ' Diesen Wert ändern, falls die erste Uhrzeit in einer anderen Zeile steht.
 spalte = "D" ' Spalte anpassen
 z = ersteZeile
 While Not IsEmpty(Range(spalte & z))
 Application.OnTime Range(spalte & z), "piep"
 z = z + 1
 Wend
End Sub

Die Werte für „ersteZeile“ und „spalte“ musst du für deine Tabelle anpassen.

Folgender Code muss in ein Standardmodul der selben Arbeitsmappe:

Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Option Explicit

Sub piep()
 Beep
 Sleep 1000
 Beep
 Sleep 1000
 Beep
End Sub

Wenn du dann den Makro „starten“ einmal laufen lässt, sollte zu jeder Zeit in deiner Tabelle ein Alarm kommen.

Gruß, Andreas