Conditional Formating

From: David (davidr_at_lexmark.com)
Date: 06/15/04 

Date: Tue, 15 Jun 2004 14:00:37 -0700

I have a number of textboxs, which display formated
numbers and currency symbols. I would like to expand my
work*** to include other currencies, like ?, ¢, £, etc.

I know that I can set up if then statments to account for
users selection of currency, however, That involves an
aweful lot of duplicate code considering the number of
textboxes, and the currencies i would like to support.

the formatted text line looks like this

TBPrt.Text = Format(Worksheets("pricing").Range
("ad4"), "$##,##0.00")

Is there an easy way for me to have that currency symbol
be variable based on user selection of currency on the
title page. Any assistance on an easier way than just
doing if then statements would be greatly appreciated.

Thanks
Dave