I am grabbing var1 from an inputbox.

I want to say if var1 = any of the values entered in cells b4:b32 the
goto Double

I tired

if var1 = range("b4:b32").value then goto double

but didnt work, any suggestions

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

On Error Resume Next
iPos = Application.Match(var1, Range("B4:B32"), 0)
If iPos 0 Then _
MsgBox "hello"

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"ianripping " wrote in message
...
I am grabbing var1 from an inputbox.

I want to say if var1 = any of the values entered in cells b4:b32 then
goto Double

I tired

if var1 = range("b4:b32").value then goto double

but didnt work, any suggestions?


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

Thanks bo

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

bob, even if that value doesnt appear, it stil reports it as bein
there

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

Ian,

You must declare iPos as a long to get this to work. If it defaults to
variant, it will always be 0

Dim iPos As Long

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"ianripping " wrote in message
...
bob, even if that value doesnt appear, it stil reports it as being
there!


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

ok did that, still doing the sam

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