ContactItem.Email1AddressType Property (Outlook)
Returns or sets a String representing the address type (such as EX or SMTP) of the first e-mail entry for the contact. Read/write.
A variable that represents a ContactItem object.
This is a free-form text field, but it must match the actual type of an existing e-mail transport.
This Visual Basic for Applications (VBA) example sets "SMTP" as the address type for the first e-mail entry of a contact.
Dim myItem As Outlook.ContactItem
Set myItem = Application.CreateItem(olContactItem)
myItem.Email1Address = "email@example.com"
myItem.Email1AddressType = "SMTP"