Random Selection in Excel using VBA

[Kenneth Hobs]

Welcome to the forum! Please use code tags when you post code.

See if this helps:

Sub ken()
  Dim myRange As Range
  Set myRange = Application.InputBox(prompt:="Select a Range", Type:=8)
  Debug.Print myRange.Address, myRange.Parent.Name
End Sub