Tell us more about txtPhoneNumber. Is it an unbound text box? Is it bound to an Outlook property? What is it that you're actually trying to accomplish with this control?

--
Sue Mosher, Outlook MVP
Author of Configuring Microsoft Outlook 2003
http://www.turtleflock.com/olconfig/index.htm
and Microsoft Outlook Programming - Jumpstart for
Administrators, Power Users, and Developers
http://www.outlookcode.com/jumpstart.aspx

"Sydney" wrote in message ...
Hi

I have an outlook form with a Contacts button to bring in the phone number
(BusinessTelephoneNumber ) from the selected contact into the txtPhoneNumber
Text Box.

This works ok but it doesnt allow me to have the choice of changing the
phone number brought into txtPHoneNumber. It keeps reverting to the
BusinessTelephoneNumber .

Now i sadly have no coding skills and grabbed the information i have from
the net and altered it my way:

Sub Item_PropertyChange(ByVal strName)

' Remember business phone number
Item.BillingInformation = objContactItem.BusinessTelephoneNumber 'puts
the No. in the txtPhoneNumber

' Set phone number
strPhoneNumber = objContactItem.BusinessTelephoneNumber 'holds it in string


' Remove phone number
'Item.BillingInformation = ""

'Item.GetInspector.ModifiedFormPages("Message").Co ntrols("txtPhoneNumber").V
alue = ""

'test
msgbox strPhoneNumber

Any ideas?