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!
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.