¿Cómo evitar duplicar registro de fecha más Hora?

La hora cambia hasta por un Segundo estos de beria definirlo solo en minuto

Lo de la fecha cambia por día tiene que ser más especifico porque si la fecha

2/2/17 8:01 seria diferente de 2/2/17 8:02 por que si no es diferente entonces seria solo busca

Que no de duplique la fecha para tu macro

¿Muestrala para ver en que podemos ayudarte?

 Hola.

Uso un Form para ingresar los datos en TextBox y cargarlos en la hoja 3 y 4, la 3 es el reporte y la 4 mi historico, te mando el link de mi codigo porque esta largo,

Adjunto imagen para poder darme a entender, El textbox 2 lo llena un comboBox con las horas en multimplos de media hora que estan precargadas, al selecionar llena el textbox2

Me.ComboBox2.AddItem ("06:00")
Me.ComboBox2.AddItem ("06:30")
Me.ComboBox2.AddItem ("07:00")
Me.ComboBox2.AddItem ("07:30")
Me.ComboBox2.AddItem ("08:00")
Me.ComboBox2.AddItem ("08:30")
Me.ComboBox2.AddItem ("09:00")
Me.ComboBox2.AddItem ("09:30")
Me.ComboBox2.AddItem ("10:00")
Me.ComboBox2.AddItem ("10:30")
Me.ComboBox2.AddItem ("11:00")
Me.ComboBox2.AddItem ("11:30")
Me.ComboBox2.AddItem ("12:00")
Me.ComboBox2.AddItem ("12:30")
Me.ComboBox2.AddItem ("13:00")
Me.ComboBox2.AddItem ("13:30")
Me.ComboBox2.AddItem ("14:00")
Me.ComboBox2.AddItem ("14:30")
Me.ComboBox2.AddItem ("15:00")
Me.ComboBox2.AddItem ("15:30")
Me.ComboBox2.AddItem ("16:00")
Me.ComboBox2.AddItem ("16:30")
Me.ComboBox2.AddItem ("17:00")
Me.ComboBox2.AddItem ("17:30")
Me.ComboBox2.AddItem ("18:00")
Me.ComboBox2.AddItem ("18:30")
Me.ComboBox2.AddItem ("19:00")
Me.ComboBox2.AddItem ("19:30")
Me.ComboBox2.AddItem ("20:00")
Me.ComboBox2.AddItem ("20:30")
Me.ComboBox2.AddItem ("21:00")
Me.ComboBox2.AddItem ("21:30")
Me.ComboBox2.AddItem ("22:00")
Me.ComboBox2.AddItem ("22:30")
Me.ComboBox2.AddItem ("23:00")
Me.ComboBox2.AddItem ("23:30")
Me.ComboBox2.AddItem ("24:00")
Me.ComboBox2.AddItem ("24:30")
Me.ComboBox2.AddItem ("01:00")
Me.ComboBox2.AddItem ("01:30")
Me.ComboBox2.AddItem ("02:00")
Me.ComboBox2.AddItem ("02:30")
Me.ComboBox2.AddItem ("03:00")
Me.ComboBox2.AddItem ("03:30")
Me.ComboBox2.AddItem ("04:00")
Me.ComboBox2.AddItem ("04:30")
Me.ComboBox2.AddItem ("05:00")
Me.ComboBox2.AddItem ("05:30")

Saludos.

Link:

https://drive.google.com/open?id=0B9t_Tpq2SgwFdXJzNnA1U2poQ2c