Switch between active an last worksheets

[Thanksamillion]

In Windows you can switch between the Activewindow and the Last window by pressing [Alt]+[Tab]. I would like to be able to switch between Excel sheets the same way using [Alt]+[Caps Lock]. ([Alt]+[~] would be ideal, except that {~} in VBA is onkey for ENTER and cannot be assigned as itself)

Please Help thanks,

 

[repairman615]

Alt + Tilde onkey:

Application.OnKey "%" & Chr(96), "LastSheet"

 

[repairman615]

Chr(126) is actually the tilde but onkey would require the shift to recognize.


Anyrate, this seems to do:

Sub OnkeyAltTilde()
    Application.OnKey "%" & Chr(96), "LastSheet"
End Sub
Sub Lastsheet()
    Worksheets(Sheets.Count).Select
End Sub
Sub ResetOnkey()
    Application.OnKey "%" & Chr(96)
End Sub

 

[Thanksamillion]

Thanks, that worked fine

 

[repairman615]

Thanks, that worked fine

Glad to help.