HERBERS Excel-Forum - die Beispiele

Thema: Berechnung der Wochenarbeitsstunden

Home

Gruppe

DatumZeit

Problem

Wie kann ich aus einer Tabelle die Wochenarbeitsstunden unter Berücksichtigung von Pausen und einer Regelarbeitszeit berechnen?

Lösung
Nur anhand einer Beipspielarbeitsmappe darstellbar.
ClassModule: DieseArbeitsmappe

Private Sub Workbook_BeforeClose(Cancel As Boolean)
   Application.Calculation = Worksheets("Data").Range("A1").Value
End Sub

Private Sub Workbook_Open()
   Worksheets("Data").Range("A1").Value = Application.Calculation
   Application.Calculation = xlCalculationManual
End Sub
StandardModule: Modul1

Sub AusEinblenden()
   Worksheets("Data").Visible = xlVeryHidden
   Worksheets("Data").Visible = True
End Sub