Getting compile error 'loop without do'

[mso3]

Hi friends,
The code is working fine but I’m getting error ‘loop without do’. I want to insert this code in my original file in a macro. So I want to keep ‘lr’ and ‘loop’ in the code because it is in that code. It’s working fine with ‘with range ... end with’ but I don’t want to use it here.

Please Login or Register  to view this content.

Any help will be appreciated.

Thanking you.

[TMS]

Might be working but it doesn't do anything as it stands. You're NOT looping and there ISN'T a DO to match the Loop. You've commented out the Range so the .FormulaR1C1 will fail to compile, as will the .Value.


Regards, TMS

[mso3]

Thank you. Then what is your advice to use 'with range ... end with' to get output as value. Shall I use 'with range .. end with' or 'do .. loop'?
Thank you.

[TMS]

Assuming that B4:B50 is the range to receive the formula/value, uncomment the With / End With and remove the Loop keyword.


Regards, TMS

[mso3]

Hi TMS,
Thank you. Solved.

[TMS]

You're welcome. Thanks for the rep.