Гиперссылка на статическое изображение с URL из определенного поля

Question

Я пытаюсь выполнить многошаговую функцию vba, основанную на ячейке, которая будет динамически изменяться в зависимости от другого обновляемого поля.Для упрощения:

• Ячейка B12 на листе 1 = URL (определенное имя «Company_URL»), которая изменяется при обновлении B11 на листе 1.
• При изменении этого URL-адреса я хочудля гиперссылки на изображение в листе 2 с этим URL.
• изображение называется «app»

Sub HyperLink()

    ActiveSheet.Hyperlinks.Add _
    Anchor:=Worksheets("Sheet2").Shapes("app"), _
    Address:="http://" & Range("Company_URL").Value

End Sub

Это ошибка, указывающая, что элемент с указанным именем не найден,

Я также хотел бы добавить изображение (называемое "image2") в Sheet2! C12: e14, если Sheet1! B11 = "john" "jim" "doug".

Любая помощь в этом очень ценится.

Answer 1

Ваша проблема в том, что Excel не распознает картинку под именем «приложение».Либо вам нужно вручную выбрать изображение по индексу, либо вы сами должны назвать его как «приложение», прежде чем сможете его выбрать.

Sub HyperLink()

    'Name the shape at index 1 as "app"
    Sheets(2).Shapes(1).Name = "app"

    'Link to the shape previously named "app"
    Sheets(2).Hyperlinks.Add Anchor:=Sheets(2).Shapes("app"), _
        Address:=Sheets(1).Range("B12").Value2

End Sub