OutlookVBAを使用して複数の連絡先をXNUMXつのVCardファイルにすばやくエクスポートする方法

Outlookソリューション 2025 年 9 月 29 日
今すぐ共有：

Outlookに複数の連絡先があり、それらを個別のファイルではなく単一のvCardファイルにエクスポートする場合は、この記事で紹介したスマートな方法を使用できます。

たとえば、何百もの連絡先を他の人に送信する必要があります。 それらを別々のvCardファイルとして送信するのではなく、それらをXNUMXつのvCardファイルに結合してから送信したい場合があります。 実際、私の前の記事–「複数のOutlook連絡先を単一のVCardファイルとしてエクスポートする方法」はメソッドを導入しました。 ただし、このアプローチでは、Gmailアカウントを持っており、Gmailの「インポートとエクスポート」機能を使用する必要があります。 一言で言えば、それはかなり面倒です。 そのため、ここではより便利な方法を紹介します。OutlookVBAを使用して複数の連絡先をXNUMXつのVCardファイルにすばやくエクスポートする

複数の連絡先をXNUMXつのvCardファイルにすばやくエクスポート

  1. まず、Outlookアプリケーションを起動します。
  2. 次に、「Alt + F11」キーをタップしてVBAエディターにアクセスします。
  3. 次に、新しいウィンドウで、VBAコードをモジュールに配置します。
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コード-複数の連絡先をXNUMXつのVCardファイルにすばやくエクスポート

  1. その後、「」を参照して、このマクロをクイックアクセスツールバーに追加します。OutlookでVBAコードを実行する方法"
  2. 最終的には、このマクロを今すぐ試すことができます。
  • まず、エクスポートしたい連絡先を選択してください。
  • 次に、クイックアクセスツールバーのマクロボタンをクリックします。選択した連絡先でマクロを実行する
  • 後で、すべての連絡先がXNUMXつにマージされたことを示すコマンドプロンプトウィンドウが表示されます。コマンドプロンプト
  • これで、Windowsエクスプローラーの「E：\ TempContacts」フォルダーに移動できます。
  • このローカルフォルダには、「MergedContact」という名前のvCardファイルがあります。これは、選択したすべての連絡先を含むファイルです。マージされたvCardファイル

クラッシュ後にOutlookデータを修復する

Outlookは破損しやすいため、PSTファイルに十分注意する必要があります。 たとえば、適切な方法でOutlookを閉じ続ける必要があります。 また、不明なリンクをクリックしたり、電子メールに埋め込まれた添付ファイルをダウンロードしたりしないことをお勧めします。 さらに、あなたは強力なものを手に入れたほうがいいです PST修復 などのユーティリティ DataNumen Outlook Repair。 これを使用すると、Outlookファイルが破損した場合でも、簡単に修復できます。

著者紹介：

Shirley Zhangは、のデータ復旧の専門家です。 DataNumen、Inc。は、以下を含むデータ復旧技術の世界的リーダーです。 腐敗した SQL Server と見通し修理ソフトウェア製品。 詳細については、次のWebサイトをご覧ください。 WWW。datanumen.com

今すぐ共有：

コメントは締め切りました。