Paano Mabilis na Mag-export ng Maramihang Mga Contact sa Isang VCard File gamit ang Outlook VBA

Ipamahagi ngayon:

Kung marami kang contact sa iyong Outlook at gusto mong i-export ang mga ito sa isang vCard file, sa halip na magkahiwalay na mga file, maaari mong gamitin ang matalinong paraan na ipinakilala sa artikulong ito.

Halimbawa, kailangan mong magpadala ng daan-daang contact sa iba. Sa halip na ipadala ang mga ito bilang magkahiwalay na vCard file, maaaring sabik kang pagsamahin ang mga ito sa isang vCard file at pagkatapos ay ipadala ito. Sa totoo lang, ang aking nakaraang artikulo - "Paano Mag-export ng Maramihang Mga Contact sa Outlook bilang Isang File ng VCard” ay nagpakilala ng isang pamamaraan. Gayunpaman, hinihingi ng diskarteng iyon na magkaroon ka ng Gmail account at gamitin ang feature na “Import and Export” ng Gmail. Sa maikling salita, iyon ay medyo mahirap. Samakatuwid, narito kami ay magpapakilala ng isang mas madaling paraan sa iyo.Mabilis na I-export ang Maramihang Mga Contact sa Isang VCard File na may Outlook VBA

Mabilis na I-export ang Maramihang Mga Contact sa Isang vCard File

  1. Una, ilunsad ang iyong Outlook application.
  2. Pagkatapos, mag-tap sa mga "Alt + F11" na mga key upang ma-access ang VBA editor.
  3. Susunod, sa bagong window, ilagay ang VBA code sa isang module.
Sub ExportMultipleContactsIntoOneVCardFile()
    Dim objSelection As Outlook.Selection
    Dim strLocalDrive, strFolder As String
    Dim i As Long
    Dim objContact As Outlook.ContactItem
    Dim strVCardFile As String
 
    'Get all selected contacts
    Set objSelection = Outlook.Application.ActiveExplorer.Selection
 
    If Not objSelection Is Nothing Then
       'Save contacts in "E:\Temp Contacts\"
       strLocalDrive = "E:"
       strFolder = "Temp Contacts"
       MkDir (strLocalDrive & "\" & strFolder & "\")
 
       'Save all selected contacts as separate vCards
       For i = objSelection.Count To 1 Step -1
           If TypeName(objSelection(i)) = "ContactItem" Then
              Set objContact = objSelection(i)
 
              strVCardFile = strLocalDrive & "\" & strFolder & "\" & objContact.FullName & ".vcf"
              objContact.SaveAs strVCardFile, olVCard
           End If
       Next
 
       'Use cmd to merge all exported vCard files into one
       Shell "cmd.exe /K" & strLocalDrive & " & CD " & strFolder & " & copy *.vcf MergedContact.vcf"
    End If
End Sub

VBA Code - Mabilis na I-export ang Maramihang Mga Contact sa Isang VCard File

  1. Pagkatapos nito, idagdag ang macro na ito sa Quick Access Toolbar na may reference sa “Paano Patakbuhin ang VBA Code sa Iyong Outlook".
  2. Sa kalaunan, maaari mong subukan ang macro na ito ngayon.
  • Bilang panimula, piliin ang mga contact na gusto mong i-export.
  • Pagkatapos, i-click ang pindutan ng macro sa Quick Access Toolbar.Patakbuhin ang Macro sa Mga Napiling Contact
  • Mamaya makakakita ka ng command prompt window, na nagpapahiwatig na ang lahat ng mga contact ay pinagsama sa isa.Command Prompt
  • Ngayon, maaari kang pumunta sa folder na "E:\Temp Contacts" sa iyong Windows Explorer.
  • Sa lokal na folder na ito, makakahanap ka ng vCard file na pinangalanang "MergedContact", na siyang file na naglalaman ng lahat ng napiling contact.Pinagsamang vCard File

Ayusin ang Iyong Data ng Outlook pagkatapos ng Mga Pag-crash

Dahil madaling kapitan ng korapsyon ang Outlook, kailangan mong alagaang mabuti ang iyong PST file. Halimbawa, kailangan mong patuloy na isara ang iyong Outlook sa wastong paraan. Gayundin, iminumungkahi na huwag kailanman mag-click sa mga hindi kilalang link o mag-download ng mga attachment na naka-embed sa mga email. Bukod dito, mas mabuting kumuha ka ng isang makapangyarihan Pagkumpuni ng PST utility, tulad ng DataNumen Outlook Repair. Gamit ito, kahit na masira ang iyong Outlook file, maaari mo pa ring ayusin ito nang walang hirap.

Panimula ng May-akda:

Si Shirley Zhang ay isang dalubhasa sa pagbawi ng data sa DataNumen, Inc., na pinuno ng mundo sa mga teknolohiya sa pagbawi ng data, kasama ang sira SQL Server at pananaw sa pag-aayos ng mga produktong software. Para sa karagdagang impormasyon pagbisita www.datanumen. Sa

Ipamahagi ngayon:

Mga komento ay sarado.