毎日無数の電子メールを受信する業界にいる場合は、複数の添付ファイルが付いた多数の電子メールを受信する可能性があります。ダウンロードする添付ファイルが多数ある場合、手動で添付ファイルを抽出すると時間がかかることがあります。幸いなことに、 Microsoft Outlook^{(Microsoft Outlook)}を使用すると、複数の電子メールの添付ファイルを一度に簡単に保存できます。

このチュートリアルでは、 Outlook^(Outlook)からすべての添付ファイルをダウンロードする方法を説明します。

WindowsですべてのMicrosoft Outlook 電子メールの添付ファイルを^{(Microsoft Outlook Email Attachments)}一度^(Once)にダウンロードする方法

Windows Microsoft Outlookアプリを使用してすべての添付ファイルを一度にダウンロードするには、次の手順を実行します。

1. Outlookを開き、 Outlookプロファイルにサインインします。
2. 必要なOutlook添付ファイルが含まれる電子メールを選択します。
3. いずれかの添付ファイルを右クリックし、ドロップダウン メニューで [すべての添付ファイルを保存]を選択します。^(Save)1 つのファイルのみを保存する場合は、「名前を付けて保存」^{(Save As)}を選択します。

1. 新しいダイアログ ボックスで、キーボードのCTRLキーを押したまま、ダウンロードするすべての添付ファイルを選択します。「OK」をクリックします^{(Click OK)}。

1. ファイルを保存する場所を選択し、「OK」ボタンを押します。

MacですべてのMicrosoft Outlook 電子メールの添付ファイルを^{(Microsoft Outlook Email Attachments)}一度に^(Once)ダウンロードする方法

Outlook for Macを使用してすべての添付ファイルをダウンロードする方法は次のとおりです。

1. MS Outlook アプリケーションを開きます。
2. 添付ファイルを含む 電子メール^(Email)メッセージを選択します。
3. ^(Click)「添付ファイル」^{(Attachments)}をクリックし、「すべてダウンロード」^{(Download All)}を選択します。

1. 添付ファイルを保存する場所を選択し、[選択]^(Choose)を選択します。

複数の電子メール^{(Multiple Emails)}から複数の Outlook 添付ファイルをダウンロードする^{(Download Multiple Outlook Attachments)}方法

多数のメールから複数の添付ファイルを一度にダウンロードすることもできます。そうするために：

VBAコードを使用する

Outlook 2019、2016、2013、2010、2007^{(Outlook 2019)}、または 2003 を使用している場合は、VBA エディター^{(VBA editor)}を使用して、複数の電子メールから複数の添付ファイルをダウンロードできます。

1. ドキュメントフォルダーを開き、「添付ファイル」という名前の新しいフォルダーを作成します。ここに添付ファイルがダウンロードされます。
2. Microsoft Outlookを開きます。
3. ^(Press)キーボードの Alt キーと F11 キーを押して^(Alt)、VBA^(F11)エディタを^(VBA)開きます。
4. Microsoft Outlook Object > Insert > Insert Module右クリックし、 [挿入] > [モジュールの挿入] を選択します。

1. 次のコードをエディタにコピーし、Enter キーを押します。

整数としての Dim GCount

文字列としての Dim GFilepath

Public Sub SaveAttachments()

'更新 20200821

xMailItem を Outlook.MailItem として暗くする

Outlook.Attachments としてのDim^(Dim) xAttachments

^(Dim)Outlook.Selection としての Dim xSelection

ディム・アイ・アズ・ロング

Dim xAttCount As Long

Dim xFilePath As String、xFolderPath As String、xSaveFiles As String

エラー時は次へ再開

xFolderPath = CreateObject (「WScript.Shell」).SpecialFolders(16)

^(Set)xSelection = Outlook.Application.ActiveExplorer.Selectionを設定します。

xFolderPath = xFolderPath & 「添付ファイル」

VBA.Dir ( xFolderPath , vbDirectory) = vbNullString の 場合

VBA.MkDir xFolderPath

終了の場合

Gファイルパス = ""

xSelection 内の各 xMailItem について

^(Set)xAttachments = xMailItem.Attachments を設定します

xAttCount = xAttachments.Count

xSaveFiles = “”

xAttCount > 0 の場合

For i = xAttCount から 1ステップ^(Step)-1

Gカウント = 0

xFilePath = xFolderPath & xAttachments.Item (i).FileName

Gファイルパス = xファイルパス

xFilePath = FileRename (xFilePath)

IsEmbeddedAttachment ( xAttachments.Item (i)) = False の場合

xAttachments.Item(i).SaveAsFile xFilePath

xMailItem.BodyFormat <> olFormatHTML の場合

xSaveFiles = xSaveFiles & vbCrLf & “ハイパーリンク参照が無効です。>」

それ以外

xSaveFiles = xSaveFiles & “
” & “ xFilePath & “‘>” & xFilePath & “ ”

終了の場合

終了の場合

次は私

終了の場合

次

xAttachments = なしを設定します

xMailItem = なしを設定します

xSelection = なしを設定します

エンドサブ

関数FileRename ( FilePath As String ) As String

文字列としての Dim xPath

FileSystemObject として xFso をディムする

エラー時は次へ再開

Set xFso = CreateObject (「Scripting.FileSystemObject」) を設定します。

xPath = ファイルパス

ファイル名の変更 = xPath

xFso.FileExists(xPath) の場合

G カウント = G カウント + 1

xPath = xFso.GetParentFolderName( GFilepath ) & “” & xFso.GetBaseName ( GFilepath ) & ” ” & GCount & “.” + xFso.GetExtensionName( GFilepath )

FileRename = FileRename(xPath)

終了の場合

xFso = なし

終了機能

関数 IsEmbeddedAttachment^{(Function IsEmbeddedAttachment)} (添付ファイル^(Attachment)として添付^(Attach))

xItem を MailItem としてディムする

文字列としての Dim xCid

文字列としての Dim xID

文字列としての Dim xHtml

エラー時は次へ再開

IsEmbeddedAttachment = False

xItem = Attach.Parent を設定します

xItem.BodyFormat <> olFormatHTML の場合、関数を終了します^(Function)

xCid = “”

xCid = Attach.PropertyAccessor.GetProperty (“http://schemas.microsoft.com/mapi/proptag/0x3712001F”)

xCid <> "" の場合

xHtml = xItem.HTMLBody

xID = “cid:” & xCid

InStr(xHtml, xID) > 0 の場合

IsEmbeddedAttachment = True

終了の場合

終了の場合

終了機能

注:上記の元のコードを Extend Office から^{(original code above from Extend Office)}コピーして、エディターに貼り付けることができます。

1. F5 を押して^{(Press F5)}スクリプトを実行します。アクションの許可を求めるポップアップ ウィンドウが表示される場合があります。

外部ツールの使用

別のバージョンのOutlook^(Outlook)を使用している場合、 PST 以外のファイル タイプ^{(a file type other than PST)}をダウンロードする場合、またはVBAメソッドが面倒だと感じる場合は、複数の^(VBA)Outlook添付ファイルを一度に ダウンロードするのに役立つツールをダウンロードできます。

Outlook Attachment Extractorなどのアプリには、 PSTファイルだけでなく、 OST、BAK、MSG、OLK、OLMファイルなどの他のファイル形式からも添付ファイルを保存する機能があります。ファイル サイズ、日付、または送信者によって添付ファイルをフィルターするようにアプリを構成することもできます。

破損した^(Corrupted)ファイル からすべての添付ファイルをダウンロードする方法

Outlookで添付ファイルを開いたり、表示したり、保存したりできない場合は、Microsoft Outlook PSTファイルが破損しているか破損している可能性があります。SCANPST.exeアプリケーションなどのツールを使用して、PST ファイルを修復して^{(repair the PST file)}添付ファイルを取得できます。

このツールを使用するには、Outlook を閉じ、 ^(Outlook)Outlookのバージョンに応じて次のいずれかの場所に移動します。

1. Outlook 2019: C:Program Files (x86)Microsoft Office\root\Office16
2. Outlook 2016: C:Program Files (x86)Microsoft Office\root\Office16
3. Outlook 2013: C:Program Files (x86)Microsoft Office\Office15
4. Outlook 2010: C:Program Files (x86)Microsoft Office\Office14
5. Outlook 2007: C:Program Files (x86)Microsoft Office\Office12

次に、SCANPST.EXE をダブルクリックします。

[参照] を選択し^{(Select Browse)}、スキャンするOutlookデータ ファイルを見つけて^(Outlook)[開始] を^(Start)押します。

ツールでエラーが見つかった場合は、[修復] を^(Repair)選択して修正を試みます。完了したら、Outlook を^(Outlook)再起動し、動作するかどうかを確認します。

電子メール活動を合理化する

Outlookから複数のファイルをダウンロードするのは簡単で、複数の電子メールから複数のファイルを一度にダウンロードすることもできます。Outlookの組み込みメソッドが難しすぎる場合は、Outlook Attachment Extractorなどのツールをダウンロードすると便利です。

How to Download All Attachments From Outlook Emails

If you’re in an industry where yoυ reсeive countless emails every day, you likely get many emails with multiple attachments. Using a manual method to extract attachments can be time-consuming if there are many to download. Luckily, it’s easy to save multiple email attachments at once using Microsoft Outlook.

In this tutorial, we’ll show you how to download all attachments from Outlook.

How to Download All Microsoft Outlook Email Attachments at Once on Windows

To download all attachments at once using the Windows Microsoft Outlook app, do the following:

1. Open Outlook and sign in to your Outlook profile.
2. Select the email with your desired Outlook attachments.
3. Right-click any of the attachment files and select Save all attachments in the drop-down menu. If you only want to save one file, select Save As.

1. In the new dialog box, hold down the CTRL key on your keyboard and select all of the attachments you want to download. Click OK.

1. Select the location that you would like to save the files to and press the OK button.

How to Download All Microsoft Outlook Email Attachments at Once on Mac

Here’s how to download all attachments using Outlook for Mac:

1. Open the MS Outlook application.
2. Select the Email message that contains your attachments.
3. Click on Attachments and select Download All.

1. Select the location that you would like to save your attachments and select Choose.

How to Download Multiple Outlook Attachments From Multiple Emails

It’s also possible to download multiple attachments from many emails at once. To do so:

Use VBA Code

If you are using Outlook 2019, 2016, 2013, 2010, 2007, or 2003, you can use the VBA editor to download multiple attachments from multiple emails.

1. Open your Documents folder and create a new folder named “Attachments.” This is where your attachments will download to.
2. Open Microsoft Outlook.
3. Press the Alt and F11 keys on the keyboard to open the VBA editor.
4. Right-click Microsoft Outlook Object > Insert > Insert Module.

1. Copy the following code into the editor and press Enter:

Dim GCount As Integer

Dim GFilepath As String

Public Sub SaveAttachments()

‘Update 20200821

Dim xMailItem As Outlook.MailItem

Dim xAttachments As Outlook.Attachments

Dim xSelection As Outlook.Selection

Dim i As Long

Dim xAttCount As Long

Dim xFilePath As String, xFolderPath As String, xSaveFiles As String

On Error Resume Next

xFolderPath = CreateObject(“WScript.Shell”).SpecialFolders(16)

Set xSelection = Outlook.Application.ActiveExplorer.Selection

xFolderPath = xFolderPath & “\Attachments\”

If VBA.Dir(xFolderPath, vbDirectory) = vbNullString Then

VBA.MkDir xFolderPath

End If

GFilepath = “”

For Each xMailItem In xSelection

Set xAttachments = xMailItem.Attachments

xAttCount = xAttachments.Count

xSaveFiles = “”

If xAttCount > 0 Then

For i = xAttCount To 1 Step -1

GCount = 0

xFilePath = xFolderPath & xAttachments.Item(i).FileName

GFilepath = xFilePath

xFilePath = FileRename(xFilePath)

If IsEmbeddedAttachment(xAttachments.Item(i)) = False Then

xAttachments.Item(i).SaveAsFile xFilePath

If xMailItem.BodyFormat <> olFormatHTML Then

xSaveFiles = xSaveFiles & vbCrLf & “<Error! Hyperlink reference not valid.>”

Else

xSaveFiles = xSaveFiles & “<br>” & “<a href=’file://” & xFilePath & “‘>” & xFilePath & “</a>”

End If

End If

Next i

End If

Next

Set xAttachments = Nothing

Set xMailItem = Nothing

Set xSelection = Nothing

End Sub

Function FileRename(FilePath As String) As String

Dim xPath As String

Dim xFso As FileSystemObject

On Error Resume Next

Set xFso = CreateObject(“Scripting.FileSystemObject”)

xPath = FilePath

FileRename = xPath

If xFso.FileExists(xPath) Then

GCount = GCount + 1

xPath = xFso.GetParentFolderName(GFilepath) & “\” & xFso.GetBaseName(GFilepath) & ” ” & GCount & “.” + xFso.GetExtensionName(GFilepath)

FileRename = FileRename(xPath)

End If

xFso = Nothing

End Function

Function IsEmbeddedAttachment(Attach As Attachment)

Dim xItem As MailItem

Dim xCid As String

Dim xID As String

Dim xHtml As String

On Error Resume Next

IsEmbeddedAttachment = False

Set xItem = Attach.Parent

If xItem.BodyFormat <> olFormatHTML Then Exit Function

xCid = “”

xCid = Attach.PropertyAccessor.GetProperty(“http://schemas.microsoft.com/mapi/proptag/0x3712001F”)

If xCid <> “” Then

xHtml = xItem.HTMLBody

xID = “cid:” & xCid

If InStr(xHtml, xID) > 0 Then

IsEmbeddedAttachment = True

End If

End If

End Function

Note: You can copy the original code above from Extend Office and paste it into the editor.

1. Press F5 to run the script. You may get a pop-up window prompting you to allow the action.

Using an External Tool

If you’re using another version of Outlook, want to download a file type other than PST, or find the VBA method cumbersome, you can download a tool that can help you download multiple Outlook attachments at once.

Apps such as Outlook Attachment Extractor have the functionality to save attachments not only from PST files, but from other file formats such as OST, BAK, MSG, OLK, and OLM files, too. You can also configure the app to filter attachments by file size, date, or sender.

How to Download All Attachments From a Corrupted File

If you cannot open, view, or save file attachments in Outlook, the Microsoft Outlook PST file may be corrupted or damaged. You can repair the PST file to retrieve the attachment using tools such as the SCANPST.exe application.

To use this tool, close Outlook and navigate to one of the following locations, depending on your version of Outlook:

1. Outlook 2019: C:\Program Files (x86)\Microsoft Office\root\Office16
2. Outlook 2016: C:\Program Files (x86)\Microsoft Office\root\Office16
3. Outlook 2013: C:\Program Files (x86)\Microsoft Office\Office15
4. Outlook 2010: C:\Program Files (x86)\Microsoft Office\Office14
5. Outlook 2007: C:\Program Files (x86)\Microsoft Office\Office12

Then, double-click SCANPST.EXE.

Select Browse, locate the Outlook data file you want to scan and press Start.

If the tool finds errors, select Repair to attempt to fix them. Once complete, restart Outlook and check whether it now works.

Streamline Your Email Activities

Downloading multiple files from Outlook is easy and you can even download multiple files from multiple emails all at once. If you find the built-in methods in Outlook too difficult, you can download tools such as Outlook Attachment Extractor to help you out.

Related posts

• Tik Tokの透かしを削除する方法

• Chromebookで写真や動画を撮る3つの方法

• コンピュータと電子メールの監視またはスパイソフトウェアを検出する方法

• 謎解きされたフラットパネルディスプレイテクノロジー：TN、IPS、VA、OLEDなど

• ChromebookでCapsLockをオンまたはオフにする方法

• BCCとCCはどういう意味ですか？基本的なEメールLingoを理解する

• 不和で誰かをミュートする方法

• Twitchビデオをダウンロードする方法

• DisneyPlusエラーコード83を修正する方法

• お住まいの地域で最適なインターネットオプション（ISP）を見つける4つの方法

• HuluのエラーコードRUNUNK13を修正する方法

• Twitchの名前を変更できますか？はい、でも注意してください

• PeacockをFirestickにダウンロードしてインストールする方法

• コンピュータを子供から保護するための10の最良の方法

• Netflixで言語を変更する方法

• 有線プリンターを6つの異なる方法でワイヤレスにする方法

• DVI vs HDMI vs DisplayPort –知っておくべきこと

• Facebookで思い出を見つける方法

• 最高のDiscordサーバーを見つける方法

• GIMPで透明な背景を作成する方法