run time error 1004 select method of range class failed

Question

I get the 1004 error when running the code:

Public Sub UserSortInput()
    Dim userInput As String
    Dim promptMSG As String
        
    p