Thanks for the correction....

(If I could count, I'd be dangerous!)

David McRitchie wrote:

correction for a typo, since the length of "data" is four, the test should be
if left(lcase(sh.name),4) < "data" then

--

Dave Peterson