Pressing space bar to navigate tabs

[fireslguk]

Is this even possible vba code :-

pressing space bar to navigate sheet tabs?

Selects and displays next sheet each press

 

[lrobbo314]

This is possible. But you can't do it with the space bar. That key is not allowed.

 

[lrobbo314]

This code will do it with backspace. Run the sub SB, then every time you hit backspace, it will select the next sheet.

Sub SB()
Application.OnKey "{BACKSPACE}", "NEXTTAB"
End Sub

Sub NEXTTAB()
If ActiveSheet.Index < Sheets.Count Then
    Sheets(ActiveSheet.Index + 1).Select
End If
End Sub

 

[Michael M]

Create a button and assign this

Sub MoveNext()
On Error Resume Next
Sheets(ActiveSheet.Index + 1).Activate
If Err.Number <> 0 Then Sheets(1).Activate
End Sub

 

[fireslguk]

This code will do it with backspace. Run the sub SB, then every time you hit backspace, it will select the next sheet.

Sub SB()
Application.OnKey "{BACKSPACE}", "NEXTTAB"
End Sub

Sub NEXTTAB()
If ActiveSheet.Index < Sheets.Count Then
    Sheets(ActiveSheet.Index + 1).Select
End If
End Sub

I had to remove End If for it to work

What other key is allowed ?

 

[lrobbo314]

It tells you here

 

[SpillerBD]

Ctrl+page up/page down

 

[fireslguk]

This code will do it with backspace. Run the sub SB, then every time you hit backspace, it will select the next sheet.

Sub SB()
Application.OnKey "{BACKSPACE}", "NEXTTAB"
End Sub

Sub NEXTTAB()
If ActiveSheet.Index < Sheets.Count Then
    Sheets(ActiveSheet.Index + 1).Select
End If
End Sub

this is great Thankyou - what would be the alternative to go to the previous tab - again assigning another key for this action

 

[fireslguk]

this is great Thankyou - what would be the alternative to go to the previous tab - again assigning another key for this action

so on key “>” selects next tab
And on key “<“ selects previous tab

 

[CountTepes]

Why not just use the build in tabbing of; Ctrl-Page Up and Ctrl-Page Down ?