msgBox mit Text aus Tabelle und Steuerzeichen
07.11.2019 14:29:33
Stefan
ich möchte den Text für eine msgBox dynamisch mit Zeilenumbrüchen in einem Exel Tabellenblatt erzeugen.
In einer Zelle des Tabellenblatts steht folgender text:
"Text 1:" & Parameter1 & vbCrlf & "Text 2: " & Parameter2 & "Text 3: " & Parameter3
Den Inhalt der Zelle lese ich in eine Variable namens msgText ein.
Parameter 1-3 habe ich vorher in VBA mit Werten belegt.
Die Message Box rufe ich wie folgt auf:
Public Sub rtnSendMessage()
With Worksheets("Messages")
msgText = Worksheets("Messages").Range("MessageText")
MsgBox msgText
End With
End Sub
In der msgBox wird der komplette Text angezeigt:
"Text 1:" & Parameter1 & vbCrlf & "Text 2: " & Parameter2 & "Text 3: " & Parameter3
d.h. die Parameter und die Zeilenumbrüche werden nicht aufgelöst.
hat jemand eine Idee, was ich da falsch mache?
Ich vermute es liegt an der richtigen Kombination aus einfachen und doppelten Hochkommas.
Leider habe ich hier im Forum keine passenden Beiträge gefunden.
Danke im Voraus,
Stefan