Dial Method

Microsoft Outlook Visual Basic

expression.Dial(ContactItem)

expression    Required. An expression that returns a NameSpace object.

ContactItem   Optional Variant. The ContactItem object of the contact you want to dial.

Example

The following Microsoft Visual Basic/Visual Basic for Applications (VBA) example opens the New Call dialog box.

Sub DialContact()
'Opens the New Call dialog

    Dim olApp As Outlook.Application

    Set olApp = Outlook.Application
    olApp.GetNamespace("MAPI").Dial

End Sub
		

The following Visual Basic for Applications (VBA) example opens the New Call dialog box with the contact's information. To run this example, replace 'Jeff Smith' with a valid contact name.

Sub DialContact()
'Opens the New Call dialog with the contact info

    Dim olApp As Outlook.Application
    Dim objContact As Outlook.ContactItem

    Set olApp = New Outlook.Application
    Set objContact = olApp.GetNamespace("MAPI"). _
     GetDefaultFolder(olFolderContacts).Items("Jeff Smith")
    olApp.GetNamespace("MAPI").Dial objContact

End Sub