Be the first user to complete this post

  • 0
 Add to List

Excel-VBA : Prevent Adding New Worksheet

Many a times you need a scenario where you dont want user to add new worksheets in you Excel work book.

Its quite easy to do.

Steps:

  • Go to VBA Editor
  • Expand your VBA Project
  • Double Click ThisWorkBook
Select ThisWorkBook
Select ThisWorkBook
  • Now select the "Workbook" from the first drop down on the right
select workbook
select workbook
  • Select the NewSheet from the second drop down on the right
Select NewSheet
Select NewSheet
  • Now you will see the function Private Sub Workbook_NewSheet(ByVal Sh As Object).
WorkBook_NewSheet function
WorkBook_NewSheet function
  • Add the following code in the function.

Application.DisplayAlerts = False

ActiveSheet.Delete

MsgBox "Sorry, Adding new Sheet is not allowed"

code
code

And thats it you are done. Lets test our program.

Go to excel and try adding a new worksheet.

No New WorkSheet
No New WorkSheet

Also Read:

  1. Excel-VBA : Send Unique Images Embedded to Mail Body, With Every Mail From MS Outlook using Excel.
  2. VBA-Excel: Add Worksheets For All The Given Dates Except Weekends and Copy The Common Template In Each Worksheet
  3. Add Tools to Quick Access Tool Bar(Excel Top Bar)
  4. Excel-VBA : Send a Simple Mail From MS Outlook Using Excel
  5. VBA-Excel: Writing Text to Word document