The shapes are indexed by both name and position within the document.
So you can use ActiveDocument.Shapes(1) for the first.
You can also iterate them --
Dim pShape as Word.Shape
For each pShape in ActiveDocument.Shapes
....
Next
> ActiveDocument.Shapes - How can I use this to refer to any graphic? Right
> now it only works with a specified...
> 'ActiveDocument.Shapes("Picture 267").Select