title: How to reference a cell using an input box?
body: <p>I have a message box to insert a user-selected cell range.
  I want that cell to be the new active cell.
  What is the VBA code to do that?</p>
  
  <p>This is the VBA I have, but it doesn't change the active cell.</p>
  
  <pre><code>Sub AddClient()
  
      'Message Box
      Dim userResponce As Range
      On Error Resume Next
  
      Set userResponce = Application.InputBox("Place curser on Client Name that you want to insert new one above")
      On Error GoTo 0
  
      If userResponce Is Nothing Then
          MsgBox "Cancel clicked"
      Else
          MsgBox "You selected " &amp; userResponce.Address
      End If
  
  End Sub
  </code></pre>