Hi,
This should be what you need assuming that B6 contains your flagged value
Thanks,
Simon
range("B6").select
if activecell.value <"Flagged" then
do your stuff
end if
--
Message posted via OfficeKB.com
http://www.officekb.com/Uwe/Forums.a...mming/200610/1