ローカルフォルダ内のすべてのファイルをOutlookの電子メールに添付する3つの簡単な方法

ローカルフォルダ内のすべてのファイルをOutlookの電子メールに頻繁に添付する必要がある場合は、この記事で紹介した3つの簡単な方法を使用できます。

Outlookの電子メールに3つのファイルを添付するのは非常に簡単であることは否定できません。 ただし、多くのOutlookユーザーにとって、特定のローカルフォルダー内のすべてのファイルをOutlookの電子メールに添付する必要があるのはごく一般的なケースです。 したがって、この要件に応えて、ここではXNUMXつの最も便利な手段を公開します。 あなたのニーズと好みに応じてどれでも選ぶことができます。

方法1：「ファイルの添付」を使用する

1. まず、メールを開いて自由に作成します。
2. 次に、「挿入」タブに切り替えます。
3. 次に「ファイルを添付」ボタンをクリックします。
4. 次に、ポップアップの[ファイルの挿入]ダイアログボックスで、[Ctrl + A]を押してすべてのファイルを選択します。
5. 続いて、「挿入」ボタンをクリックします。
6. 最後に、メールを完成させて、通常どおりに送信できます。

方法2：「メール受信者に送信」を使用する

1. まず、ファイルエクスプローラーで特定のローカルフォルダーを参照します。
2. 次に、フォルダを見つけたら、それを右クリックします。
3. 続いて、右クリックメニューから「送信」>「メール受信者」を選択できます。
4. 最後に、すぐに新しいOutlook電子メールが開き、次のスクリーンショットのように、このフォルダー内のすべてのファイルがそれに追加されます。

方法3：OutlookVBAを使用する

1. まず、Outlookのメインウィンドウで「Alt + F11」キーボタンを押します。
2. 次に、使用されていないモジュールを開きます。
3. 次に、次のVBAコードをコピーして貼り付けます。

Sub AttachAllFilesinaLocalFolder()
    Dim objMail As Outlook.MailItem
    Dim strFolderPath As String
    Dim strFileName As String
 
    If TypeName(Application.ActiveInspector.CurrentItem) = "MailItem" Then
       Set objMail = Application.ActiveInspector.CurrentItem
    End If
 
    'Change the folder path as per your real case
    strFolderPath = "C:\Attachments\DataNumen Products\"
    strFileName = Dir(strFolderPath)
 
    While Len(strFileName) > 0
          objMail.attachments.Add (strFolderPath & strFileName)
          strFileName = Dir
    Wend
End Sub

4. その後、新しいメールを開き、メッセージウィンドウのクイックアクセスツールバーに新しいマクロを追加します。
5. 最後に、クイックアクセスツールバーの新しいマクロボタンをクリックできます。 その後、特定のローカルフォルダ内のすべてのファイルがすぐに挿入されます。

3つの方法の比較

悪意のあるメールを寄せ付けない

Outlookは、頻繁な不適切なシャットダウン、内部の論理エラー、外部のウイルスやマルウェアなど、さまざまな要因に対して脆弱です。 したがって、マクロを使用する場合は、悪意のある電子メール内の潜在的に安全でないリンクに注意する必要があります。 さらに、次のような堅牢な修復ツールを近くで手に入れる必要があります。 DataNumen Outlook Repair、そのことができます Outlookを修復する 迅速に問題を解決します。

著者紹介：

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