Funktion, die in mehrere Zellen schreibt
12.01.2017 09:55:12
Merle
ich habe mir eine schöne Funktion geschrieben, die alles mögliche berechnet. Leider weiß ich nicht, wie ich mehrere Werte ausgeben (und in mehrere Zellen schreiben) kann.
z.B.
Function test(a,b)
test = a*b
End Function
soweit funktioniert es; probiere ich jetzt aber z.B. folgendes zu ergänzen, um die Zelle neben der aktiven zu beschreiben, kriege ich einen Fehler (#Wert!) in der aktiven Zelle und garnichts in der daneben:Function test(a,b)
spalte = ActiveCell.Column
zeile = ActiveCell.Row
Cells(zeile, spalte + 1).Value = a+b
test = a*b
End Function
Wenn ich es als normales Makro (Sub) so mache, funktioniert es. Gibt es eine andere Möglichkeit, aus einer Funktion mehrere Zellen zu beschreiben?Danke für Eure Hilfe im Voraus!
M
Anzeige