Toggle autofilter while sheet is protected

I am trying to use the keyboard shortcut to toggle the auto-filter (Shift + Ctrl + L) but it only works when the sheet is unprotected.

Can it be done while the sheet remains protected ?

If you use a macro method and you know the password as the programmer, sure.

e.g.

Code:

---

Sub ToogleFilter() 
  With Sheet1
    .Protect "ken", userInterfaceOnly:=True, DrawingObjects:=False
    .Range("A1").AutoFilter
  End With
End Sub

---

Thanks for the code.
I was hoping that there would be a non-coding workaround to it.

Record a macro. Assign the shortcut key.
Put the Toggle Filter code in that macro.