Here is the macro, modified to run from an embedded button on your worksheet. I have added a couple of warning messages - you can edit the text as required.
On the Worksheet, create a command button from the Control Toolbox toolbar.
(If this isn't visible, right click on an existing toolbar and check the Control Toolbox).
Select the button Icon and draw a button
Right-click the button and select Command Button - Edit and change the name to 'Next' or something else suitable.
Right-click the button again and select View Code
In the code window that opens enter this:
Private Sub CommandButton1_Click()
Dim wsEach As Worksheet
Dim blnFound As Boolean
Dim strSheet As String
On Error GoTo ErrHnd
'set Found flag to 'not found'
blnFound = False
'get sheet name from cell E22
strSheet = ActiveSheet.Range("E22").Text
'test that E22 contains a valid sheet name
'go through each worksheet in this workbook
For Each wsEach In ActiveWorkbook.Worksheets()
'if found, flag as 'found'
If strSheet = wsEach.Name Then blnFound = True
If blnFound = False Or strSheet = ActiveSheet.Name Then
'not found or it is 'this' worksheet - so show a message
If strSheet = "" Then
MsgBox "Select Worksheet name in cell E22 before proceeding"
ElseIf strSheet = ActiveSheet.Name Then
MsgBox "Cannot select this worksheet as sheet to jump to"
MsgBox "Select a valid worksheet name in cell E22"
'activate the worksheet selected in cell E22
'activate a specific cell on that worksheet
Note that Private Sub CommandButton1_Click() and End sub will already be present, so don't duplicate them. Option Explicit goes before Private Sub CommandButton1_Click().
Some lines of code have been split onto two lines for ease of viewing, using the line continuation character "_". This should work 'as is' just copy and paste, or you could remove the "_" and bring the code back to one line.
Click File - Save from the Visual Basic Menu.
Alt+f11 takes you back to the main Excel window.
Exit design mode (first icon on the Controls Toolbox toolbar).
As changes made by Macros cannot be undone with the Undo button, test this macro on a copy of your workbook. This code has only been tested on a sample workbook, and it has not been tested in your environment, so test it to ensure that it works 'as expected'
Click the 'Next' button to run the macro.
You could add checks to this macro to check that key fields have been completed, and include additional warning messages.
'test cell A5
If ActiveSheet.Range("A5").Value = "" Then
'No data entered in A5 - so show warning message
MsgBox "Cell A5 must be completed before proceeding"