Имя: Пароль:
1C
1С v8
Добавление рисунка в конец документа Word
0 SeregaSV
 
14.07.14
20:49
Добрый вечер всем. Подскажите , у документа в 1С есть макет Word, необходимо программно добавить рисунок , но он добавляет в начало документа, а надо в конец. Может кто знает как ? Сейчас код для вставки такой

        MSWord.ActiveWindow.View.ShowFieldCodes = False;
    MSWord.Application.Visible = Истина;
    MSWord.Activate();
            
    РисунокДок = MSWord.InlineShapes.AddPicture("d:\123.jpg", False, True);
1 фобка
 
14.07.14
20:51
Конец документа это range или selection, ты ж не задал ему ничего
2 Wobland
 
14.07.14
20:51
макрос знает
3 SeregaSV
 
14.07.14
21:00
Весь код примерно такой с заполнением полей

Макет = Получитьмакет("ДДУ");
MSWord = Макет.Получить();
Документ = MSWord.Application.Documents(1);
Документ.Activate();

//Заполняются поля

Документ.Fields.Update();

MSWord.ActiveWindow.View.ShowFieldCodes = False;
MSWord.Application.Visible = Истина;
MSWord.Activate();
4 SeregaSV
 
14.07.14
21:00
Подскажите куда добавить? Не работал раньше с VBA
5 Wobland
 
14.07.14
21:11
(4) сервис - макросы - добавить
6 SeregaSV
 
14.07.14
21:28
а в коде нужно будет обратиться к макросу ?
7 Wobland
 
14.07.14
21:28
(6) нет
8 фобка
 
14.07.14
21:31
(6) цмккрос нужен для того чтобы посмотреть код vba
9 RomaH
 
naïve
14.07.14
23:29
(8) макрос работает с селекшеном - а как его выберешь ?
утречком посмотрю код - мучался с созданием сводного документа из нескольких
10 RomaH
 
naïve
14.07.14
23:30
+(9) и зачастую оперирует буфером обмена - что не есть хорошо
11 RomaH
 
naïve
14.07.14
23:31
12 DrZombi
 
гуру
15.07.14
06:29
(6) Да Офис сам пишет Макрос на основе действия пользователя.
Тебе потом останется проанализировать Сгенерированный VBA код и написать так же в 1С :)