ich verwende momentan folgenden Code zur Erstellung einer MessageBox.
Kann mir jemand sagen, was ich hier ändern muss, damit der Text statt in einer MessageBox in einer UserForm (UserForm2, TextBox2) erscheint ?
Sub About_Msg()
Dim strMldg As String
strMldg = strMldg & "TEXT1" & vbLf
strMldg = strMldg & "" & vbLf
strMldg = strMldg & "TEXT2" & Worksheets(2).Range("I3") & vbLf
strMldg = strMldg & "" & vbLf
strMldg = strMldg & "TEXT3" & vbLf
strMldg = strMldg & "TEXT3a" & Format(Worksheets(2).Range("I7"), "#,##0") & vbLf
strMldg = strMldg & "TEXT3b" & Format(Worksheets(2).Range("I8"), "#,##0") & vbLf
strMldg = strMldg & "TEXT3c" & Format(Worksheets(2).Range("I9"), "#,##0") & vbLf
strMldg = strMldg & "TEXT3d" & Format(Worksheets(2).Range("I10"), "#,##0") & vbLf
strMldg = strMldg & "" & vbLf
strMldg = strMldg & "TEXT4" & vbLf
strMldg = strMldg & " - TEXT5" & vbLf
strMldg = strMldg & " - TEXT6" & vbLf
strMldg = strMldg & "" & vbLf
strMldg = strMldg & "TEXT7" & Worksheets(2).Range("I4") & " TEXT8"
MsgBox strMldg, vbOKOnly, "About"
End Sub
VG und vielen Dank Euch im Voraus für jeden Tipp, Marc