Hi! after long time I back with amazing MS Excel Shortcut key, in this article I will shows you how to jump any excel sheet by using easy keyboard shortcut key, as we knew there is no straight forward key in excel to jump into sheets; so we have to create a shortcut key to save time and energy while working in Microsoft Excel… please watch below video to know how to activate this shortcut key….
Code:
Sub Enter_Sheet_Number()
Dim sheetnum As Integer
On Error GoTo ErrorMessage
sheetnum = InputBox("Enter
Sheet No")
If sheetnum > Sheets.Count
Then
MsgBox "Sheet Not
Aviable"
Else
Sheets(sheetnum).Activate
End If
ErrorMessage:
If Err.Number = 13 Then
Err.Clear
MsgBox "Invlaid Sheet
No"
End If
End Sub
Sub Enter_Sheet_Name()
Dim sheetname As String
sheetname = InputBox("Enter
Sheet Name")
On Error GoTo ErrorMessage
Sheets(sheetname).Activate
ErrorMessage:
If Err.Number = 9 Then
Err.Clear
MsgBox "Invlaid Sheet
Name"
End If
End Sub
Watch Video Tutorial… Please like, share & subscribe
2 comments:
Yes, I don't really know this, but read your article but I already know about them tetris game
tanx for post
سیستم های خرید انبارداری وتوزیع علی اصغر انواری رستمی
http://www.codetools.ir/p/system-buy-inventory-distribution
Post a Comment