Sdílet prostřednictvím

Email1Address Property

  • Článek

Returns or sets a String representing the e-mail address of the first e-mail entry for the contact. Read/write.

expression**.Email1Address**

*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 first 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.Email1Address = "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.Email1Address = "someone@example.com"
myItem.Display

Applies to | ContactItem Object

See Also | Email2Address Property | Email3Address Property