Hola erbunson!
He estado analizando tu ultimo codigo y como es normal tengo un monton de dudas y me pierdo, me explico pues hay comandos que la información que he obtenido es muy difusa por parte de VB, primero veo por un lado que en la
primera rutina .:
"Public Function HmsDif(ByVal FechaInicial As Date, FechaFinal As Date, Optional ConSegundos As Boolean = False) As String"
Hay esto ¿Que es no he encontrado información) .:
ByVal FechaInicial As Date
Por otro lado las dos rutinas se llaman
HmsDif y
HmsSum y en ambas veo que se autollaman en dos ocasiones en su propia rutina ¿Porque si es asi? y finalmente la rutina que pones fuera del codigo :
Código vb:
Ver originalDim TotalHoras As String
For Fila = 1 to Grid.Rows-1
TotalHoras = Hms( TotalHoras, Grid.TextMatrix(Fila, 7)
Next
' Asignas aquí la suma de Horas donde tu quieras.
Que es donde guardamos la suma en la variable
TotalHoras haces referencia a otra rutina o variable que se llama
Hms que no la veo por ninguna parte, podrias explicarme un poco el tema, es que me pierdo por completo que soy muy torpe y cazurro.
Un saludo