Задать вопрос
@Begginer_serg

Как вставить картинку имея её динамический URL?

Добрый день, подскажите пожалуйста, как можно исправить следующий код?
Суть - есть форма, там каждый раз уникальная ссылка, код читает эту ссылку сохраняет в переменную URL и потом вставляет это фото. Но не получается вставлять через переменную - только если задавать путь через "url"..

Sub urlfetch()
    Dim shpCanvas As Shape
    Dim i As Byte
    For Each shp In ActiveDocument.Shapes
    If shp.Name = "urlbox" Then
        URL = shp.TextFrame.TextRange.Text
        Set shpCanvas = ActiveDocument.Shapes.AddCanvas(Left:=20, Top:=790, Width:=20, Height:=10)
        shpCanvas.CanvasItems.AddPicture FileName:="https://stihi.ru/pics/2016/11/30/4463.jpg"
    End If
 Next
End Sub

630482fdafe88455001511.png63048300f3c2f432666689.png
  • Вопрос задан
  • 144 просмотра
Подписаться 1 Простой 9 комментариев
Помогут разобраться в теме Все курсы
  • Яндекс Практикум
    Основы Excel для работы
    1 неделя
    Далее
  • Skillbox
    Excel + Google Таблицы с нуля до PRO
    4 месяца
    Далее
  • SF Education
    Excel Academy
    2 месяца
    Далее
Пригласить эксперта
Ваш ответ на вопрос

Войдите, чтобы написать ответ

Похожие вопросы