[Resolvido]Diferença em Horario Automatico

Boa tarde


Com intervalos de 30 minutos:
Neste exemplo ao criar o horário entre as 08:00 horas e as 20:00 dá 25 Consultas para efectuar. Certo

Mas com os mesmo intervalo de 30 minutos:
Mas se eu escolher criar o horário entre as 08:00 horas e as 19:00 dá 23 Consultas para efectuar. Certo

Mas com os mesmo intervalo de 30 minutos:
Mas se eu escolher criar o horário entre as 08:00 horas e as 19:30 dá 23 Consultas para efectuar. Errado

Não devia dar 24.

Assis, você não está a adicionar os minutos.

Para além da data no While tem de fazer também o DateAdd aos minutos, assim:

Do While D <= DateAdd("n", Format(Me.txthorafinal, "nn"), DateAdd("h", Format(Me.txthorafinal, "hh"), Me.txtDataFinal))


Ora teste;

Obrigado JPaulo

Bom almoço, casa ainda não tenha acontecido ...

Obrigado pelo retorno.