Скачать: CL | DM;

Выгрузка в Excel   Найти похожие ветки 

← →
Alexno   (2003-08-07 12:42) [0]

Как программно заменить во ВСЕЙ КНИГЕ excel значения на нужные мне?
Например, в книге встречется <#FIO_BOSS>. Надо, что в в это
место вставилось Alexno %-)
C вордом я уже научился. А тут не получается. Смотрел, как на basic"е макрос получается, но портировать в паскаль не получается.
в ворде делал так:

WORD:=CreateOleObject("Word.Application");
WORD.Documents.Open(file_in);
Word.Selection.Find.ClearFormatting;
Word.Selection.Find.Replacement.ClearFormatting;
Word.Selection.Find.Text := _Label;
Word.Selection.Find.Replacement.Text := _Value;
Word.Selection.Find.Forward:= True;
Word.Selection.Find.Wrap := wdFindContinue;
Word.Selection.Find.Format:=False;
Word.Selection.Find.MatchCase:=False;
Word.Selection.Find.MatchWholeWord:= False;
Word.Selection.Find.MatchWildcards:= False;
Word.Selection.Find.MatchSoundsLike:= False;
Word.Selection.Find.MatchAllWordForms:= False;
Word.Selection.Find.Execute(Replace:=wdReplaceAll);

а в экселе по-другому это все как-то %-)
Спасибо.

---

← →
Alexno ©   (2003-08-07 17:19) [1]

Ну и не надо. Я уже сам разобрался %)

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.012 c