Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Keine Sonderzeichen (VBA)

Forumthread: Keine Sonderzeichen (VBA)

Keine Sonderzeichen (VBA)
30.10.2003 18:36:17
jackie
Hallo liebe Forumsteilnehmer,

kann mir jemand einen Tipp geben, wie ich in VBA einen String auf Sonderzeichen bzw. Umlaute überprüfen kann?

Ich habe ein Userform, das von Benutzern (logisch...) ausgefüllt wird. Die Eingabe wird der Speichername für ein Dokument. Deshalb möchte ich alle Sonderzeichen und Umlaute unterbinden.

Kann mir hierbei jemand helfen?

Danke an alle,
Jackie
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Keine Sonderzeichen (VBA)
30.10.2003 19:03:53
chris-ka
Hallo
sowas?


Private Sub CommandButton1_Click()
For i = 1 To Len(Me.TextBox1.Text)
    texti = Me.TextBox1.Text
    If Mid(texti, i, 1) < Chr$(47) Or Mid(texti, i, 1) > Chr$(122) Or (Mid(texti, i, 1) > Chr$(57) And Mid(texti, i, 1) < Chr$(65)) Then
        MsgBox Mid(texti, i, 1) & " dieses Zeichen ist nicht erlaubt"
    End If
Next
End Sub
 
     Code eingefügt mit Syntaxhighlighter 1.16



Gruß
Christian
Anzeige
DANKE, ist perfekt! (o.T.)
31.10.2003 09:43:38
Jackie
*
;

Forumthreads zu verwandten Themen

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige