Тема: Вставить в word картинку в поле
Есть некий шаблон документа Word.
Каким образом определить, что в этом шаблоне-документе есть рисунок с именем "ПодписьГотов" и если есть , то очистить этот элемент с рисунком и заполнить его нужной картинкой?
Re: Вставить в word картинку в поле
Сам документ выглядит так:
Re: Вставить в word картинку в поле
Запустите нижеприведенный макрос. Если в активном документе имеется элемент управления содержимым "рисунок" с именем "ПодписьГотов", то откроется диалоговое окно. В этом окне выберите нужный файл рисунка и нажмите кнопку "Вставить"
Sub Insert_picture_in_ContentControl()
Dim i As Long
Dim cc As ContentControl
With ActiveDocument.ContentControls
For i = 1 To .Count
Set cc = .Item(i)
If cc.Type = wdContentControlPicture And cc.Title = "ПодписьГотов" Then
cc.Range.Select
Dialogs(wdDialogInsertPicture).Show
MsgBox "Рисунок вставлен"
Exit For
End If
Next i
End With
End Sub