How to run "Application.CommandBars("Workbook tabs").ShowPopup" from a Keystroke

[capson]

Hello,

`Application.CommandBars("Workbook tabs").ShowPopup` gives me a dropdown list of sheet name if I chose one it will select that sheet

I can run `Application.CommandBars("Workbook tabs").ShowPopup` from a button but is it possible to run from a keystroke?

I am trying:

Sub Auto_Open()
   Application.OnKey "%;", Application.CommandBars("Workbook tabs").ShowPopup
End Sub

But no luck, I get the error: `Expected Function or variable` and `.showpopup` is highlighted

thanks

 

[capson]

Sorry, I got it, please ignore