Изменить изображение формы изображения

Question

Я хочу иметь возможность изменить изображение формы изображения, нажав на кнопку в моей пользовательской форме.

В инете я нашел функцию UserPicture, но изображение просто остается прежним.

Private Sub ChangeImage_Click()
    ActivePresentation.Slides("Slide1").Shapes("SolutionA_Image").Visible = True

    ActivePresentation.Slides("Slide1").Shapes("SolutionA_Image").Fill.UserPicture ("D:\User\Desktop\SolutionWrong.jpg")
End Sub

Private Sub HideImage_Click()
    ActivePresentation.Slides("Slide1").Shapes("SolutionA_Image").Visible = False
End Sub

Когда я нажимаю на HideImage кнопка, форма становится невидимой, поэтому мой выбор формы кажется правильным.

Я тоже пробовал

ActivePresentation.Slides("Slide1").Shapes("SolutionA_Image").Fill.UserPicture "D:\User\SolutionWrong.jpg"

но это тоже не работает

редактировать
Конечно, я проверил путь к новому изображению, это правильно.

Answer 1

Сиддхарт Рут нашел решение

Я создал изображение, выбрав picture от insert меню, но оно должно быть создано через Insert => Rectangular shape (без границ). Теперь к нему можно легко получить доступ, используя ActivePresentation.Slides("Slide1").Shapes("SolutionA_Image").Fill.UserPicture ("D:\User\SolutionWrong.jpg")