VBA Excel Adding pictures to a worksheet

Question

I discovered some code that enables the user to select which image should be added to a worksheet. Instead, I was hoping it would select and insert a certain image—more precisely, the corporate logo. Here is the key:

PicLocation = Application.GetSaveAsFilename("C:\Work\test_Project\", "CA_Value_AVM, *.jpg", 1)
If PicLocation <> "" Then
    ActiveSheet.Pictures.Insert(PicLocation).Select
Else
    Exit Sub
End If

This code is executed when a button is clicked. The user clicks it and then the path "C:\Work\test_Project\" is opened and the user has to click the picture. I need this to change so that the user doesn't click anything.

Answer 1

It should work as:

ActiveSheet.Pictures.Insert("C:\Work\test_Project\myjpgfile.jpg").Select

As that's all the function is returning anyway.