Как в нужной рабочей книге запретить создание новых листов?

Если запретить создание новых листов, путём защиты структуры рабочей книги, нельзя, то можно воспользоваться событием рабочей книги Workbook_NewSheet() и удалять лист(ы) сразу после их создания. Для этого, просто разместите в модуле ThisWorkbook (ЭтаКнига) следующий код:

code: #vba
Private Sub Workbook_NewSheet(ByVal Sh As Object)
    Application.DisplayAlerts = False
    Sh.Delete
    Application.DisplayAlerts = True
End Sub

Актуально для MS Excel 97, 2000, XP

Поделиться:

Похожие статьи: