Looping through multiple cell ranges

Hello i have the following VBA code:

Please Login or Register  to view this content.

What i want to do is i want to create a loop (i suppose) to complete the task above a number of times.

So lets say that i want to loop through i=1:X
Then the name LL_1B, is LL_iB,
The range needs to be upped 42 for each loop so Range("B(2+(i-1)*42) : U(42+(i-1)*42) ")
etc

How do i write this in code that VBA understand?

Thanks a bunch,
Final code is:

Please Login or Register  to view this content.