specialmerchants = InStr(1, mername, m(0) Or m(1) Or m(2) Or m(3) Or
m(4) Or m(5) Or m(6) Or m(7))

if specialmerchants = true then...


Obviously this doesn't work but you can see what I'm trying to do, is
there a way to make it work?

Thanks,

Peter

It's alright the solution is:


specialmerchants = InStr(1, mername, m(0)) Or InStr(1, mername, m(1))
Or InStr(1, mername, m(2)) Or InStr(1, mername, m(3)) Or InStr(1,
mername, m(4)) Or InStr(1, mername, m(5)) Or InStr(1, mername, m(6))
Or InStr(1, mername, m(7))

If specialmerchants = True Then
....

If Not(IsError(Application.Match(mername,m,0))) Then
...

--
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)

"Peter" wrote in message
oups.com...
specialmerchants = InStr(1, mername, m(0) Or m(1) Or m(2) Or m(3) Or
m(4) Or m(5) Or m(6) Or m(7))

if specialmerchants = true then...


Obviously this doesn't work but you can see what I'm trying to do, is
there a way to make it work?

Thanks,

Peter