Exporting Outlook contacts to VCF files

Published on February 28, 2007 in Computer Science. 0 Comments

Here’s a little script written in Visual Basic to export all your contacts in Microsoft Outlook 2003 to VCF files.

1
2
3
4
5
6
7
8
9
10
11
12

Sub exportContacts()
    Dim namespace As namespace
    Dim contacts As MAPIFolder
    Dim contact As ContactItem
 
    Set namespace = Application.GetNamespace("MAPI")
    Set contacts = namespace.GetDefaultFolder(olFolderContacts)
 
    For Each contact In contacts.Items
        contact.SaveAs "C:\Temp\" & contact.Subject & ".vcf", olVCard
    Next
End Sub

The destination folder is C:\Temp\. You can easily change that by editing the statement contact.SaveAs in the snippet above.

0 Responses to “Exporting Outlook contacts to VCF files”

Feed for this Entry Trackback Address
  • No Comments

Leave a Reply