Live-Forum - Die aktuellen Beiträge
Datum
Titel
07.05.2024 16:36:49
Excel Arbeitszeit berechnung
07.05.2024 16:27:17
Definition und Nutzung von globalen Variablen
07.05.2024 14:51:38
Endlos-Journal
07.05.2024 13:27:17
Datum nach Auswahl prüfen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1196to1200
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
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 Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

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

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

329 Forumthreads zu ähnlichen 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
Anzeige
"#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
, 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
Anzeige
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
Punkt in xlText-file per vba durch Komma ersetzen
Bernd


Liebe Excel-Gemeinde,
mit dem nachstehenden Code wird ein Blatt mit xls-Format in ein Blatt txt-Format konvertiert.
With wbZiel
Application.DisplayAlerts = False
.SaveAs strFile, _
FileFormat:=xlText, CreateBackup:=False 'Zeile neu aufgenommen f. tabstopp getrennt<...
08.01.2010 14:27:26
Thread-ID: 1128272
7 Beiträge
Anzeige

Links zu Excel-Dialogen

TextBox

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
4
4
5
2
6
2
3
2
6
6
3
2
5
2
5
4
8
2
2
4
2
1
1
4
2