Number in a cell = number of list and jump on it

Attach a sample workbook. Make sure there is just enough data to make it clear what is needed. Include a BEFORE sheet and an AFTER sheet in the workbook if needed to show the process you're trying to complete or automate. Make sure your desired results are demonstrated, mock them up manually if needed. Remember to desensitize the data.

Click on GO ADVANCED and use the paperclip icon to open the upload window.

View Pic

Copy the below code and do right click on sheet tab and select view code and paste it.

Close the VBA window (Alt+Q to close VBA window) and return to that sheet and check.

Private Sub Worksheet_Change(ByVal Target As Range)
Dim v As Variant
If Not Intersect(Target, Range("A1")) Is Nothing Then
    v = Target.Offset(, 1).Value
    On Error Resume Next
        ThisWorkbook.Sheets(v).Range("A1").CurrentRegion.Copy
    On Error GoTo 0
End If

End Sub