2 Kaedah untuk Mengeksport Banyak Kenalan Outlook sebagai Fail vCard

Sekiranya anda ingin mengeksport banyak kenalan Outlook sebagai fail vCard secara pukal, anda boleh menggunakan dua cara yang diperkenalkan dalam artikel ini.

Tidak ada keraguan bahawa sangat mudah untuk mengeksport kenalan Outlook sebagai fail vCard. Anda hanya boleh memilih kenalan dan kemudian beralih ke menu "File" dan tekan "Save As". Dalam kotak dialog "Simpan Sebagai" pop timbul, pilihan jenis "Fail vCard" tersedia secara lalai. Tetapi, jika anda memilih beberapa kenalan dan menggunakan "Simpan Sebagai", hanya ada pilihan "File Teks". Jadi, dengan syarat anda ingin mengeksport banyak kenalan secara pukal sebagai fail vCard yang berasingan, anda harus mencari cara lain. Di sini kami akan memperkenalkan anda dua cara.

Kaedah 1: Hantar Kenalan sebagai Kad Perniagaan

1. Untuk bermula, lancarkan aplikasi Outlook anda.
2. Kemudian beralih ke panel "Kenalan" dan buka folder Kenalan yang betul.
3. Seterusnya pilih kenalan yang ingin anda eksport sebagai fail vCard.
4. Selanjutnya, pilih "Hantar Kenalan"> "Sebagai Kad Perniagaan".
5. Selepas itu, mesej baru akan muncul, di mana semua kenalan yang dipilih sedang dilampirkan.
6. Sekarang anda harus memilih semua kad nama yang dilampirkan di baris "Lampirkan".
7. Kemudian anda boleh menyeret dan melepaskannya ke pemacu tempatan, seperti gambar di bawah:
8. Sekali gus, anda akan mendapat fail vCard yang berasingan dalam pemacu tempatan.

Kaedah 2: Eksport Kumpulan sebagai vCards dengan Outlook VBA

1. Di tempat pertama, tekan butang kekunci "Alt + F11" di tetingkap utama Outlook.
2. Kemudian anda akan mendapat akses ke penyunting Outlook VBA.
3. Seterusnya anda perlu menyalin kod VBA berikut ke dalam modul yang tidak digunakan.

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. Selepas itu, untuk kemudahan, anda boleh menambahkan projek VBA baru ke Bar Alat Akses Pantas.
5. Selain itu, anda harus memastikan bahawa Outlook membenarkan makro.
6. Akhirnya, anda boleh mencuba.

• Pertama, pilih kenalan sumber.
• Kemudian klik butang makro di Bar Alat Akses Pantas.
• Setelah makro selesai dijalankan, anda akan dapat mencari fail vCard yang sesuai dalam folder tempatan yang telah ditetapkan.

Ketepikan Masalah PST Vexing

Sekiranya anda telah menggunakan Outlook selama beberapa dekad, anda pasti menghadapi pelbagai masalah PST, seperti masalah PST yang tidak dapat diakses. Dalam kes ini, seperti biasa, anda boleh berulang kali ke alat pembaikan peti masuk. Sekiranya gagal, anda boleh menggunakan alat yang lebih berpengalaman, seperti DataNumen Outlook Repair.

Pengenalan Pengarang:

Shirley Zhang adalah pakar pemulihan data di DataNumen, Inc., yang merupakan pemimpin dunia dalam teknologi pemulihan data, termasuk betulkan mdf dan produk perisian pembaikan prospek. Untuk maklumat lebih lanjut, lawati www.datanumen.com