Текстовое поле Excel Vba Userform, добавляющее разрывы строк html </ b> <p> ect

Поэтому я пытаюсь использовать Userform с текстовым полем в VBA excel 2013, когда вы вводите форматированный абзац в текстовое поле1, как это, с многострочным Enabled.

* Line1 information<br/> * Line2 information<br/> * Line3 information<br/> * Line4 information<br/> * Line5 information<br/> * Line6 information<br/> 

То, что вывод с помощью командной кнопки отправит этот код в столбце на листе excel с html-форматом.

 * Line1 information<br /> * Line2 information<br /> * Line3 information<br /> * Line4 information<br /> * Line5 information<br /> * Line6 information</p> 

С этим я хотел бы иметь возможность вставлять целые абзацы в текстовое поле и информацию, которую нужно передать в формате html.

  Private Sub UserForm_Initialize() 'Empty IDBox IDBox.Value = "" 'Empty NameBox NameBox.Value = "" 'Empty DescBox DescBox.Value = "" 'Set Focus on IDBox IDBox.SetFocus End Sub Private Sub Submit_Click() Dim emptyRow As Long 'Make Sheet1 active Sheet1.Activate 'Determine emptyRow emptyRow = WorksheetFunction.CountA(Range("A:A")) + 1 'Transfer information Cells(emptyRow, 1).Value = "Store1" Cells(emptyRow, 2).Value = "Default" Cells(emptyRow, 3).Value = IDBox.Value Cells(emptyRow, 4).Value = NameBox.Value Cells(emptyRow, 5).Value = DescBox.Value End Sub 

Код очень простой, а затем есть «store» «website» «id» «product_name» «product_description» внутри excel и команда buttom simle, которая открывает пользовательскую форму.

Interesting Posts

Как я могу искать ключ словаря по значению индекса?

Загрузка макросов макросов и удаление макросов

Возможно ли установить изображение позади значения ячейки с помощью EP Plus?

Получение последней измененной даты файла (значение проводника, а не значение cmd)

Получение файла excel после df.to_excel (…) с Panda

Как извлечь значения из строки значения метки в Excel VBA?

Функциональность Excel без Excel

Проверка данных перед загрузкой через SSIS

Форматирование Lost после определенного диапазона в Gmail при использовании RangetoHTML в автоматизации почты через EXCEL VBA

Захват всплывающих окон, предупреждений и исключений из Excel с помощью VB 2010

application.worksheetfunction.vlookup error 1004?

Настройка свойства Row для посмешивания Microsoft.Office.Interop.Excel.Range with Mock

Excel VBA удаляет строки Object Variable или с не заданной переменной блока

Константы Excel для сортировки

Обновление Xubuntu разбивает таблицы gnumeric graph в файле Excel

Давайте будем гением компьютера.