Hi Kenjiventurina,

You can record a quick macro for protecting and unprotecting with a shortcut key of your choice... thanks.

one example:-

Sub Macro2()

' Keyboard Shortcut: Ctrl+p

    Range("A1").Select
    ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
End Sub
Regards,
DILIPandey

<click on below 'star' if this helps>