Komma als Dezimaltrennzeichen in VBA akzeptieren

Forumthread: Komma als Dezimaltrennzeichen in VBA akzeptieren
5 Beiträge zu diesem Forumthread
Anzeige

Forumthread: Komma als Dezimaltrennzeichen in VBA akzeptieren

24.03.2026 15:51:21

Moni1262

Hallo,
ich befülle Textfelder in einer Userform die in eine Tabelle eingetragen werden.

Das Feld txtLaenge benötigt Zahlen mit dem Dezimaltrennzeichen "Komma", da die Daten mittels Notebook und einem kabellosen Ziffernblock eingegeben werden und in weiterer Folge addiert werden sollen.

5
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Komma als Dezimaltrennzeichen in VBA akzeptieren

24.03.2026 16:13:12

UweD
AW: Komma als Dezimaltrennzeichen in VBA akzeptieren

24.03.2026 16:35:45

daniel
AW: Komma als Dezimaltrennzeichen in VBA akzeptieren

24.03.2026 19:08:54

Moni1262
AW: Komma als Dezimaltrennzeichen in VBA akzeptieren

24.03.2026 22:52:37

daniel
AW: Komma als Dezimaltrennzeichen in VBA akzeptieren

25.03.2026 07:54:38

Moni1262

AW: Komma als Dezimaltrennzeichen in VBA akzeptieren

24.03.2026 16:13:12

UweD

Hallo

reicht das nicht? deinWunsch= CDbl(txtlaenge)

LG UweD

AW: Komma als Dezimaltrennzeichen in VBA akzeptieren

24.03.2026 16:35:45

daniel

Hi

schreibe die Textfeldwerte in die .FormulaLocal-Eigenschaft der Zelle.
Dann werden die lokalen Schreibweisen bei der Umwandlung der Eingabe in den Zellwert berücksichtigt.

Cells(?,  ?).FormulaLocal = txtLaenge.Text

alternativ kannst du natürlich auch die Eingabe erst mit CDbl in eine Zahl wandeln, da CDbl ebensfalls die lokalen Schreibweisen berücksichtig.

Cells(?, ?).value = CDbl(txtLaenge.Text)

die dritte Möglichkeit ist, dass du den Wert auf die amerikanische Schreibweise umbaust, dann kannst du in die .Value-Eigenschaft schreiben

Cells(?, ?).Value = Replace(txtLaenge.text, ",", ".")

beachte, dass. CDbl dir einen Fehlerabbruch erzeugt, wenn der eingegebene Wert nicht in eine Zahl wandelbar ist.
den beiden anderen Methoden ist das egal.

Gruß Daniel

AW: Komma als Dezimaltrennzeichen in VBA akzeptieren

24.03.2026 19:08:54

Moni1262

Hallo Daniel, die zweite Variante hat hervorragend funktioniert. SUPER, bin ganz happy

Kannst du mir bitte jetzt noch mitteilen, wie der Code lautet um eine MsgBox auszugeben wenn der eingegebene Wert keine Zahl ist.

AW: Komma als Dezimaltrennzeichen in VBA akzeptieren

24.03.2026 22:52:37

daniel

If not isnumeric(txtLaenge.text) then Msgbox...

AW: Komma als Dezimaltrennzeichen in VBA akzeptieren

25.03.2026 07:54:38

Moni1262

Hallo Daniel,
recht herzlichen Dank, für die schnelle Rückmeldung. Alle funktioniert

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!