Select next picture in Excel

[qnguyen]

I have an excel sheet containing multiple pictures with object names "Picture 1", "Picture 2", etc. The number of pictures is given by a number in cell A8

I would like to select the pictures one at a time. Currently I have

Do While numpic < Range("A8").Value
 ActiveSheet.Shapes.Range(Array("Picture " & "*")).Select
Some code
numpic = numpic + 1
Loop

But I think my syntax is wrong. What is the correct way to do this?
Thank you

 

[ekrause]

I got it to work using the following code:

Do While numpic < Range("A8").Value
 [I][B]ActiveSheet.Shapes("Picture " & numpic).Select[/B][/I]
Some code
numpic = numpic + 1
Loop