I want to use a Type:=8 Inputbox allowing the user to select a cell and then
later on using the address of the range/cell selected so as a string.

For example:

Sub test()
Dim rng3 As String
rng3 = Application.InputBox(prompt:="Select rng1", Type:=8)
MsgBox (rng3)
End Sub

returns the value that is inside the cell selected instead of the actual
address of the cell. In other words upon first prompt if the user selects the
cell A1, the second prompt displays the contents of A1 but not "A1".

Thanx in advance for all your help.