Имя: Пароль:
1C
1С v8
Поиск текста в Word
0 bborisko
 
16.08.13
10:21
Делаю печать в Word. Тут много уже тем было, но вот такой вроде не видел. Мне надо получить из документа все параметры. Тоесть я в документе написал {Параметр1} текст {Параметр2}. Как мне найти все такие параметры и считать их в 1С?
1 Cube
 
16.08.13
10:25
Зачем их считывать? Какой смысл?
2 bborisko
 
16.08.13
10:29
(1) Чтобы не искать как их обозвал пользователь в многостраничном доке.
3 Cube
 
16.08.13
10:32
Открой word, введи в поиск { и нажимай далее... Ради разовой работы велосипед городить...
Что, "лучше день потерять, потом за пять минут долететь"? :)
4 uno-group
 
16.08.13
10:33
я делал для автоматизации создания договоров по шаблону чтото типа этого
Fnd=Ворд.ActiveDocument.Range().Find;
Fnd.Execute("*Srok*",,,,,,,,,СокрЛП("Срок - при следующей отгрузке"),2);
5 bborisko
 
16.08.13
10:34
(3) А заодно научусь считывать данные из Ворда - полезно
6 uno-group
 
16.08.13
10:34
меняет *Srok* на в зависимости от условий на заданые параметры ну и остальные тексты типа директор реквизиты и т.п заменяет
7 bborisko
 
16.08.13
10:35
(6) Это именно замена - а мне бы наоборот прочитать надо.
8 bborisko
 
16.08.13
10:38
Есть у кого то пример - как считать Word файл в 1с?
9 Cube
 
16.08.13
10:39
(5) Абсолютно лишние знания...
10 OZFIN
 
16.08.13
10:43
(8) Попробуй это.

http://help1c.com/faq/view/1027.html
11 bborisko
 
16.08.13
10:47
(10) Спасибо!
12 uno-group
 
16.08.13
10:47
нафига при печате в ворд потом еще чтото в нем искать.
13 bborisko
 
16.08.13
10:49
(10) Получилось, текст считался. А как бы теперь в этом тексте найти {*}
14 OZFIN
 
16.08.13
10:55
(13) Попробуй организовать поиск при считывании текста или искать вот так:

Selection = COMОбъект.Selection;
Selection.Find.Execute("Твой текст");
15 OZFIN
 
16.08.13
10:59
(14) Вот полный код, сдесь я заменяю текст на картинку:

Selection = COMОбъект.Selection;
Selection.Find.Execute("Твой текст");
Picture = Selection.InLineShapes.AddPicture(ИмяФайла, False, True);