Stundenberechnung

[Jockel]

Hallo,

Code:

Das Tabellenblatt habe Ich vor 3 Jahren von unserer Lohnbuchaltung bekommen

Vielleicht solltest du zum einen mit der Lohnbuchhaltung erst einmal abklären ob der Aufbau, mit Hinweis auf die steuerlichen Reisekosten, so überhaupt noch aktuell ist und zum anderen widerstrebt es mir die Arbeit eurer Lohnbuchhaltung zu machen.

Hallo, und weiterhin gilt, man kann die Daten hintereinamder wegschreiben - für das ganze Jahr oder mehr... ... und dieses dann monatsweise mittes Formeln oder PivotTable auswerten...

[Peter]

Hallo,

kein Widerspruch - wobei man zur Not, wenn die Lohnbuchhaltung da nicht mitspielt, dann auch hingehen könnte und die Stundenaufzeichnungen in eine Tabelle kopieren könnte - der Aufwand dafür hält sich in Grenzen.

[Rabe]

Hi,

Das Tabellenblatt habe Ich vor 3 Jahren von unserer Lohnbuchaltung bekommen, dies Blatt müßen wir jeden Monat abgeben wegen der Auslöse.
[...]
Es wäre super wenn einer von euch dreien mir so etwas zaubern könnte.

ich stimme Jörg und Peter zu, was die Rücksprache mit der Lohnbuchhaltung betrifft, im Zeitraum der letzten 3 Jahre gab es bestimmt 2 oder mehr Änderungen der gesetzlichen Vorgaben. Die Grenzwerte der Zeit müssen sicherlich angepaßt werden.

Hier mal Deine Tabelle mit angepassten Formeln nach den in der Tabelle definierten Grenzen:

  Test Arbeitszeit - Rabe.xlsx (Größe: 19,67 KB / Downloads: 7)

Die Pivot habe ich auch etwas verändert.

[Jockel]

Hi,

Das Tabellenblatt habe Ich vor 3 Jahren von unserer Lohnbuchaltung bekommen, dies Blatt müßen wir jeden Monat abgeben wegen der Auslöse.
[...]
Es wäre super wenn einer von euch dreien mir so etwas zaubern könnte.

ich stimme Jörg und Peter zu, was die Rücksprache mit der Lohnbuchhaltung betrifft, im Zeitraum der letzten 3 Jahre gab es bestimmt 2 oder mehr Änderungen der gesetzlichen Vorgaben. Die Grenzwerte der Zeit müssen sicherlich angepaßt werden.

Hier mal Deine Tabelle mit angepassten Formeln nach den in der Tabelle definierten Grenzen:


Die Pivot habe ich auch etwas verändert.

Hallo Ralf, hier kann man n Haufen Zeichen verkaufen..:

=((F7*24)<8)*(F7>0)

[Rabe]

Hi Jörg,

hier kann man n Haufen Zeichen verkaufen..

stimmt, aber was mir an meiner Lösung gefallen hat, war, daß die Nullen nicht da waren, das macht die tabelle übersichtlicher.

Aber hier ist die Lösung nach Deinem Vorschlag:

März

	H	I	J
5	Reisespesen / Auslösung für
6	bis unter 8	8-14 Std	ab 14 Std
7	0	0	0

Bedingte Formatierung Fülleffekte, Symbole, Farbskalen
werden in dieser Tabelle nicht dargestellt

verbundene Zellen

H5:J5

verwendete Formeln
Zelle	Formel	Bereich	N/A
H7	=((F7*24)<8)*(F7>0)
I7	=((F7*24>=8)*(F7*24<14))
J7	=((F7*24>=14)*(1=1))

Bedingte Formatierung Haupttabelle 1
Zelle	Nr. Bed.  Regeltyp	Operator	Formel1	Formel2	Format Schrift Füllfarbe	Unterstrichen	Schrift- farbe	Muster	Musterfarbe	Typ	Bereich
$A$7:$L$37	01.Bed.: Formel ist		=WOCHENTAG($A7;2)=7		14408946					2	A7:L37
$H$7:$L$37	02.Bed.: Formel ist		=(ZELLE(“Schutz”;XEZ1048543)=0)		14610923					2	H7:L37

Bedingte Formatierung Haupttabelle 2					oberere/unterer Bereich
Zelle	Nr. Bed.	Format Zelle	Anhalten	Auswahl	Anzeige	Anzahl	Durchschnitt	Typ	Bereich
$A$7:$L$37	01.Bed.		Falsch					2	A7:L37
$H$7:$L$37	02.Bed.		Wahr					2	H7:L37

Die Bedingungen wurden mit Excel-Version ab 2007 ausgelesen.

Excel-Inn.de

Hajo-Excel.de

XHTML-Tabelle zur Darstellung in Foren, einschl. der neuen Funktionen ab Version 2007

Add-In-Version 18.19 einschl. 64 Bit

[Jockel]

Hi Jörg,

hier kann man n Haufen Zeichen verkaufen..

stimmt, aber was mir an meiner Lösung gefallen hat, war, daß die Nullen nicht da waren, das macht die tabelle übersichtlicher.

...

Hallo Ralf, ich dachte ich müßte nicht extra erwähnen, dass wenn die Nullen stören, man sie "verschwinden" lassen kann (benutzerdefiniert...)

[Rabe]

Hi Jörg,

ich dachte ich müßte nicht extra erwähnen, dass wenn die Nullen stören, man sie "verschwinden" lassen kann (benutzerdefiniert...)

klar, mußt Du nicht.
Ich verwende das aber immer sehr ungern, denn das ist etwas, was ein Unerfahrener nicht so schnell erkennt, wie wenn es direkt in der Formel steht.

[wavemaster]

Hi,

Das Tabellenblatt habe Ich vor 3 Jahren von unserer Lohnbuchaltung bekommen, dies Blatt müßen wir jeden Monat abgeben wegen der Auslöse.
[...]
Es wäre super wenn einer von euch dreien mir so etwas zaubern könnte.

ich stimme Jörg und Peter zu, was die Rücksprache mit der Lohnbuchhaltung betrifft, im Zeitraum der letzten 3 Jahre gab es bestimmt 2 oder mehr Änderungen der gesetzlichen Vorgaben. Die Grenzwerte der Zeit müssen sicherlich angepaßt werden.

Hier mal Deine Tabelle mit angepassten Formeln nach den in der Tabelle definierten Grenzen:


Die Pivot habe ich auch etwas verändert.

Danke genau das was Ich gebraucht und versucht habe.
Zum Schluß noch eine winzige Frage, kann man ein Pivottabelle auch so einstellen das diese laufend aktualisiert oder geht das nur wenn die Arbeitsmappe geschlossen und wieder geöffnet wird.

Habe mit Pivottabellen absolut nichts am Hut.
:28

[Rabe]

Hi,

Zum Schluß noch eine winzige Frage, kann man ein Pivottabelle auch so einstellen das diese laufend aktualisiert oder geht das nur wenn die Arbeitsmappe geschlossen und wieder geöffnet wird.

Setze mal dieses Makro hinter die Tabelle mit der Pivot:

Code:

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
   Dim pt As PivotTable

    If Not Intersect(Target, Range("B:B")) Is Nothing Then

        For Each pt In ActiveSheet.PivotTables
            pt.PivotCache.Refresh
        Next pt

    End If

End Sub

oder auch mit
Private Sub Worksheet_Activate()

Habe mit Pivottabellen absolut nichts am Hut.

Pivots sind einfach klasse!

[atilla]

Hallo Ralf,

der eingestellte Code ist nicht empfehlenswert.
Was, wenn die letzte Eingabe in einer andren Spalte als B getätigt wurde.

Wenn die Pivottabelle in einem anderen Blatt als die Quelle ist, dann ist das Activate Ereignis immer die beste Wahl, sonst muss halt der gesamte Eingabebereich auf Eingabe geprüft werden oder es ist sichergestellt, dass die letzte Eingabe immer in einer bestimmten Spalte erfolgt.