Or you can see if Select ...case...Endselect would do what you want.
_________________________
Home page: http://www.kixhelp.com/hb/