Форум по VBA и MS Office

В коде используется такая ссылка:

Sub Макрос()

    Dim Ссылка As String
   
    Ссылка = "C:\Users\User\Desktop\Картинки\Картинка 1.jpg"

End Sub

Как вместо "Картинка 1" подставить значение из ячейки A1?

Sub Макрос()

    Dim Ссылка As String
   
    Ссылка = "C:\Users\User\Desktop\Картинки\" & Range("A1").Value & ".jpg"

End Sub

спасибо