2 metode za skupni izvoz više Outlook kontakata kao vCard datoteka

Ako želite skupno izvesti više Outlook kontakata kao vCard datoteke, možete upotrijebiti dva načina predstavljena u ovom članku.

Nema sumnje da je vrlo jednostavno izvesti Outlook kontakt kao vCard datoteku. Možete jednostavno odabrati kontakt, a zatim otvoriti izbornik "Datoteka" i pritisnuti "Spremi kao". U skočnom dijaloškom okviru "Spremi kao", opcija vrste datoteke "vCard" dostupna je prema zadanim postavkama. No, ako odaberete više kontakata i koristite "Spremi kao", postoji samo opcija "Tekstualna datoteka". Dakle, pod uvjetom da želite masovno izvesti mnoge kontakte kao zasebne vCard datoteke, morate potražiti drugi način. Ovdje ćemo vam predstaviti dva načina.

Metoda 1: proslijedite kontakte kao posjetnicu

1. Za početak, pokrenite Outlook aplikaciju.
2. Zatim prijeđite na okno "Kontakti" i otvorite ispravnu mapu s kontaktima.
3. Zatim odaberite kontakte koje želite izvesti kao vCard datoteke.
4. Nakon toga odaberite “Proslijedi kontakt” > “Kao posjetnicu”.
5. Nakon toga će se pojaviti nova poruka u kojoj se prilažu svi odabrani kontakti.
6. Sada biste trebali odabrati sve priložene posjetnice u retku "Priloži".
7. Kasnije ih možete povući i ispustiti na lokalni disk, kao na slici ispod:
8. Odjednom ćete dobiti zasebne vCard datoteke na lokalnom pogonu.

Metoda 2: Skupni izvoz kao vCards s programom Outlook VBA

1. Kao prvo, pritisnite tipke "Alt + F11" u glavnom prozoru programa Outlook.
2. Tada ćete dobiti pristup Outlook VBA uređivaču.
3. Zatim trebate kopirati sljedeće VBA kodove u modul koji se ne koristi.

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. Nakon toga, radi praktičnosti, možete dodati novi VBA projekt na alatnu traku za brzi pristup.
5. Osim toga, trebali biste osigurati da Outlook dopušta makronaredbe.
6. Konačno, možete pokušati.

• Najprije odaberite izvorne kontakte.
• Zatim kliknite gumb makronaredbe na alatnoj traci za brzi pristup.
• Nakon što se makronaredba završi, moći ćete pronaći odgovarajuće vCard datoteke u unaprijed definiranoj lokalnoj mapi.

Riješite dosadnih PST problema

Ako ste desetljećima koristili Outlook, sigurno ste se susreli s raznim problemima s PST-om, poput problema s nedostupnim PST-om. U ovom slučaju, kao i obično, prvo se možete vratiti na alat za popravak inboxa. Ako ne uspije, možete posegnuti za iskusnijim alatom, kao što je DataNumen Outlook Repair.

Uvod za autora:

Shirley Zhang stručnjakinja je za oporavak podataka u DataNumen, Inc., koji je svjetski lider u tehnologijama za oporavak podataka, uključujući popraviti mdf i softverske proizvode za popravak Outlooka. Za više informacija posjetite www.datanumen.com