Excel VBA 質問スレ Part74

[740 デフォルトの名無しさん (ﾄﾞｺｸﾞﾛ MMae-YJKT) 2022/01/28(金) 19:41:52.43 ID:sJpZ8snBM]

>>737
Dim T As Date
T = TimeSerial(7, 30, 0)
For i = 1 To 19
UserForm1.ComboBox5.AddItem Format(T, "h:mm")
T = DateAdd("n", 30, T)
Next i