Benutzerdefinierte Funktion Bruttobetrag

zurück

Mit dieser benutzerdefinierten Funktion errechnen Sie auf einfache Weise aus einem Nettobetrag den Betrag incl. Mehrwertsteuer. Das Ergebnis wird korrekt auf 2 Dezimalstellen gerundet.

Bei dieser Funktion können Sie zwei Werte angeben, den Nettobetrag und den Steuerprozentsatz.

Public Function BruttoMwst(Betrag, Optional SteuerSatz As _
Single = 0.16)

    Brutto = Betrag * (1 + SteuerSatz)
    BruttoMwst = Excel.Application.Round(Brutto, 2)

End Function


Der zweite Parameter "SteuerSatz" ist optional, das heißt, wenn Sie nur den Nettobetrag angeben, dann wird ein Bruttobetrag mit 16% Mehrwertsteuer berechnet. Sie können aber alternativ jeden beliebigen Prozentsatz angeben, dann bleibt der vorgegebene Satz von 16% unberücksichtigt.

Optionale Werte können Sie bestimmen, indem Sie in der Funktion vor dem Parameter das Wort "Optional" stellen.

Gerundet wird mit der Runden-Funktion von Excel. Der Befehl muss in englisch angegeben werden, mit einem Verweis auf die Anwendung: "Excel.Application.Round"

Weitere Informationen zur Funktionserstellung finden Sie im VBA- Kurs - Benutzerdefinierte Funktionen

zurück  

Laden Sie sich ein ein komplettes e-Book mit Beispieldateien herunter:  Downloaden



Hier können Sie Bücher zu Excel bestellen:
weiter