Текущий архив: 2011.06.26;
Скачать: CL | DM;
Вниз
Работа с текстом в MS Word Найти похожие ветки
← →
lewka © (2011-03-16 18:56) [0]Здравствуйте!!! Есть код программы
try
MsWord:= CreateOleObject("Word.Application");
MsWord.Visible := True;
except begin
Showmessage("Не возможно запустить MS Word");exit;
end; end;
MsWord.Documents.Add;
MSWord.Selection.TypeText("Текст перед таблицой");
//Добавляется таблица
MyRange:=MSWord.ActiveDocument.Range(MSWord.ActiveDocument.Range.End-1,MSWord.ActiveDocument.Range.End-1);
MSWord.ActiveDocument.Tables.Add(Range:=MyRange, NumRows:=7, NumColumns:=2);
MSWord.Selection.TypeText(Текст в таблице");
Подскажите как теперь вставить текст после таблицы.
← →
_Юрий (2011-03-16 19:26) [1]открываем ворд, создаем макрос, включаем запись, делаем мышкой что надо, останавливаем запись макроса, смотрим получившийся код, переносим его в программу.
← →
KilkennyCat © (2011-03-16 20:36) [2]вставь весь текст сразу, откатись на нужную стоку, вставь таблицу
Страницы: 1 вся ветка
Текущий архив: 2011.06.26;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.006 c
