Chr()

Forumthread: Chr()

Chr()

22.04.2005 11:34:23

Gregor

Hallo
Ich möchte die Variable Test (zB. Sommer_) bei der Wiedergabe in einer MsgBox ohne Underline anzeigen.
Ich versuchte es wie folgt, klappt aber nicht:
Test.Replace What:=Chr(95), Replacement:="", LookAt:=xlPart
Wie muss ich das anstellen, wenn die Variable mit Underline eingelesen wird?
Vielen Dank und Gruss
Gregor

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Chr()

22.04.2005 11:45:32

WernerB.
AW: Chr()

22.04.2005 12:00:59

Gregor

AW: Chr()

22.04.2005 11:45:32

WernerB.

Hallo Gregor,
wie gefällt Dir das?


Sub Gregor()
Dim Test As String
Test = "Sommer_"
'Variante 1:
MsgBox WorksheetFunction.Substitute(Test, "_", "")
'Variante 2:
MsgBox WorksheetFunction.Substitute(Test, Chr(95), "")
End Sub

Viel Erfolg wünscht
WernerB.
P.S.: Dieses Forum lebt auch von den Rückmeldungen der Fragesteller an die Antworter !

AW: Chr()

22.04.2005 12:00:59

Gregor

Werner
Beide Varianten klappen bestens. Ich habe Variante 2 eingebaut, vielen Dank.
Gruss aus Luzern
Gregor

Forumthread: Chr()

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

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread