Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.03.16;
Скачать: CL | DM;

Вниз

MSWord Cell.Split   Найти похожие ветки 

 
VirEx ©   (2008-02-20 12:12) [0]

Есть шаблон с таблицами.
_________________________________________
|  Заголовок 1 |   Заголовок 2 |   Заголовок3    |
|_________________________________________|
|[param1.value]|[param2.value]| [param3.value]  |
|_________________________________________|

Допустим [param2.value] заменяется на "text2".
Если это значение многострочное, то в таблице его нужно разбить на строки.
Разбиваю: cell.Split(cell.Range.Paragraphs.Count, 1);
При этом текст находится только в первой строке ячейки.

Внимание вопрос: как распределить текст в строки разбитой ячейки?

cell.Range.Cut;
cell.Range.PasteAndFormat(wdTableInsertAsRows); <-- не работает
через WordApplication.Selection.PasteAndFormat( тоже не работает
обратиться к строкам разбитой ячейки не удается

Всё уже перепробовал. И в макросах подсматривал, и гуглил - нет результата. Притом в макросах такой метод работает а здесь ... :(


 
VirEx ©   (2008-02-20 14:11) [1]

up

неужели никто не разбивал ячейку с многострочным текстом и не рассовывал по новым строкам разбитой ячейки эти строки?


 
VirEx ©   (2008-02-20 14:33) [2]

есть решение, правда не ахти какое:

var
 tmp:TStrings;
...
//разбиваем-с
cell.Split(cell.Range.Paragraphs.Count, 1);
cell.Select;
tmp.Text := trim(Cell.Range);

for z := 0 to tmp.Count - 1 do begin
 WordApplication.Selection.Range := trim(tmp[z]);
 //переходим к концу строки
 WordApplication.Selection.MoveEnd(wdParagraph, 1);
 //переходим в след. ячейку
 WordApplication.Selection.MoveDown(wdLine, 1, wdMove);
end;



Страницы: 1 вся ветка

Текущий архив: 2008.03.16;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.016 c
11-1185458218
Lex1
2007-07-26 17:56
2008.03.16
Не совсем корректная работа ExtractFileName


2-1203449502
иВаня
2008-02-19 22:31
2008.03.16
TSpeedButton +DrawFocusRect


15-1202232861
terminalhead
2008-02-05 20:34
2008.03.16
Как в компоненнте Webbrowser пропускать ошибки


15-1202114841
Tornado
2008-02-04 11:47
2008.03.16
Выбор видеокамеры


2-1203094894
Knoob
2008-02-15 20:01
2008.03.16
Запись данных в реестр