Habe weiter eine Combo4 für das akt. Datum: (bei Dropdown zeigt es mir die letzten 7 Tage und die nächsten 14 Tage an)
Dim i As Integer
For i = -7 To 14
ComboBox4.AddItem Date + i
Next
ComboBox4.ListIndex = 7
Bei der Combo5 - für die Uhrzeit hätte ich gerne die Befüllung:
Dim i As Integer
For i. = -10 to 50
ComboBox5.Text = Format(Time, "hh:mm") 'also akt. Zeit bei Dropdown - 10 Minuten rückwärts und 49 Minuten vorwärts
Next
ComboBox5.ListIndex 10
Also zum Beispiel:
Anzeige:
11:54
Bei Dropdown:
11.44
11.45
11.46
11.47
11.48
11.49
11.50
11.51
11.52
11.53
11.54
11.55
11.56
11.57....usw bis
..
..
11:43
Besten Dank für eure Hilfe
lg STeve