IMAddress Property

Returns or sets a String that represents a contact's Microsoft Instant Messenger address. Read/write.

expression   Required. An expression that returns a ContactItem object.

Remarks

Unlike the Recipients or To properties, there is no way to verify that the IMAddress property contains a valid address.

Example

The following example creates a new contact and prompts the user to enter an Instant Messenger address for the contact.

Sub SetImAddress()
'Sets a new IM Address

    Dim olApp As Outlook.Application
    Dim objNewContact As ContactItem

    Set olApp = Outlook.Application
    Set objNewContact = olApp.CreateItem(olContactItem)
    objNewContact.IMAddress = _
        InputBox("Enter the new contact's Microsoft Instant Messenger address")
    objNewContact.Save
End Sub