Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1196to1200
1196to1200
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

UF Textbox Komma durch Punkt ersetzen

Forumthread: UF Textbox Komma durch Punkt ersetzen

UF Textbox Komma durch Punkt ersetzen
Beni
Hallo Excel-Freaks,
wie kann man in Textboxen bei Eingabe von Komma, das Komma durch Punkt ersetzen.
Wenn ich mit VBA den Inhalt lösche, löscht es die Zahlen, aber das Komma bleibt bestehen.
In der Schweiz haben wir das Zahlerformat mit Punkt.
Eine brauchbare Lösung wäre Supppper
Gruss Beni
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: UF Textbox Komma durch Punkt ersetzen
29.01.2011 16:27:06
Tino
Hallo,
für so etwas habe ich eine solche Funktion im Einsatz damit man nur Zahlen eingeben kann.
Private Sub TextBox1_KeyPress(ByVal intKeyAsc As MSForms.ReturnInteger)
 intKeyAsc = OnlyNumbers(TextBox1, CInt(intKeyAsc))
End Sub

'Funktion zum prüfen einer Textbox ---> Nur Zahlen zulassen 
Private Function OnlyNumbers(objTextBox As MSForms.TextBox, intKeyNumber As Integer) As Integer
Dim PunktOderKomma As String
    
PunktOderKomma = IIf("0.5" * 2 = 1, ".", ",")

If intKeyNumber = 44 Or intKeyNumber = 46 Then
        If InStr(objTextBox, PunktOderKomma) = 0 And Len(objTextBox) > 0 Then
          OnlyNumbers = Asc(PunktOderKomma)
        Else
          OnlyNumbers = 0
        End If
 Else
        Select Case intKeyNumber
         Case 48 To 57: OnlyNumbers = intKeyNumber
         Case Else: OnlyNumbers = 0
        End Select
 End If

End Function
Gruß Tino
Anzeige
AW: UF Textbox Komma durch Punkt ersetzen
29.01.2011 17:02:09
Beni
Hallo Tino
musste es noch umbauen, Punkte sind erlaubt.
Viiiiiiiiiiiielen Dank
Beni
AW: UF Textbox Komma durch Punkt ersetzen
29.01.2011 17:25:36
Tino
Hallo,
es kommt aber auf die Systemeinstellung an
was verwendet werden kann, um im VBA damit rechnen zu können.
Bei mir ist es das Komma und da kommt bei CSng("0.5") = 5 raus.
Wenn Du in Excel (Zelle) einen String als Zahl schreiben willst, dann ist es der Punkt.
Aber da würde ich die bekannten Umwandlungsfunktionen einsetzen.
Gruß Tino
Anzeige
;

Forumthreads zu verwandten Themen

Eingabe formatiert zurückgeben (Komma und Punkt)
Lemmi

Hallo zusammen,
ich möchte Euch eine wahrscheinlich einfache Frage stellen, die ich mir gerade mal nicht beantworten kann!
Wie stelle ich sicher das auch wenn ein Punkt als Trennzeichen eingegeben worden ist, am Ende immer ein Komma in der Zelle steht?
Eingabe 10,0........Ausgabe...
07.08.2008 21:35:00
Thread-ID: 1000105
5 Beiträge
Automatische Umwandlung Punkt in Komma
Harry

Liebe Excel-Gemeinde,
ich möchte aus einer csv-Datei (die eine konstante Spalten- aber unterschiedliche Zeilenzahl hat) Text in Zahlen wandeln (also z. B. 1.234 in 1,234).
Dazu gibts im Forum viele Vorschläge. Ich habe dazu die Formel =WERT(WECHSELN(A1;".";",")) gefunden.
Diese Fo...
08.08.2008 21:00:38
Thread-ID: 1000413
5 Beiträge
"#Wert!" suchen, durch "" ersetzen
Detlef

Hallo Experten,
warum lässt sich im VBA der Ausdruck "#Wert!" nicht durch "" ersetzen.
(im Excel geht es)
mit "1234567" geht es auch ohne Probleme ?
Selection.Replace What:="#WERT!", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False
macht er nich...
29.08.2008 11:23:20
Thread-ID: 1005759
6 Beiträge
Anzeige
, ersetzen durch einen .
andreas

Hallo,
wenn ich in einer Spalte ein , durch einen . ersetzen will verschiebt sich der Punkt um 2 Stellen nach links und macht dann z. B. aus 14,7204 dann 0.147204.
Kann mir jemand sagen wie ich aus der Zahl mit dem Komma exakt die Zahl mit dem Punkt bekomme.
Vielen Dank
Andreas<...
07.09.2008 18:47:00
Thread-ID: 1007995
3 Beiträge
Komma anstatt Punkt
Harald

Hallo
ich bekomme von einer Anwendung Zahlen die aber anstelle des bei uns üblichen Kommas einen Punkt haben. Ich habe mit folgendem Code versucht den Punkt mit einem Komma auszutauschen.
'Punkt zu Komma umwandeln
spalte = 4
ende = Cells(Rows.Count, spalte).End(xlUp).Row
Fo...
13.12.2008 16:42:57
Thread-ID: 1032657
7 Beiträge
Eintrag z.B. KW 52 durch Datum ersetzen
Hubert

Hallo liebe Forumsmitglieder,
aktuelle habe ich eine Frage zur Lösung folgender Aufgabenstellung:
In einer Zelle habe ich den Eintrag KW 51, KW 52,....
In der darunterliegenden zelle möchte ich automatisch das Datum dieser Woche eintragen:
Für die KW 15 : 15.12. - 21.12.08
...
18.12.2008 10:40:00
Thread-ID: 1033798
3 Beiträge
internetseite Punkt ist ein komma
Michael

Hallo!
Ich versuche die internetseite http://www.ls-d.de/Kursabfragen.15.0.html die Daten auszuwerten. Jedoch gibt es nach der Aktualisierung immer wieder den Punkt aus. 23.203 damit kann man keine Rechenoperation ausführen. Gibt es eine Möglichkeit die Werte mit einem Komma darzustellen au...
28.01.2009 17:27:33
Thread-ID: 1044643
4 Beiträge
TextBox Komma in Punkt umwandeln
Heinz

Hallo Leute
Wie kann ich bitte,wenn in Textbox6 ein Komma eingegeben wird, das es automatisch auf Punkt wechselt ?
Gruß
Heinz
28.01.2009 17:42:00
Thread-ID: 1044650
3 Beiträge
CSV selbst erstellt - Komma statt Punkt
Philipp

Hallo an alle!
Ich erzeuge über ein - im Archiv gefundenes - Makro aus den Daten eine CSV-Datei.
Für die verschiedenen Spalten brauch ich eigene Formatierungen (zB Spalte 2: Datumsformat mit ".", klappt).
Wie bekommen ich es hin, dass er bei den Werten (Spalten 4, 5 und 6) ein Komm...
29.07.2009 11:08:31
Thread-ID: 1092173
7 Beiträge
Anzeige
Punkt statt Komma
Peter

Seit ich Office XP installiert habe erscheint beim tippen des Punktes auf den Zahlenblock ein Komma. Wie kann ich dies ändern?
Vielen Dank für die Hilfe
01.05.2002 14:56:57
Thread-ID: 117636
3 Beiträge
Anzeige
"." in TextBox durch "," ersetzen
Sebastian Müller

Hallo,wie kann ich feststellen ob, in einer TextBox die Dezimalzahl mit einem "." statt einen "," eingegeben wurde? Wie kann ich dann den "." durch ein "," ersetzen?Danke,Sebastian
02.05.2002 08:49:29
Thread-ID: 117728
6 Beiträge
Formeln in best. Zeilen durch Wert ersetzen
Ramon

Hallo liebe VBA- und Makro-Experten.
Ich muß in einer datei mit rund 8.000 Zeilen in jeder 8. Zeile einer bestimmten Spalte
die Formel durch den Wert ersetzen. Jetzt kann ich zwar diese betreffenden Zeilen
per Autofilter filtern und dann kopieren. Aber "einfügen nur Wert" funktioni...
27.08.2010 14:54:50
Thread-ID: 1174538
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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