Hallo Zusammen,
ich habe mir mir in VBA eine kleine Formelsammlung geschrieben. Hier eine Beispielfunktion "Umfangsges_m_s".
Public Function Umfangsges_m_s(Durchmesser_mm As Single, Drehzahl_min As Single) As Single
Umfangsges_m_s = (ZahlPi * Durchmesser_mm / 1000) * (Drehzahl_min / 60)
End Function
Soweit so gut. Lässt sich ohne Probleme über "Funktion einfügen -> Benutzerdefiniert" verwenden.
Jetzt wollte ich einer benutzerdefinierte Schaltfläche diese Funktion zuweisen. Wie es beispielsweise ja bei der Funktion "Summe" ist.
Ich kann die Formel/Funktion zwar mit VBA in die aktive Zelle einfügen , aber die Maske zur Eingabeaufforderung kommt nicht. Es ist aber zwingend nötig die Funktionsargumente selbst zu wählen.
Wenn jemand einen Tipp hätte, wäre ich dankbar.
Danke und Gruß
Aweta
|