Eigene Funktion erstellen
25.07.2003 15:55:11
Frank
habe nicht sonderlich viel Peil von VBA deshalb möchte ich gerne hier die Experten bemühen. Ich möchte mir eine Funktion schreiben namens "Bruttobetrag". Diese soll nach Auswahl des Bereichs (wie bei Summierung) z. B. die Mehwertsteuer automatisch aus dem ausgewählen Bereich errechnen.
A1 = 100
A2 = 200
Als Argument möchte ich den Bereich und den Steuersatz übergeben. Meine Überlegungen sehen etwa so aus:
Public
Function Bruttosumme (Bereich as Range ; Satz as Byte) as Long
Bruttosumme = Bereich + (Bereich * Satz/100)
End Function
Wenn ich die Funktion starte soll (bei Auswahl von A1 - A2 und Steuersatz 16) 348 herauskommen. Ich hoffe you know what I mean.
Für Hilfe danke ich schon jetzt!!
Servus
Frank