Help with camera tool, VBA

[dee101]

I am using the camera tool to show a range like this

ActiveSheet.Shapes("Picture 21").Select
    Selection.Formula = "$A$1"

Is there any way to set picture 21 to range A1 without selecting it, I tried this but it did not work

ActiveSheet.Shapes("Picture 21").Formula = "$A$1"

 

[repairman615]

Hello,

I think maybe:

ActiveSheet.Pictures("Picture 21").Formula = "$A$1"

 

[dee101]

Repairman615, thanks that did it