Hi!
I have found here the hint on Application.Inputbox(type:=8) & copie
the whole VBA code to try it. But I keep getting run-time error 42
message that Object is required. What is that I'm doing wrong?
Sub testme()
Dim rng As Range
'On Error Resume Next
Set rng = Application.InputBox("Select a Range..", Type:=8)
On Error GoTo 0
If rng Is Nothing Then
Exit Sub 'cancelled
Else
MsgBox rng.Address
End If
End Sub
Thanks in advance.
Irad
--
Irada Shamilov
-----------------------------------------------------------------------
Irada Shamilova's Profile:
http://www.excelforum.com/member.php...fo&userid=1228
View this thread:
http://www.excelforum.com/showthread.php?threadid=27209