Eigene Funktion mit VBA

Abb. 73 Eigene Funktionen mit VBA

Mit ein wenig function VBA-Code lassen sich eigene Funktionen deklarieren, die man dann in Excel wie die eingebauten Funktionen nutzen kann.

Public Function NettoMwst(Betrag, Optional SteuerSatz As Single = 0.19)
   'Quelle: Helmut Pirklbauer
   Dim Netto As Double
   Netto = Betrag / (1 + SteuerSatz)
   NettoMwst = Excel.Application.Round(Netto, 4)
End Function

Hinweis: diese functions müssen sich bis auf Weiteres in den Modulen von Arbeitsmappen befinden (Anm.: also nicht in der personal.xlsb - der persönlichen Arbeitsmappe).