address export

  • Thread starter Thread starter tim
  • Start date Start date
T

tim

Is there a way to export contact address data with the
street address lines already separated, rather than with
embedded carriage returns?

thanks

tim
 
Use the VBA Split function with Chr(13) (the ASCII code for a carriage return) as the delimiter. You might have to loop through the returned array and clean up leading/trailing characters with the Trim functions.

Dim objC As Outlook.ContactItem
Dim strStreets() As String

Set objC = Application.ActiveInspector.CurrentItem
strStreets = Split(objC.HomeAddressStreet, Chr(13))
 
Back
Top