in Makro für Calc numerische Werte eingeben

[Arto Kokki]

Hallo

folgendes Problem: Ich würde gerne mit einem Makro numerische Werte mit Nachkommastellen (z.B. 123,67) eingeben, die dann in Zellen abgespeichert werden und mit denen weiter gerechnet wird. InputBox kann ja wohl nur Textstrings, die zwar in Zahlen konvertiert werden können - aber nur als INTEGER. Die Versuche mit Dialogen sind irgendwie gescheitert, mit Formularen noch nicht probiert.
Frage: Gibt es vielleicht irgendwo Makro-Code für diese Aufgabe?
vielen Dank
Glück auf
Arto

[kodela]

Hallo Arto Koki,

versuche es mit diesem Codeschnipsel:

Code: Alles auswählen

    DIM antwort as DOUBLE  'eventuell auch als SINGLE
    sTitel = "Dezimaleingabe"
    sText = "Bitte eine Zahl mit zwei Nachkommastellen eingeben"
    sStandard = ""
    antwort = CDbl(InputBox(sText, sTitel, sStandard))

MfG, kodela

[Arto Kokki]

Danke
statt "CDb" "CDbl" und es hat geklappt.
Arto

[kodela]

Hallo,

Na ja, der Schreibfehlerteufel hat's verschluckt, das "l".
Ich habe es oben berichtigt, nicht dass es jemand einmal falsch kopiert.

MfG, kodela