Zeiberechnung per VBA
26.02.2019 08:26:46
Alexander
Sub Differenzen_T_minus_S_in_Y_()
Dim lngUnten As Long, lngZeile As Long
lngUnten = Application.Max(3, Cells(Rows.Count, 20).End(xlUp).Row, Cells(Rows.Count, 19).End( _
xlUp).Row)
For lngZeile = 3 To lngUnten
Cells(lngZeile, 21).Value = Cells(lngZeile, 20).Value - Cells(lngZeile, 19).Value
Next
End Sub
Kann man diesem Code auch sagen dass wenn eine Zeit von 23:00 bis 01:00 eingetragen wird es erkennt das ein Datumswechsel stattgefunden hat. So wie er aktuell ist sagt er mir -22 Stunden. Danke für die Hilfe