Der Code für ein allgemeines Modul:

 

Public Function MwSt(ByVal dblWert As Double) As Double

MwSt = dblWert * 1.19

End Function

 

 

Die erste Zeile beginnt mit "Public Function..." gefolgt von einem aussagekräfigen Namen, der frei gewählt werden kann. Leer- ,Sonderzeichen und VBA-Schlüsselworte sind nicht möglich.

In der Klammer wird in diesem Beispiel eine Zahl, welche auch Nachkommastellen haben kann, aus einer Zelle übergeben. Die hier gewählte Variable, welche den Zellwert aus A1 aufnimmt heißt "dblWert" könnte aber auch "Hallo" oder "Huhu" heißen. Dieser Name ist ebenfalls frei wählbar. Da eine Zahl mit möglichen Nachkommastellen übergeben wird wurde der Datentyp "As Double" gewählt. Das vorangestellte "ByVal" ist optional und kann bei einer UDF auch weggelassen werden. Es sagt aus, auf welche Art der Wert an eine Funktion übergeben wird. Hinter der schließenden Klammer wird der Rückgabewert der Funktion bestimmt. Hier ebenfalls "as double", da wir auch eine Zahl mit möglichen Nachkommastellen als Ergebnis erwarten.

In der Folgezeile wird nun "MwSt", der Name der Funktion, der Wert aus der Multiplikation "dblWert", also unser Zellwert A1, mit 1,19 zugewiesen. Das Ergebnis beträgt in diesem Beispiel 119 und wird in der Zelle, in der wir diese Formel eingeben, angezeigt.

Die Funktion endet immer mit "End Function".

 

Eine so erstellte Formel wird wie jede andere auch im Formelassistenten angezeigt.