| |
|
|
| | Подскажите, в базе, в текстовом поле хранятся пути к картинкам, вида - c:\1.jpg
Как их можно вставить в ворд? Не пути, а именно как картинку? | |
| |
| |
| |
|
|
| | как-то так:
AppWord.selection.Range.InlineShapes.AddPicture FileName:=vstrImageFile
|
где AppWord - переменная, ссылающаяся на Word Application | |
| |
| |
| |
|
|
| | Спасибо, оно работает, но возник еще 1 вопрос - как в шаблоне указать место, куда вставлять эту картинку?
В случает с текстом - With appWord.ActiveDocument.Bookmarks
.Item("text").Range.Text = zakladka.text
А в случае с картинкой? | |
| |
| |
| |
|
|
| | а Вы сделайте в шаблоне табличку с невидимыми полями и одной ячейкой - и пихайте в эту ячейку | |
| |
| |
| |
|
|
| | проблема в том, что в разные части листа нужно вставлять несколько картинок (аналогично тексту с букмарками), т.е. указать места для вставки картинок | |
| |
| |
| |
|
|
| | ну тогда табличку размерностью х на у
я всегда темпелейты делаю в виде таблиц - форматировать легче ;) | |
| |
| |
| |
|
|
| | не это я понял...
я не понял как указать, что именно в эту табличку надо тыкать рисунок, просто в шаблоне много таблиц? | |
| |
| |
| |
|
|
| |
Dim wrd As Object, doc As Object, tbl As Object
...
Set tbl = doc.Tables.Item(1)
With tbl
.Cell(1, 1).Range = "мой текст"
...
|
| |
| |
| |
