Форум: "Основная";
Текущий архив: 2003.08.21;
Скачать: [xml.tar.bz2];
ВнизВыгрузка в 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 вся ветка
Форум: "Основная";
Текущий архив: 2003.08.21;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.007 c