Modules & VBA :: How To Refer Object By Its Name When Name Is A Number

Actually in a powerpoint slide, I am having a set of 31 shapes having their names as numbers from 1 to 31.

How to refer by its name?

By hardcoding I refer it like this:

activepresentation.slides(1).shapes("1").someprope rty = somevalue

How to do it in a loop?

Code:

for i = 1 to 31
activepresentation.slides(1).shapes(i).someproperty = somevalue
next i

The above code will refer the shapes only by the index. But the shapes are not having index and name as same.