Email2Address Property
Returns or sets a String representing the e-mail address of the second e-mail entry for the contact. Read/write.
expression**.Email2Address**
*expression * Required. An expression that returns a ContactItem object.
Example
This Visual Basic for Applications (VBA) example sets "someone@example.com" as the e-mail address for the second e-mail entry of a contact.
Sub CreatePeerContact()
Dim myOlApp As Outlook.Application
Dim myItem As Outlook.ContactItem
Set myOlApp = CreateObject("Outlook.Application")
Set myItem = myOlApp.CreateItem(olContactItem)
myItem.Email2Address = "someone@example.com"
myItem.Display
End Sub
If you use Microsoft Visual Basic Scripting Edition (VBScript) in a Microsoft Outlook form, you do not create the Application object, and you cannot use named constants. This example shows how to perform the same task using VBScript code.
Set myItem = Application.CreateItem(2)
myItem.Email2Address = "someone@example.com"
myItem.Display
Applies to | ContactItem Object
See Also | Email1Address Property | Email3Address Property