lookup horizontal...
Hi,
Right click your sheet, view code and paste this in
Sub nn()
my_var = 99
Set myrange = Range("D2:CE2")
On Error Resume Next
For Each c In myrange
If c.Value = my_var Then
'run code1
Else
'run code2
End If
Next
End Sub
You must consider what you do after you have run code1 or code2 because
execution will return back into this routine. You could do this
If c.Value = my_var Then
'run code1
exit sub
Else
'run code2
exit sub
End If
Mike
"sal21" wrote:
Have this range D2:CE2 filled with a many value and a My_var filled
with a value
I want to find in this range if value of My_var existis in range
D2:CE2... if existis goto other code1 else goto other code2 how to in
VBA?
|