Имя: Пароль:
1C
1С v8
как получить значение из док-та word?
, ,
0 dreamoff
 
15.09.11
14:02
есть док-т вордовский.нужно в нем одну строчку заменить на другую,если значение в строке удовлетворяет условию.скажите,как это сделать?
1 Axel2009
 
15.09.11
14:03
изучить VBA =)
2 shuhard
 
15.09.11
14:04
(0) запиши макрос в ворде и позырь содержимое
3 SuperMario
 
15.09.11
14:06
(0) Поиск отменили?
4 dreamoff
 
15.09.11
14:08
я нашел кучу примеров как добавить значение,но не как получить значение из ворда
5 SuperMario
 
15.09.11
14:11
(4) тогда не понял вопроса. Нужно заменить строку одну на другую. Теперь пишете про получение значения
6 shuhard
 
15.09.11
14:12
(4)[как получить значение из ворда]
получить в 1С ?
7 dreamoff
 
15.09.11
14:12
да,в 1с
8 shuhard
 
15.09.11
14:16
(7) цепляешь через com и ищешь
9 SuperMario
 
15.09.11
14:16
(7) Конкретно напиши, что хочешь в итоге.
10 Axel2009
 
15.09.11
14:23
для комобъекта подойдет тот макрос, который запишешь по поиску.
11 dreamoff
 
15.09.11
14:28
суть такая.из хранилищазначений извлекается вордовский док-т,в нем нужно найти определенную строчку и сравнить с определеным значением,если значение в строке не совпадает нашим,то заменяем его
12 Axel2009
 
15.09.11
14:30
запусти запись макроса. выдели строку и посмотри что запишется в макросе. это и используй для комобъекта.
13 Axel2009
 
15.09.11
14:37
номерзаменяемойстроки = 1;
Если КомОбъект.Paragraphs.Item(номерзаменяемойстроки).Range.Text = "твой текст" Тогда
КомОбъект.Paragraphs.Item(номерзаменяемойстроки).Range.Text = "новый текст";
КонецЕсли;
14 SuperMario
 
15.09.11
14:39
(11),(12) - ндааа. Поиск точно отменили.
(13) " ...все украдено еще до вас..."

Кусок кода ,который ищет в ворде строку и если находит то заменяет ее




    Извещение = MSWord.Application.Documents(1);
    Извещение.Activate();
    //определим имена
    ПримДата = "12.07.2010";
    //получить объект, который будем использовать для поиска и замены.
    Замена = Извещение.Content.Find;
    Замена.Execute("ДатаПриказа", Ложь, Истина, Ложь, , , Истина, , Ложь, ПримДата);
    MSWord.Application.Visible = Истина;
    MSWord.Activate();
15 SuperMario
 
15.09.11
14:40
v8: 1C+WORD, Разбираю пример
v8: word+1C

Здесь много интересного есть.
16 Axel2009
 
15.09.11
14:47
(14) если заменяемая строка не находится в 2х местах, заменить нужно только одно.
17 SuperMario
 
15.09.11
15:48
(16) НЕ понял ничего . Что значит "не находится в двух местах"?
18 Axel2009
 
15.09.11
15:51
(17) "прокатит если.." и далее по тексту.
19 SuperMario
 
15.09.11
16:02
(18) Имеешь в виду, если строка поиска встречается более, чем в одном месте?

Если так, то для начала по пробуй (14)
20 Axel2009
 
15.09.11
16:09
(19) и что? заменит только первое значение?
21 SuperMario
 
15.09.11
16:35
(20) заменит только первое
Требовать и эффективности, и гибкости от одной и той же программы — все равно, что искать очаровательную и скромную жену... по-видимому, нам следует остановиться на чем-то одном из двух. Фредерик Брукс-младший