Preventing Users from Inserting More Worksheets : Workbook Event « Excel « VBA / Excel / Access / Word






  1. VBA / Excel / Access / Word
  2. Excel
  3. Workbook Event

Preventing Users from Inserting More Worksheets

 

Private Sub Workbook_NewSheet(ByVal Sh As Object)
      Application.DisplayAlerts = False
      MsgBox "Sorry, you cannot add any more sheets to this workbook", _
      vbInformation
      Sh.Delete
      Application.DisplayAlerts = True
End Sub








Related examples in the same category

1.If you want to prevent users from printing only particular sheets in your workbook, use this similar code instead:
2.If you want Excel to stop prompting you to save changes you didn't make
3.Before Save event
4.To link that tab's command bar to a right-click in any cell, enter the following code in the private module of ThisWorkbook:
5.Pass value between events
6.Workbook activation events
7.minimizes the workbook's window:
8.Workbook_BeforePrint
9.use the BeforePrint event to add information to a header or footer before the sheet is printed
10.BeforeClose event is used to delete a custom menu
11.create your own Save dialog in the event:
12.Set application key in Workbook Open event and BeforeCloseEvent
13.Workbook open event
14.Workbook Events Open: enable custom toolbar
15.procedure is executed when the workbook is closed
16.Workbook_SheetSelectionChange
17.The BeforeClose event for a workbook
18.The BeforeSave event for a workbook
19.Activate and deactivate events in a workbook
20.Cancel Close action based on the A1 value
21.only allow the workbook to close if the figure in A1 is between 500 and 600:
22.If you want to make sure that all changes are saved when the workbook closes
23.to discard any changes to the workbook