Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 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.009 c
15-1299841652
$00000001
2011-03-11 14:07
2011.06.26
сформулировать предложение


15-1299015810
Veta
2011-03-02 00:43
2011.06.26
Установка Delphi 7


13-1126768691
MeF Dei Corvi
2005-09-15 11:18
2011.06.26
C# 3 или Linq


15-1298988109
Дмитрий С
2011-03-01 17:01
2011.06.26
Как б встретится?


3-1261456991
d@nger
2009-12-22 07:43
2011.06.26
2 таблицы Firebird