One other alternative would be to disable the delete commandbarbuttons whenever your users are in specific columns or rows. One drawback... The user will be unable to select "Entire" rows or columns. Any other selection is allowed. Perhaps someone can get around this? Anyway, which rows and/or columns are we speaking of?
The right-click popups "Row", "Column", "Cell" will have the "Delete" option greyed out. Will need to compensate for the Worksheet Menu Bar, File, Delete... as well. Are there any keyboard shortcuts for deleting a row or column?
Right click on your worksheet tab, paste the following code in... Try and delete row 2 or column 1. Remember, I could not figure out how to get this to work while allowing the user to select entire columns or entire rows???
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim SeeControl As Boolean
If Target.Column = 1 Or Target.Row = 2 Then
SeeControl = False
Else: SeeControl = True
If Selection.Columns.Count = 256 Then ActiveCell.Select
If Selection.Rows.Count = 65536 Then ActiveCell.Select
Application.CommandBars("Column").Controls("&Delete...").Enabled = SeeControl
Application.CommandBars("Row").Controls("&Delete...").Enabled = SeeControl
Application.CommandBars("Cell").Controls("&Delete...").Enabled = SeeControl
Application.CommandBars("Ply").Controls("&Delete").Enabled = SeeControl