Защита листа

[Alekcey]

Здравствуйте всем!

Как в Excel 2007 защитить лист на изменение размеров ячеек и оставить работать все группировки на листе?

[Alekcey]

вернее не на листе,а на всем документе

[npocmop]

Можно ли подправить код, так чтобы работал он только со своей книгой, в которой расположен..
или я что-то неправильно делаю - только пришлось поработать тяпкой чтобы вернуть своим экселевским книгам прежний, неограниченный вид.
test.rar
и еще просьба к знающим, расписать действия которые происходят внутри кода..

[SAS888]

Alekcey
Например, для 1-го листа:

With Sheets(1)
    .EnableOutlining = True
    .Protect Password:=MyPassword, DrawingObjects:=True, Contents:=True, Scenarios:=True, _
        AllowFiltering:=True, UserInterfaceOnly:=True
End With

npocmop
В модуль книги ("Эта книга" или "ThisWorkbook") добавьте пару строк кода:

Private Sub Workbook_Activate(): DisAbleAllCLear: End Sub
Private Sub Workbook_Deactivate(): EnableAllClear: End Sub