doble in Userform

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
UserForm TextBox


Excel-Version: 97
nach unten

Betrifft: doble in Userform
von: Michael
Geschrieben am: 03.05.2002 - 16:35:00

Hatte mein Problem vor ein paar Tagen schon mal hier, konnte aber Krankheitshalber nicht mehr nachschauen ob es eine Lösung hierzu gab.
Lösung die dort war funzt nicht.

Folgendes: Habe eine UserForm mit mehreren Text und ComboBoxen
Makro soll nun die erste leere Zeile suchen und dann denn Wert in die Tabelle im Zahlenformat (Double) eintragen

Code: x=1
Do While Sheets("Statistik").Cells(x,1)<>""
x=x+1
Loop
Sheets("Statistik").Cells(x,1) = Cdbl(TextBox1)
Sheets("Statistik").Cells(x,2) = Cdbl(TextBox2)
Sheets("Statistik").Cells(x,3) = Cdbl(ComboBox1)

Wenn ich aber nun in einer Box keinen Wert eintrage kommt eine Fehlermeldung "Typen unverträglich"
Mit Sheets("Statistik").Cells(x,1) = TextBox1
funktionierts wunderbar, muss wohl an CDBl liegen.
(brauche aber den Wert als Zahl)
Wer weiss eine Lösung. Mit bestem Dank im vorraus

nach oben   nach unten

Re: double in Userform
von: Nike
Geschrieben am: 03.05.2002 - 21:33:04

Hi,
der läuft auf nen Fehler, wenn er nen Null Wert in ne Zahl
umformen soll, recht verständlich...
Also, bevor du mit cdbl(textbox) rumhantierst,
erst mal mit
if textbox1.value <> "" then
...
checken und dann erst umformen...

Bye

Nike


nach oben   nach unten

Re: double in Userform
von: Michael
Geschrieben am: 04.05.2002 - 07:15:40

Habs !

Danke Ist jetzt klar bei nichts=nichts


 nach oben

Beiträge aus den Excel-Beispielen zum Thema "doble in Userform"