Zeichenkette kürzen

Forumthread: Zeichenkette kürzen
5 Beiträge zu diesem Forumthread
Anzeige

Forumthread: Zeichenkette kürzen

Zeichenkette kürzen

16.02.2006 09:25:42

Rene

Hallo. Habe folgendes Problem :
Habe eine Zeichenkette die ich in einer Listbox anzeigen lasse (oder mehrere).
Nun will ich eine davon anklicken und wenn ich auf den OK Button Klicke soll er von der ganzen markierten Zeichenkette die ersten 5 Buchstaben wegnehmen und ner Variable zuweisen, so das ich damit weiter arbeiten kann.
Bräucht dringend ne Lösung :-(

5
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Zeichenkette kürzen

16.02.2006 09:31:44

ede
AW: Zeichenkette kürzen

16.02.2006 09:53:17

Rene
AW: Zeichenkette kürzen

16.02.2006 10:05:52

ede
Korrektur

16.02.2006 10:15:51

ede
AW: Korrektur

16.02.2006 10:45:03

Rene

AW: Zeichenkette kürzen

16.02.2006 09:31:44

ede

guten morgen rene,
dann scha dir mal z. b. die funktion mid() oder Right() an.
gruss

AW: Zeichenkette kürzen

16.02.2006 09:53:17

Rene

Ja, aber weiss nicht so recht wie ich die Zeile auslese. Weil arbeite ja in ner Lsitox in ner Userform und net in der Mappe :-(

AW: Zeichenkette kürzen

16.02.2006 10:05:52

ede

hallo rene,
so zum beispiel:


Private Sub CommandButton1_Click()
Dim MyVariable As String
If ListBox1.Value > 5 Then
MyVariable = Mid(ListBox1.Value, 5)
Else
MyVariable = "Zeichenkette in Listbox1 zu kurz!"
End If
MsgBox MyVariable
End Sub

gruss

Korrektur

16.02.2006 10:15:51

ede

so natürlich:


Private Sub CommandButton1_Click()
Dim MyVariable As String
If Len(ListBox1.Value) > 5 Then
MyVariable = Mid(ListBox1.Value, 5)
Else
MyVariable = "Zeichenkette in Listbox1 zu kurz!"
End If
MsgBox MyVariable
End Sub

gruss

AW: Korrektur

16.02.2006 10:45:03

Rene

Funktioniert... DANKE !!

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