Chr()

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
MsgBox
  • Chr() von Gregor vom 22.04.2005 09:34:23
Bild

Betrifft: Chr()
von: Gregor
Geschrieben am: 22.04.2005 09:34:23
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

Bild

Betrifft: AW: Chr()
von: WernerB.
Geschrieben am: 22.04.2005 09:45:32
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 !
Bild

Betrifft: AW: Chr()
von: Gregor
Geschrieben am: 22.04.2005 10:00:59
Werner
Beide Varianten klappen bestens. Ich habe Variante 2 eingebaut, vielen Dank.
Gruss aus Luzern
Gregor
 Bild

Beiträge aus den Excel-Beispielen zum Thema "VBA Projekt nicht schützen!"