Как в нужной рабочей книге запретить создание новых листов — Visual Basic(Бейсик)

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

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

Leave a Comment