For loop exiting prematurely

A “for loop” is exiting prematurely.

You can find the loop that is giving me troubles at the line(about half way down):
“For Row = DataRow To Ptr2FDc.count + DataRow”

The debugger gets as far as just before executing the line:
.Cells(Row, ElevationIDColumn).value = Ptr2FDc(Index).ID

The code exits immediately (without executing the above line of code) to the end of the workbook.

I checked the “for” variables. DataRow IS 2 and Ptr2FDc.count IS 20
Index has a valid number of 1

In the debugger I can see the PTR2FDc collection object and it does have an object in the collection at index 1. It is the correct object.

There is no error code

Please Login or Register  to view this content.

Hi,

Edit your first message and Select the code. Then click on the "#" Icon above the message area. This will put code tags around what you've selected. After you do that, read my below suggestion.

I think this line is the problem.

Please Login or Register  to view this content.

DataRow starts at 2 and then goes to 3 + Ptr2FDc.count... This doesn't make sense to me.

Try

Please Login or Register  to view this content.