Hi, to everyone!
I tried to do some animation but could not find out why the following codes cannot iterate through a collection of 3 pics:
Dim i As Long
Application.ScreenUpdating = False
For x = 1 To 3
ActiveSheet.Shapes("Picture" & i).Visible = False
ActiveSheet.Shapes("Picture" & i).Visible = True
Application.ScreenUpdating = True
The runtime error displayed is:" The item with the specified name wasn't found".
I am using Office 2000 to write those codes.
The above 3 pics are grouped and named "PICTURE". Is there a better way to iterate pictures, rectangles, ovals and etc., showing each shape one at the time?