Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Конвертация текста в ячейке в html формат
 
#1
23.10.2018 17:37:44
Здравствуйте!
Подскажите, пожалуйста!
Есть большая таблица с описаниями. И эти описания нужно перевести в HTML формат в этой же таблице в соседний столбцец.
Как это можно сделать?
 
 
 
#2
23.10.2018 17:52:54
qwas72, есть множество решений на тему excel range to html,
например http://dailydoseofexcel.com/archives/2015/02/13/converting-an-excel-range-to-html-the-hard-way/
 
 
 
#3
23.10.2018 19:16:19
Думаю, нужно не совсем это,
а посимвольное считывание форматирования отдельных символов внутри ячейки, и формирование HTML на основании форматирования внутри ячейки
А это посложнее будет, и тут готовые решения мне не попадались
Надстройки для Excel  Парсинг сайтов  Мониторинг цен конкурентов
 
 
 
#4
23.10.2018 20:23:22
соглашусь с Игорь, но qwas72, Вы не хотете показать пример?
По вопросам из тем форума, личку не читаю.
 
 
 
#5
23.10.2018 22:12:58
Доброе время суток
Цитата
Игорь написал:
формирование HTML на основании форматирования внутри ячейки
Игорь, для одиночной ячейки можно воспользоваться примитивным переводом данных формата ячейки из XML в HTML (Владимир ZVI в своё время подсказал как это делается)
Код
?
1
2
3
4
5
6
7
8
9
10
11
12
Public Function CellTextToHtml(ByVal thisCell As Range) As Variant
    Dim pReg As Object, sText
    If thisCell.Count = 1 Then
        Set pReg = CreateObject("VBScript.RegExp")
        pReg.Pattern = "<ss:Data[^>]*>(.*?)</ss:Data>"
        sText = Replace$(Replace$(thisCell.Value(xlRangeValueXMLSpreadsheet), vbLf, " "), vbCr, " ")
        sText = pReg.Execute(sText)(0).SubMatches(0)
        CellTextToHtml = Application.Trim(Replace$(sText, "html:", ""))
    Else
        CellTextToHtml = CVErr(xlErrValue)
    End If
End Function

Примитивность здесь в том, что тэг Font в Html5 уже не поддерживается. Плюс, Replace$(sText, "html:", "") костыльно. Ну, или писать полноценный трасформер xslt. Получившийся Html вроде отображается в том же виде (ну, за исключением базового определения шрифта, конечно - это требует дополнения).
Скрытый текст
 
 
 
#6
24.10.2018 09:27:27
Цитата
БМВ написал:
соглашусь с  Игорь , но  qwas72 , Вы не хотете показать пример?
Показываю пример.
 
 
 
#7
24.10.2018 09:32:52
qwas72, Вы бы хоть одно "Описание HTML" заполнили вручную, а та что есть показали, а что надо - нет.

Формула массива (ФМ) вводится Ctrl+Shift+Enter
Memento mori
 
 
 
#8
24.10.2018 09:57:06
Так понятней?
 
 
 
#9
24.10.2018 10:09:23
qwas72, примерно так
Код
?
1
="<p>"&ПОДСТАВИТЬ(ПОДСТАВИТЬ(A2;СИМВОЛ(10);"<br />"&СИМВОЛ(10));"®";"&reg;")&"</p>"

Почему <br /> а не <br> ?
Вставка ";" в конце нумерованных строк не относится к преобразованию в HTML, это обработка текста.
 
 
 
#10
24.10.2018 10:25:07
Казанский Спасибо!
 
 
 
#11
24.10.2018 10:26:57
Цитата
Казанский написал:
Почему  <br />
Так определено в стандарте xhtml, чтобы html удовлетворял требованиям к xml, правда, он не взлетел. Html5 эти требования игнорирует.
 
 
 
#12
24.10.2018 10:42:40
Андрей VG, спасибо.
 
 
 
#13
11.03.2021 11:35:58
а как можно сделать это наоборот? например внутри ячейки пишу html, а отображает как будет выглядеть на сайте.
ганж хаз бин оверед ундер брайн.
 
 
 
#14
13.03.2021 13:25:31
А наоборот сделать - в другой теме
 
 
 
Страницы: 1
Читают тему
Наверх
Loading...