Posted to microsoft.public.excel.programming
|
|
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
|