"End If Without Block If"

[Ollie7957]

Hi All,

I am trying to set a vba code to revert to a single layout when closing a workbook. I have the code below, however it is returnng a compile error: "Block If without End If" on the last End If row (I have bold the row).

I dont pretend to be amazing at VBA but I know my way around some basic code, but can someone please explain why I am getting this error and how to avoid it in future?

Please Login or Register  to view this content.

[MickG]

Perhaps:-

Please Login or Register  to view this content.

[cytop]

If you indent the code correctly, the mismatched control structures are easy to see..

Please Login or Register  to view this content.

The error will usually be the inner most mismatched items.

There are plenty of free indenting utilities available.

[Ollie7957]

Thank you both, is this simply due to the wrong way I have laid this out? I have tried the following formula which works. Thank you so much, noth of you!

Please Login or Register  to view this content.

[cytop]

Still not indented correctly - get a copy of Smart Indenter (Free)

[Ollie7957]

Thank you I will try that out. Thank you both again.