Determine location of text boxes on sheet

[jprlimey]

This is a new question regarding a solved solution

The following code determines the location and size of text boxes on the active sheet, it then places the corresponding information onto another sheet. The solution worked great on my test file but when I placed it into the working copy it failed. I got a run time error 9 "subsrcript out of range"

At first I thought that perhaps one of my text boxes on my working copy was causing a problem, so I copied each text box one by one to my test file and ran the code below and everything worked fine, so I'm pretty sure their is nothing strange going on with the text boxes

The code is placed inside the sheet module

Any help would be greatly appreciated

Please Login or Register  to view this content.

[slx]

Does your copy have sheet called "Sheet5"?

[jprlimey]

Yes sheet5 is present

[slx]

Do you have more than 1 shape on that sheet?

[jprlimey]

Yes I have multiple text boxes

[jprlimey]

I used the debug step into and followed the operation of the code.

I have 11 text boxes on my sheet, the code when stepping through does everything correctly then on the 11th loop when

Please Login or Register  to view this content.

= 11, the next line

Please Login or Register  to view this content.

is where it seems to fail

Any help would be appreciated

[nilem]

Hi jprlimey.
try it

Please Login or Register  to view this content.

[jprlimey]

nilem,

your solution worked great, so what was the cause of the problem

Thanks