Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Textbox Währungsformat auch mit negativem Betrag
zurück: Text einer Zelle soll in die nächste überlappen weiter: von Tabelle 1 zu 2 kopieren dabei nach Priorität sortiern Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Offen Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Reh
Im Profil kannst Du frei den Rang ändern


Verfasst am:
30. Apr 2014, 13:10
Rufname:

Textbox Währungsformat auch mit negativem Betrag - Textbox Währungsformat auch mit negativem Betrag

Nach oben
       Version: Office 2007

Hallo ihr Lieben,
ich habe ein Textfeld, in das nur Zahlen eingetragen werden sollen. Das Textfeld ist im € Format. So zeigt es mir eine 20 als 20,00 € an. Soweit alles gut. Wenn ich jetzt einen negativen Betrag eingebe, streikt das Textfeld (zunächst). Gebe ich einen + Betrag ein, klicke dann mit der Maus an den Zeilenanfang und tippe jetzt ein - , dann gehts.
Kann mir jemand verraten, woran das liegt und was ich ändern muss?
Würde mich echt freuen.
Vielen Dank schon mal.
Grüße
E. Reh

Hier mein Code (zusammengebastelt aus Tips, 99% aus diesem Forum -DANKE!)

Private Sub TextBox8_Change()
If ComboBox4.ListIndex >= 0 Then
Worksheets("Aktuelle_Tagung").Cells(2, "bm").Offset(ComboBox4.ListIndex, 0) = Format(TextBox8.Text, "#,##0.00 €")
End If
'Nur Zahlen eingeben--------------------'Nur Zahlen eingeben--------------------'Nur Zahlen eingeben--------------------
If Not IsNumeric(TextBox8.Text) And TextBox8.Text > "" Then
MsgBox "Bitte nur Beträge (Zahlen) eingeben!", vbCritical
TextBox8.Text = ""
End If
End Sub
Rudi M.
Gast


Verfasst am:
30. Apr 2014, 14:14
Rufname:

AW: Textbox Währungsformat auch mit negativem Betrag - AW: Textbox Währungsformat auch mit negativem Betrag

Nach oben
       Version: Office 2007

Hallo,
Zitat:
Das Textfeld ist im € Format.

Das ist mir vollkommen neu, dass man einer Textbox ein Zahlenformat geben kann. Textboxen enthalten immer Text.

Zitat:
= Format(TextBox8.Text, "#,##0.00 €")

damit schreibst du Text in deine Tabelle, keine Zahl.

Die Prüfung würde ich so machen:
Code:
Private Sub TextBox8_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
  Select Case KeyAscii
    Case Asc("0") To Asc("9"), Asc(","), Asc("+"), Asc("-")
    Case Else: KeyAscii = 0
  End Select
End Sub

Gruß
Rudi
Reh
Im Profil kannst Du frei den Rang ändern


Verfasst am:
30. Apr 2014, 14:34
Rufname:

AW: Textbox Währungsformat auch mit negativem Betrag - AW: Textbox Währungsformat auch mit negativem Betrag

Nach oben
       Version: Office 2007

Hallo Rudi M,
danke für deine Antwort. Ich habe das mal getestet / gegen meinen getauscht. Jetzt kann ich nur Zahlen mit +/- eingeben, das ist gut und ich werde das übernehmen.
Meinen "alten" Code habe ich versuchsweise in AfterUpdate gepackt, so kann ich auch direkt ein - davor setzten.

zu
Das ist mir vollkommen neu, dass man einer Textbox ein Zahlenformat geben kann. Textboxen enthalten immer Text.
und
damit schreibst du Text in deine Tabelle, keine Zahl.

mag sein, (habe eigentlich keine Ahnung von VBA, bastle halt so rum und lerne dabei) aber es funktioniert und Excel rechnet mit dem Text / der Zahl auch fehlerfrei, obwohl sie in der Zelle als Text formatiert sind. Auch bei anderen Textfeldern habe ich Zahlen und Formeln und das geht ganz gut.

nochmals Danke und Grüße
E. Reh
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Excel Formeln: Betrag berechnen 2 Matula1980 291 06. Okt 2011, 15:37
Matula1980 Betrag berechnen
Keine neuen Beiträge Excel Formeln: Formel Monat/Betrag 7 sekugu 196 01. Sep 2011, 15:27
sekugu Formel Monat/Betrag
Keine neuen Beiträge Excel Formeln: Datum - Dazwischen liegende Tage berechnen? / Betrag angeben 18 Basti-M5 66572 11. Jul 2011, 23:26
Gast Datum - Dazwischen liegende Tage berechnen? / Betrag angeben
Keine neuen Beiträge Excel Formeln: Bei positivem Zellwert 1 addieren, bei negativem 1 abziehen 2 ytsejam 190 04. Jul 2011, 23:35
ytsejam Bei positivem Zellwert 1 addieren, bei negativem 1 abziehen
Keine neuen Beiträge Excel Formeln: Betrag/Euro der Tageskilometer 4 hoppelpoppel 181 30. Jun 2011, 12:59
hoppelpoppel Betrag/Euro der Tageskilometer
Keine neuen Beiträge Excel Formeln: Jeder Zeile xx Betrag zurechnen 3 Gast 192 22. Aug 2010, 22:16
Gast Jeder Zeile xx Betrag zurechnen
Keine neuen Beiträge Excel Formeln: Bestimmten Betrag an einem bestimmten Datum automatisch 3 hitman1109 301 24. Jul 2010, 08:55
Gast Bestimmten Betrag an einem bestimmten Datum automatisch
Keine neuen Beiträge Excel Formeln: Rechenformeln für Userform- TextBox + ComboBox 1 espresso 1604 08. Jun 2010, 09:30
Gast Rechenformeln für Userform- TextBox + ComboBox
Keine neuen Beiträge Excel Formeln: Daten aus Textbox in Tabelle übernehmen 1 Reginchen: 1395 22. Jul 2009, 13:17
licht Daten aus Textbox in Tabelle übernehmen
Keine neuen Beiträge Excel Formeln: Prüfen, ob Textbox gefüllt ist 2 hansi11 3332 20. Jul 2009, 14:06
hansi11 Prüfen, ob Textbox gefüllt ist
Keine neuen Beiträge Excel Formeln: Betrag in Worten 7 welle 5957 18. Nov 2008, 17:35
welle Betrag in Worten
Keine neuen Beiträge Excel Formeln: Automatiasches Ausfüllen mit Euro Betrag 2 Schnuller 279 08. Okt 2008, 14:17
Schnuller Automatiasches Ausfüllen mit Euro Betrag
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Microsoft-Excel Diagramme