ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / RTF в Excel
14 сообщений из 14, страница 1 из 1
RTF в Excel
    #34301587
sfsdfg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
sfsdfg
Гость
Привет.
Есть BLOB-поле в базе, в нем RTF текст...подскажите, пожалуйста, как записать это
Код: plaintext
1.
2.
{\rtf1\ansi\ansicpg1251\deff0\deflang1049{\fonttbl{\f0\fswiss\fprq2\fcharset204{\*\fname Arial;}Arial CYR;}}
{\*\generator Riched20 5.50.99.2010;}\viewkind4\uc1\pard\f0\fs16\'d2\'e5\'f1\'f2\'ee\'e2\'e0\'ff \'e7\'e0\'ec\'e5\'f2\'ea\'e0\par
}
в "человеческом" виде в ячейку Excel.
Спасибо.
...
Рейтинг: 0 / 0
02.02.2007, 11:45:31
| Ответить | Цитировать | Написать  
RTF в Excel
    #34301773
Фотография Бенедикт
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Бенедикт
Участник
sfsdfg, привет.

Интересный вопрос. В ответ два: 1) есть RICHTX32.OCX (возможно, с лицензией разработчика)? 2) стили надо копировать?
...
Рейтинг: 0 / 0
02.02.2007, 12:20:33
| Ответить | Цитировать | Написать  
RTF в Excel
    #34301827
sfsdfg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
sfsdfg
Гость
RICHTX32.OCX - этого нет.
Нужен только русский текст, без стилей.
...
Рейтинг: 0 / 0
02.02.2007, 12:32:09
| Ответить | Цитировать | Написать  
RTF в Excel
    #34301836
sfsdfg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
sfsdfg
Гость
А не, есть...подключить, наверно надо....
...
Рейтинг: 0 / 0
02.02.2007, 12:33:07
| Ответить | Цитировать | Написать  
RTF в Excel
    #34301860
Фотография Бенедикт
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Бенедикт
Участник
Да, надо подключить в VBA-шный проект.
...
Рейтинг: 0 / 0
02.02.2007, 12:38:56
| Ответить | Цитировать | Написать  
RTF в Excel
    #34301873
Фотография Бенедикт
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Бенедикт
Участник
Дальше что-то вроде
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Sub Test()
 Dim RTB As RichTextBox
 Set RTB = New RichTextBox
 RTB.TextRTF = "{\rtf1\ ...}"
 ActiveCell.FormulaR1C1 = RTB.Text
 Set RTB = Nothing
End Sub
...
Рейтинг: 0 / 0
02.02.2007, 12:42:27
| Ответить | Цитировать | Написать  
RTF в Excel
    #34301880
Фотография Бенедикт
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Бенедикт
Участник
Подключать надо в References.
...
Рейтинг: 0 / 0
02.02.2007, 12:43:50
| Ответить | Цитировать | Написать  
RTF в Excel
    #34301911
sfsdfg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
sfsdfg
Гость
Grazie mille...
...
Рейтинг: 0 / 0
02.02.2007, 12:49:16
| Ответить | Цитировать | Написать  
RTF в Excel
    #34302023
Фотография Бенедикт
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Бенедикт
Участник
Nonlo accenni (?)
...
Рейтинг: 0 / 0
02.02.2007, 13:10:38
| Ответить | Цитировать | Написать  
RTF в Excel
    #34302166
sfsdfg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
sfsdfg
Гость
Questa e soluzione lenta...С'e un'idea altra? Hai alcuni manuali dell RICHTX32.OCX?
...
Рейтинг: 0 / 0
02.02.2007, 13:37:22
| Ответить | Цитировать | Написать  
RTF в Excel
    #34302295
sfsdfg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
sfsdfg
Гость
Dopotutto...almeno stavolta lavori...но медленно. Нет ли в RICHTX32.OCX какой-то функции конвертера, которая сразу переводит?
...
Рейтинг: 0 / 0
02.02.2007, 14:01:04
| Ответить | Цитировать | Написать  
RTF в Excel
    #34302368
Фотография Бенедикт
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Бенедикт
Участник
manuali dell RICHTX32.OCX
idea altra состоит в том, что разбирать rich text надо тем же средством, что его собирали: Riched20.dll (кстати, версия 5.50 - это какая ОС+SP?). Это превращает программу на VBA в программу на C (по стилю): RegisterClassEx, CreateWindowEx, оконная процедура для хозяйского окна, CreateWindowEx("RichEdit20W") для rich edit-а, далее общение через SendMessage. Либо работа с безоконным видом rich edit-а через Text Object Model. Подробности здесь . Спецификация формата RTF здесь .
...
Рейтинг: 0 / 0
02.02.2007, 14:15:58
| Ответить | Цитировать | Написать  
RTF в Excel
    #34302412
Фотография Бенедикт
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Бенедикт
Участник
Я уловил (с трудом), что медленно, но не понял про "сразу всё". Если надо заполнить сразу множество ячеек, то можно поступить так: создать RichTextBox один раз, забить в RichTextBox сразу содержимое всех полей из базы, например, по параграфам (или ввести какую-то разметку в виде не встречающегося в текстах символа). Далее, манипулируя .SelXXX свойствами, раздавать уже формулы ячейкам. Как бы вот эта раздача больше всего времени и не занимала.
...
Рейтинг: 0 / 0
02.02.2007, 14:26:15
| Ответить | Цитировать | Написать  
RTF в Excel
    #34302478
sfsdfg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
sfsdfg
Гость
Да в принципе нормально...Просто там отчет большой...сейчас сделал, что записи рекордсета поочереди пишутся в Box, а из него в ячейку...Просто думал, что может есть какая-то готовая функция-конвертер, чтоб таким лаптям как я голову лишний раз с COM'ами не ломать...
Ладно, quello che e. Comunque ancora grazie....
...
Рейтинг: 0 / 0
02.02.2007, 14:39:57
| Ответить | Цитировать | Написать  
14 сообщений из 14, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / RTF в Excel
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&msg=34301836&tid=2183516]:
 0ms
get settings:
 7ms
get forum list:
 10ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 48ms
get topic data:
 13ms
get forum data:
 2ms
get page messages:
 38ms
get tp. blocked users:
 1ms
others: 230ms
total:  353ms
созд. / загр.: 353ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]