HORA QUEBRADA EM COMBO BOX

CYBERMAC 18/11/2022 19:09:59
#500811
Pessoal, boa noite!

Preciso criar hora quebrada em um combobox de forma fique fácil ao usuário.

Utilizei o For .. Next para isso, mas só consigo gerar hora inteira, exemplo: 10:00, 11:00, etc.
Precisaria gerar hora como: 10:00, 10:30, 11:00, 11:30 e assim até as 22:00 horas.

Como gerar os minutos da hora?
WEBMASTER 19/11/2022 13:16:58
#500812
Exemplo com planilha...mas a logica (que é o importante) está ai...

Sub gerar()
    Dim I As Integer
    Dim R As Integer
    R = 1
    For I = 10 To 22
        R = R + 1
        Range("A" & R).Value = Format(I, "00") & ":00"
        R = R + 1
        Range("A" & R).Value = Format(I, "00") & ":30"
    Next
End Sub
Faça seu login para responder
Voltar