Stuck in a loop

[dem86]

Hi again. I have been working for a couple of hours now and I am still stuck in loop He!!.

Hoping a fresh set of eyes can spot what I am doing wrong.

The loop gets stuck in the 1st input file and finally does a "run-time error 1004" before entering the "If Pass = 2" part of code.

Thanks in advance.

Updated with full code. I know I have too many Dim's but I am trouble shooting a bigger piece of code and didn't feel like removing the extras.

Please Login or Register  to view this content.

[Leith Ross]

Hello dem86,

Part of the problem is you are attempting to use a numerical text string for a real number in this statement:

Please Login or Register  to view this content.

The line should be this:

Please Login or Register  to view this content.

The other problem may be with your function LastRow. Since you did not provide the code, I can not say for sure.

There are 2 habits should cultivate as a VBA programmer[List="*"][*] Using Option Explicit at the top of your code modules.[*] Declaring your Variables and their type: Integer, Long, String, etc.

[dem86]

Here is my LastRow & LastCol code

Please Login or Register  to view this content.