Wer ist online?

Kein Mitglied    +    Kein Gast
Administrator
Moderator
Mitglied

Besucherstatistik

Heute Heute 9
Gestern Gestern 8
Woche Woche 38
Monat Monat 166
Gesamt Insgesamt 586105

Spenden

Vielen Dank für Deine Spende! Du hilfst uns damit, unsere Angebote auch weiterhin kostenlos zur Verfügung stellen zu können.

Betrag: 

 Forum :: Fragen zu Excel und VBA
Board- Index Letzte Beiträge Willkommen Gast   
 Betreff: Testeintrag.. 14.01.2011, 11:03:07 
P@ulchen
Administrator
Mitglied seit: 29.11.2010
Beiträge: 42
Ort: Leipzig
 
    Frage zu Excel-Version:  11.0 (Office 2003) 
1
2
3
4
5
6
7
8
 
'Prüfung während der Eingabe
 
Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
Select Case KeyAscii
    Case 48 To 57, 44 '44 = Komma
    Case Else: KeyAscii = 0
End Select
End Sub


Anhänge
 Testmappe1.xls [13 KB]
IP-Adresse aufgezeichnet
 Betreff: Aw: Testeintrag.. 14.01.2011, 11:04:07 
P@ulchen
Administrator
Mitglied seit: 29.11.2010
Beiträge: 42
Ort: Leipzig
 
    Frage zu Excel-Version:  11.0 (Office 2003) 
'Prüfung nach Verlassen der Textbox
 
Private Sub TextBox1_Change()
If Not IsNumeric(TextBox1.Text) Then
    TextBox1.Text = ""
End If
End Sub

 
IP-Adresse aufgezeichnet
 Betreff: Aw: Testeintrag.. 14.01.2011, 14:54:07 
ro_sch
Super-Moderator
Mitglied seit: 14.01.2011
Beiträge: 2
Ort: 
    Frage zu Excel-Version:  11.0 (Office 2003)
Hi,

nette Sache, das !

Antworten geht auch !!!
IP-Adresse aufgezeichnet
Seite # 




exceltreffen_kleinwww.exceltreffen.de - Wir sehen uns...

Diese Seite ist der Treffpunkt für Excelfreunde und solche, die es noch werden wollen... Du findest hier Info's zu geplanten Treffen, Bilder sowie Berichte zu vergangenen Treffen.

Du möchtest gern mal einen der Helfer aus einem Excel-Forum persönlich kennenlernen? Kein Problem!!!  

Anmelden - Buchen - Teilnehmen!