Object Requi
if SweetenerOptions
isnt the code name of a worksheet (or a reference set to some object) then
that would raise the error.
Sub AA()
v = TypeName(Application.InputBox("How many senarios would you like to
consider:", "Options"))
Debug.Print v
End Sub
returns string, so you can't use
Set numberoption = Application.InputBox . . .
and this is backwards:
numberoption.Value = number
it would be
dim numberoption as string
numberoption = Application.InputBox
dim number as Long
nummber = clng(numberoption)
--
Regards,
Tom Ogilvy
"trini" wrote in message
...
why am i getting the error "object required" when i try to use this code?
Private Sub CommandButton1_Click()
Dim numberoption As Range
Sheets("Sheet3").Select
SweetenerOptions.Hide
Set numberoption = Application.InputBox("How many senarios would
you
like to consider:", "Options")
numberoption.Value = number
If number = 1 Then
PriceChoices.Label1.Enabled = True
End If
If number = 2 Then
PriceChoices.Label1.Enabled = True
PriceChoices.Label2.Enabled = True
End If
|