Quote Originally Posted by Artik View Post
You had to screw up something.
Sorry, it seems that Microsoft screwed up. But then it improved because it works for me (MSO 365). The error probably only occurs in the 2007 version, which unfortunately contains many other bugs.

I want to point out that the presets contained in the WS_Activate procedure will not be invoked in two cases:
a) the workbook contains only one sheet,
b) when a workbook is opened, where the programmed worksheet is active.

In addition, turning events off and on in procedure LockRange is redundant. Neither unlocking the sheet or blocking cells does not trigger programmed events.

But most importantly, that the problem was solved.

Artik