Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

TextBox-Inhalt mit und ohne Zeilenumbrüche auslesen

Gruppe

TextBox

Problem

Der Text der TextBox soll mit und ohne Zeilenumbrüche ausgelesen werden.

Lösung
Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn zwei Schaltflächen zu.

ClassModule: Tabelle1

Private Sub cmdA_Click()
   MsgBox txtBox.Text
End Sub

Private Sub cmdB_Click()
   Dim sTxt As String
   sTxt = txtBox.Text
   sTxt = WorksheetFunction.Substitute(sTxt, vbNewLine, " ")
   MsgBox sTxt
End Sub