Patrick,

Thank you for your reply. It works.

Would you mind tell me how to write another vb to shorten the length of
programming because number of 'Case' will be more than 100.

Raymond


------------------------------------------------
~~ Message posted from http://www.ExcelTip.com/
~~View and post usenet messages directly from http://www.ExcelForum.com/

~~Now Available: Financial Statements.xls, a step by step guide to creating financial statements