Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema MsgBox
BildScreenshot zu MsgBox MsgBox-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema Userform
BildScreenshot zu Userform Userform-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema TextBox
BildScreenshot zu TextBox TextBox-Seite mit Beispielarbeitsmappe aufrufen

Textfeld im VGA formatieren

Betrifft: Textfeld im VGA formatieren von: Nadine
Geschrieben am: 20.08.2008 13:37:42

Hallo,

ich habe im VBA eine Userform erstellt und möchte jetzt, dass in einem der Textfelder nur Zahlen stehen dürfen und das diese dann in Euro (zwei Kommastellen) umgewandelt werden.

Außerdem soll in einem weiteren Textfeld nur Zahlen stehen dürfen (ohne Währungsformatierung).

Bitte um HILFE,
Vielen Dank
Nadine

  

Betrifft: AW: Textfeld nur zahlen von: hary
Geschrieben am: 20.08.2008 14:05:33

Hallo Nadine
Aus dem Archiv!


Private Sub txtNumber_Change()
   If Len(txtNumber.Text) = 0 Then Exit Sub
   If Not Right(txtNumber, 1) Like "[0-9]" Then
      Beep
      MsgBox "Nur Zahlen bitte!"
      With txtNumber
         .SetFocus
         .SelStart = txtNumber.TextLength - 1
         .SelLength = 1
      End With
   End If
End Sub


Gruss Hary


  

Betrifft: AW: Textfeld nur zahlen von: Nadine
Geschrieben am: 20.08.2008 14:14:10

Hi,

ich hab diese Formel bereits eingegeben:

Range("F12").Select
Selection.NumberFormat = "#,##0.00 $"

jedoch findet die Formatierung nur statt wenn in dem Textfeld eine Zahl ohne Nachkommastellen eingegeben wird.


  

Betrifft: AW: Textfeld nur zahlen von: hary
Geschrieben am: 20.08.2008 14:29:32

Hallo Nadine
Hier noch ein Code von Rudi aus dem Archiv


Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
    Select Case KeyAscii
        Case 48 To 57, 44, 46
        Case Else
        KeyAscii = 0
    End Select
End Sub


ansonsten gib mal in der Archiv-Suche "textfeld nur zahlen" ein. Habe da ne Menge gefunden, auch mit Format.
Gruss Hary


 

Beiträge aus den Excel-Beispielen zum Thema "Textfeld im VGA formatieren"