I am trying to set an object variable. I get an error message when I
try to do the following:

Dim NumberofColumns As Variant
Dim BMax As Integer

Set NumberofColumns = Application.InputBox(prompt:="Enter Number of 2D
Elements", Type:=1)

If NumberofColumns Is Nothing Then
MsgBox ("Operation Canceled")
Exit Sub
Else
BMax = NumberofColumns
End If

When I enter data or click on CANCEL the error says Type Mismatch. Is
this because Variant and Type:= 1 are not compatible?


---
Message posted from http://www.ExcelForum.com/