VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Lohnberechnung mit Pausenberücksichtigung

Gruppe

DatumZeit

Bereich

Arbeitszeit

Thema

Lohnberechnung mit Pausenberücksichtigung

Problem

Eine Arbeitszeitberechnung auf Formelbasis unter Berücksichtigung von Arbeitszonen und Pausen.

Lösung

Darstellung nur anhand einer Beispielarbeitsmappe möglich.




ClassModule: Tabelle1

Private Sub Worksheet_Change(ByVal Target As Range)
   Application.EnableEvents = False
   On Error GoTo ERRORHANDLER
   If Target.Name.Name = "BEGINN" Then
      If Target.Value >= Range("P1A").Value And Target.Value <= Range("P1E").Value Then
         Target.Value = Range("P1E").Value
      End If
      If Target.Value >= Range("P2A").Value And Target.Value <= Range("P2E").Value Then
         Target.Value = Range("P2E").Value
      End If
   ElseIf Target.Name.Name = "ENDE" Then
      If Target.Value >= Range("P1A").Value And Target.Value <= Range("P1E").Value Then
         Target.Value = Range("P1A").Value
      End If
      If Target.Value >= Range("P2A").Value And Target.Value <= Range("P2E").Value Then
         Target.Value = Range("P2A").Value
      End If
   End If
ERRORHANDLER:
   Application.EnableEvents = True
End Sub

    


Beiträge aus dem Excel-Forum zu den Themen DatumZeit und Arbeitszeit