>>
>> Assuming that there is no error in your CheckString function, I would guess
>> that in the debugging process you stopped the macro from running with
>> Application.EnableEvents still = False.
>>
>> It's handy to have a sub to re-enable the events for this scenario.
>>
>> Sub foo()
>> Application.EnableEvents=True
>> end sub
>>
>>
>> --ron
>
>I used "on error goto" to trap any errors, then I reset events and
>return. Works now, thanks Ron!

Happy to help. Glad you have it working now.

Best wishes,

--ron