RE:problema con fechas y horas
Como guardas las fechas en tu form. en una variable tipo date?
o directamente en una celda de Excel?
Bueno intentaré explicar usando la primera forma usando variables tipo DATE
supongo que existe 2 variables en un modulo BAS.
Public FECHA1 As Date
Public FECHA2 As Date
y en el form
'Al presionar el boton Entrada se registra la hora en la variable
Private Sub CommandButton1_Click()
'La funcion NOW captura la hora y fecha del sistema
TextBox1.Text = Now
End Sub
'Al presionar el boton Salida se registra la hora en el textbox
y se calcula el tiempo para luego escribirlo en la hoja de excell
Private Sub CommandButton2_Click()
TextBox2.Text = Now
'La funcion isdate determina si el text1box1 era una fecha (pors si se metio manual)
If IsDate(TextBox1.Text) Then
FECHA1 = TextBox1.Text
FECHA2 = TextBox2.Text
Else
'Si se metio manual se "Formatea" usando la funcion FORMAT
FECHA1 = Format("dd/mm/yyyy HH:MM:SS", CStr(TextBox1.Text))
FECHA2 = Format("dd/mm/yyyy HH:MM:SS", CStr(TextBox2.Text))
End If
Application.ActiveWindow.Activate
ActiveCell.Value = "NombreEmpleado1"
ActiveCell.Offset(0, 1).Select
ActiveCell.Value = FECHA2 - FECHA1
'Y ya solo falta darle formato a la columna del tiempo para que muestre horas o minutos.
End Sub
Ahora la otra forma usando celdas de excell.
supongo que usas las funciones Fecha y Hora para registrar la horas
La funcion fecha tiene la siguiente sintaxis:
Fecha(año,mes,dia) para registrar por ejemplo el dia de hoy se pondria fecha(105,3,02) 105 por que 100 es el año 2000. 3 porque es el mes de marzo y dia es el dia 2.
Hay varias funciones para descomponer la hora a manera de registralas.
en VBA son Date,time,month,year,day,hour,etc. en entorno para Excel son AHORA,FECHA,HORA,MES,DIA,AÑO,etc.
ya con esto se puede calcular las fechas, como se hacia a la antigüita
Espero sea de utilidad, en caso contrario Especifica que parte de la ayuda no entiste y te echamos la mano.