2 метода за групово експортиране на множество контакти на Outlook като файлове vCard

Ако искате да експортирате множество контакти на Outlook като файлове vCard в насипно състояние, можете да използвате двете средства, въведени в тази статия.

Няма съмнение, че е много лесно да експортирате контакт от Outlook като файл vCard. Можете просто да изберете контакт и след това да се обърнете към менюто „Файл“ и да натиснете „Запазване като“. В изскачащия диалогов прозорец „Запазване като“ опцията за тип „vCard File“ е достъпна по подразбиране. Но ако изберете няколко контакта и използвате „Запазване като“, има само опция „Текстов файл“. Така че, при условие че искате да експортирате много контакти като отделни vCard файлове, трябва да потърсите други средства. Тук ще ви представим два начина.

Метод 1: Препращане на контакти като визитка

1. За начало стартирайте приложението си Outlook.
2. След това превключете към прозореца „Контакти“ и отворете правилната папка „Контакти“.
3. След това изберете контактите, които искате да експортирате като vCard файлове.
4. Впоследствие изберете „Препращане на контакт“> „Като визитка“.
5. След това ще се появи ново съобщение, в което се прикачват всички избрани контакти.
6. Сега трябва да изберете всички прикачени визитки в реда „Прикачи“.
7. По-късно можете да ги плъзнете и пуснете на локалното устройство, като изображението по-долу:
8. Веднага ще получите отделните файлове vCard в локалното устройство.

Метод 2: Групов експорт като vCards с Outlook VBA

1. На първо място, натиснете бутоните „Alt + F11“ в главния прозорец на Outlook.
2. След това ще получите достъп до редактора на VBA на Outlook.
3. След това трябва да копирате следните VBA кодове в неизползваем модул.

Sub ExportMultipleContactsAsVCards()
    Dim objSelection As Outlook.Selection
    Dim objContact As Outlook.ContactItem
    Dim objItem As Object
 
    Set objSelection = Outlook.Application.ActiveExplorer.Selection
   
    'If want to export all contacts, use the following lines instead
    'Dim olContacts as Outlook.Items
    'Set olContacts = Outlook.Application.Session.GetDefaultFolder(olFolderContacts).Items
    'For Each objItem In olContacts
    For Each objItem In objSelection
        If TypeOf objItem Is ContactItem Then
           Set objContact = objItem
           'Change the predefined local folder for saving the vCards
           objContact.SaveAs "E:\" & objContact.FullName & ".vcf", olVCard
        End If
    Next
End Sub

4. Впоследствие, за удобство, можете да добавите новия проект на VBA към лентата с инструменти за бърз достъп.
5. Освен това трябва да се уверите, че Outlook разрешава макроси.
6. И накрая, можете да опитате.

• Първо, изберете контактите източник.
• След това щракнете върху бутона за макрос в лентата с инструменти за бърз достъп.
• След като макросът приключи, ще можете да намерите съответните vCard файлове в предварително дефинираната локална папка.

Изхвърлете проблемите с PST

Ако използвате Outlook от десетилетия, трябва да сте се сблъскали с различни проблеми с PST, като например недостъпни проблеми с PST. В този случай, както обикновено, първо можете да се върнете към инструмент за ремонт на входящата кутия. Ако не успее, можете да прибегнете до по-опитен инструмент, като например DataNumen Outlook Repair.

Въведение на автора:

Шърли Джанг е експерт по възстановяване на данни в DataNumen, Inc., която е световен лидер в технологиите за възстановяване на данни, включително поправям mdf и outlook софтуерни продукти за ремонт. За повече информация посетете WWW.datanumen.com