8.х Работа с MS Word

Тема в разделе "Конфигурирование на платформе "1С:Предприятие 8"", создана пользователем andrew76, 5 июл 2010.

  1. TopicStarter Overlay
    andrew76
    Offline

    andrew76

    Регистрация:
    22 янв 2007
    Сообщения:
    44
    Симпатии:
    0
    Баллы:
    1
    Не получается вставить в файл MS Word картинку (спозиционированную
    в правый верхний угол страницы документа Word).Кто-нибудь занимался подобным?
    Картинка-файл типа .jpg -находится (к примеру) C:\Photo\1.jpg .
  2. makfromkz
    Offline

    makfromkz

    Регистрация:
    12 июн 2009
    Сообщения:
    25
    Симпатии:
    0
    Баллы:
    1
    вот запись макроса в ворде:

    Код:
    Sub Макрос1()
    '
    ' Макрос1 Макрос
    ' вставка картинки
    '
    Selection.InlineShapes.AddPicture FileName:= _
    "C:\Users\Public\Pictures\Sample Pictures\Penguins.jpg", LinkToFile:= _
    False, SaveWithDocument:=True
    End Sub
    
    
    выполни его в 1С
  3. TopicStarter Overlay
    andrew76
    Offline

    andrew76

    Регистрация:
    22 янв 2007
    Сообщения:
    44
    Симпатии:
    0
    Баллы:
    1
    вот такой код получился :
    Код:
    
    Word = Новый COMОбъект("Word.Application");
    Word.Documents.Add();
    Документ = Word.ActiveDocument();
    НомерПараграфа = Документ.Paragraphs.Count();
    Параграф = Документ.Paragraphs.Item(НомерПараграфа);
    
    path_file=C:\Photo\1.jpg;
    Параграф.Range.InlineShapes.AddPicture(path_file);
    
    следующий вопрос-не удается установить обтекание картинки текстом.
  4. TopicStarter Overlay
    andrew76
    Offline

    andrew76

    Регистрация:
    22 янв 2007
    Сообщения:
    44
    Симпатии:
    0
    Баллы:
    1
    При попытке выставить свойство-обтекание текстом Word написал
    следующую строку:

    Selection.ShapeRange.ZOrder 4

    Как это написать в 1С?

Поделиться этой страницей