Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Funktion für Lohnberechnung

Forumthread: Funktion für Lohnberechnung

Funktion für Lohnberechnung
17.03.2014 21:54:49
bneyer
Wer kann mit weiterhelfen, ich stehe an!! :o(
Ich möchte mit einer Funktion den Jahreslohn gemäss Beschäftigungsgrad des laufenden Jahres berechnen, welcher zwischen zwei Werten liegen kann. Liegen die Datumswerte vor dem laufenden Jahr, soll der 100%ige Lohn resultieren.
Mit diesen Angaben muss ich das rechnen.
Anstellung per = AA (z.B. 01.06.14)
Befristet_bis = BB (z.B. 30.11.14)
Anfangjahr = XX (z.B. 01.01.14)
Endejahr = YY (z.B. 31.12.14)
Grundlohn = GG (z.B. 75'000.-)
Anstellung% = PP (z.B. 50%)
Bsp:
((75'000.- / 365) * (365-(365-(30.11.14 - 01.6.14))) * 50%

Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Funktion für Lohnberechnung
18.03.2014 08:45:44
MCO
Moin!
Füge das in dein Modul ein, dann benutze die Formel aus dem Formel-Editor.
Allerdings hat sich mir nicht das XX und YY erschlossen, daher hab ichs weggelassen.
Für die Felder reichen einfache Zellbezüge oder die Werte von hand.
Gruß, MCO
Public Function Jahresabrechnung(Anfang As Date, Befristet As Date, Grundlohn As Single,  _
Anstellung As Variant) As Double
Jahresabrechnung = Round((Grundlohn / 36500 * (Befristet - Anfang)) * Anstellung, 2)
End Function

Anzeige
AW: Funktion für Lohnberechnung
19.03.2014 06:08:25
bneyer
Hallo MCO
Das scheint so zu klappen.
Hab vielen herzlichen Dank!!!
bneyer

AW: Funktion für Lohnberechnung
20.03.2014 21:19:08
bneyer
Hallo MCO
Ich bin nun endlich dazu gekommen, das einzubauen.
Einiges stimmt doch noch nicht.
Beispielsweise folgendes:
- Wenn "Anstellung" weiter zurück liegt, als der 1.1. des laufenden Jahres, darf der Lohn nicht höher sein als der Grundlohn, da hier immer der Jahreslohn, vom 1.1. angerechnet berechnet werden muss.
- Wenn kein Datum Befristet vorhanden ist (da das Anstellungsverhältnis unbefristet ist) muss bis zum 31.12. des laufenden Jahres gerechnet werden.
Daher habe ich die Variablen Anfahgjahr und Endejahr noch angegeben.
Kann man das irgendwie einbauen?
Ich wäre die wirklich sehr dankbar dafür!

Anzeige
AW: Funktion für Lohnberechnung
21.03.2014 12:00:37
MCO
Mahlzeit!
Deine Anforderung hab ich mit eingebaut:
Gruß, MCO
Public Function Jahresabrechnung(Einstellung_am As Date, Vollzt_Teilzt As Variant, Grundlohn As  _
Single, Optional Befristet_Optional As Date)
Dim anfang As Single
anfang = WorksheetFunction.Max(Einstellung_am, CDate("01.01." & Year(Date)))
If Befristet_Optional  "00:00:00" Then
Befristung = WorksheetFunction.Min(CDate("31.12." & Year(Date)), CDate(Befristet))
Else
Befristung = CDate("31.12." & Year(Date))
End If
Jahresabrechnung = Round((Grundlohn / 36500 * (CSng(Befristung) - anfang)) * Vollzt_Teilzt, 2)
End Function

Anzeige
AW: Funktion für Lohnberechnung
20.03.2014 21:21:34
bneyer
...kann mir ja noch jemand weiterhelfen? :o/
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige