Disable Backspace and Delete key on specific Sheets

[hajiali]

I thought this was going to be easy as

[COLOR=#3366CC]Private Sub Workbook_Activate()[/COLOR]    Application.OnKey "{BACKSPACE}"
    Application.OnKey "{DELETE}"

End Sub

Private Sub Workbook_Deactivate()
    Application.OnKey "{BACKSPACE}"
    Application.OnKey "{DELETE}"[COLOR=#3366CC]End Sub[/COLOR]

Apparently its not working when adding this code its disables on all sheets in the workbook. I would like to be able to just disable Backspace and delete on specific sheet and not all sheets.

 

[My Aswer Is This]

I suggest putting my code in a empty workbook with no other code and see if it works.

 

[My Aswer Is This]

The problem with this type code is you want:
When certain sheets are activated you want the keys to do one thing
When you deactivate certain sheets you want that to no longer work


I'm not real familiar with activating and then deactivating sheets.

So maybe someone else here will be able to help you.

 

[My Aswer Is This]

I will see if I can come up with a answer.