Hey guys,
I'm having an issue with my InputBox command, I have underlined the part that's returning the error.
....
SelectHeading:
On Error Resume Next
'Need to let the user select the proper heading.
Dim rng As Range
Set rng = Nothing
Set rng = Application.InputBox(prompt:="Select the heading you wish to use.", Default:=Cells(4, 2).Value, Type:=8)
If rng = False Then
Resume HeadingNotFound
Else
sHeading = rng.Value
Resume ErrorHandling
End If
.....
If the user hits cancel during the input box part, it returns the Run-time error '424': Object required. No error handling commands have let me get past it. Please please help!!
I'm having an issue with my InputBox command, I have underlined the part that's returning the error.
....
SelectHeading:
On Error Resume Next
'Need to let the user select the proper heading.
Dim rng As Range
Set rng = Nothing
Set rng = Application.InputBox(prompt:="Select the heading you wish to use.", Default:=Cells(4, 2).Value, Type:=8)
If rng = False Then
Resume HeadingNotFound
Else
sHeading = rng.Value
Resume ErrorHandling
End If
.....
If the user hits cancel during the input box part, it returns the Run-time error '424': Object required. No error handling commands have let me get past it. Please please help!!