character limitations

[Chris]

if the active cell has the first 7 characters = "example", I want it to return a value in another cell. ie,

"example 7", "example fourty nine" and "example spiderman"

would all return a value, where as...

"7", "fourty nine" and "spiderman"

would not.

TIA
Chris

 

[Tom Ogilvy]

myVal = 50
if lcase(Left(ActiveCell.Value,7)) = "example" then
ActiveCell.Offset(0,1).Value = myVal
End if

--
Regards,
Tom Ogilvy

if the active cell has the first 7 characters = "example", I want it to

return a value in another cell. ie,