View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
JLGWhiz JLGWhiz is offline
external usenet poster
 
Posts: 3,986
Default Application InputBox Type 8 Error

There are some answers on this site.

http://microsoft-server-operating-sy...1/Default.aspx

"Neal Zimm" wrote:

Hi All,
Code below is a paragraph from a testing sub that execs other procs and
feeds them TestRow.

TestRng and other vars are properly dim'd.

I don't understand why I get a microsoft has to close error. I use the
default as a text reminder to me. Msoft type 8, i guess, does not interpret
the text as a bad range address to give me the typical application input box
error msg when I forget to click a cell before clicking OK.

I've since changed the code below to use selection.row

Have I found a MSoft bug?

Thanks.

Get_TestRow: 'get a row#
On Error Resume Next
Set TestRng = Application.InputBox(sPrompt, Procname, _
"Click CANCEL to Exit Test", Type:=8)
If TestRng Is Nothing Then
If vbYes = MsgBox("Row not selected, END TEST ??", _
vbYesNo + vbDefaultButton2, Procname) Then

Exit Sub
Else
GoTo Get_TestRow
End If
End If

TestRow = TestRng.Row
Return

--
Neal Z