Как преобразовать многострочный ввод строки из текстового поля (в пользовательской форме) в однострочную строку ввода (vba word)

Question

Я создал пользовательскую форму на VBA (слово), где пользователь вводит текст многострочного текста в TextBox1. Я хочу преобразовать это в одну строку строки. Я пробовал следующее:

'Replace method 
TextBox1.Text = TextBox1.Text.Replace what:=vbFl replacement:=""

Это приводит к "недопустимому квалификатору" в отношении.Text

'Replace function
TextBox1.Text = Replace(TextBox1.Text, vbLf, "")

Это не приводит к ошибке, но не выполняет необходимое преобразование.

Answer 1

В Word вы также должны учитывать возврат каретки. Есть три способа сделать это по-своему:

'Replace function
TextBox1.Text = Replace(TextBox1.Text, vbCr + vbLf, "")
TextBox1.Text = Replace(TextBox1.Text, Chr(10) + Chr(13), "")
TextBox1.Text = Replace(TextBox1.Text, vbCrLf, "")