Главная страница
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.012 c
15-1299291123
Gydvin
2011-03-05 05:12
2011.06.26
Посоветуйте форум C++


15-1299958215
Fergo
2011-03-12 22:30
2011.06.26
Люди обясните что в этом коде не так???


1-1257767754
Chizhov
2009-11-09 14:55
2011.06.26
Определение начала/завершения сеанса пользователя из сервиса?


15-1299756594
Юрий
2011-03-10 14:29
2011.06.26
С днем рождения ! 8 марта 2011 вторник


15-1299249466
OW
2011-03-04 17:37
2011.06.26
Спрошу, а вдруг..