Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1352to1356
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

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%

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

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

Anzeige
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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige