End if without Block If

You will find it MUCH easier to read and find these sorts of problems if you indent lines properly, such as this:

Please Login or Register  to view this content.

I would also suggest you introduce some naming discipline to help read through your code by using 3-letter prefixes to identify the data type, such as

Please Login or Register  to view this content.

... and so on.

There are exceptions such as ws and wb (or wks and wkb) and rng and cel (e.g. For each cel in rng) as these are commonly used.

If that takes care of your original question, please choose Thread Tools from the menu link above and mark this thread as SOLVED.

Also, if you have not already done so, you may not be aware that you can thank anyone who offered you help towards a solution for your issue by clicking the small star icon (* Add Reputation) located in the lower left corner of the post in which the help was given. By doing so you can add to the reputation(s) of all those who offered help.