address export

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
 
E

Eric Legault [MVP - Outlook]

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))
 
Top