Cara mengunduh semua lampiran dari email Outlook

Jika Anda berada di industri di mana Anda menerima email yang tak terhitung jumlahnya setiap hari, Anda kemungkinan mendapatkan banyak email dengan banyak lampiran. Menggunakan metode manual untuk mengekstrak lampiran dapat memakan waktu jika ada banyak hal untuk diunduh. Untungnya, mudah untuk menyimpan beberapa lampiran email sekaligus menggunakan Microsoft Outlook.

Dalam tutorial ini, kami akan menunjukkan kepada Anda cara mengunduh semua lampiran dari Outlook.

4. Di kotak dialog baru, tahan tombol CTRL di keyboard Anda dan pilih semua lampiran yang ingin Anda unduh. Klik OK.

5. Pilih lokasi yang ingin Anda simpan file dan tekan tombol OK.

Cara mengunduh semua lampiran email Microsoft Outlook sekaligus di Mac

Inilah cara mengunduh semua lampiran menggunakan Outlook untuk Mac:

1. Buka aplikasi MS Outlook.
2. Pilih pesan email yang berisi lampiran Anda.
3. Klik Lampiran dan pilih Unduh Semua.

4. Pilih lokasi yang ingin Anda simpan dan pilih pilih.

Cara mengunduh beberapa lampiran Outlook dari beberapa email

Juga dimungkinkan untuk mengunduh beberapa lampiran dari banyak email sekaligus. Untuk melakukannya:

Gunakan kode VBA

Jika Anda menggunakan Outlook 2019, 2016, 2013, 2010, 2007, atau 2003, Anda dapat menggunakan editor VBA untuk mengunduh beberapa lampiran dari beberapa email.

1. Buka folder Dokumen Anda dan buat folder baru bernama "Lampiran.“Di sinilah lampiran Anda akan diunduh.
2. Buka Microsoft Outlook.
3. Tekan tombol Alt dan F11 pada keyboard untuk membuka editor VBA.
4. Klik kanan Objek Microsoft Outlook> Sisipkan> Sisipkan Modul.

5. Salin kode berikut ke editor dan tekan Enter:

Redup gcount sebagai integer

Redup gfilepath sebagai string

Sub SaveatTachments publik ()

'Perbarui 20200821

Redup xmailitem sebagai pandangan.Mailitem

Redup xattachments sebagai pandangan.Lampiran

Redup xelection sebagai pandangan.Pilihan

Redup saya selama

Redup xattcount selama

Redup xfilePath sebagai string, xfolderpath sebagai string, xsavefiles sebagai string

Pada kesalahan resume berikutnya

xfolderpath = createObject (“wscript.Kerang").Folder Special (16)

Setel xselection = Outlook.Aplikasi.ActiveExplorer.Pilihan

xfolderpath = xfolderpath & “\ lampiran \”

Jika VBA.Dir (xfolderpath, vbdirectory) = vbnullstring kemudian

VBA.Mkdir xfolderpath

Berakhir jika

GfilePath = ""

Untuk setiap xmailitem di xselection

Atur xattachments = xmailitem.Lampiran

xattcount = xattachments.Menghitung

xsavefiles = ""

Jika xattcount> 0 lalu

Untuk i = xattcount ke 1 langkah -1

Gcount = 0

xfilePath = xfolderpath & xattachments.Item (i).Nama file

GfilePath = xfilePath

xfilePath = nama fileren (xfilePath)

Jika isembeddedattachment (xattachments.Item (i)) = false kemudian

xattachments.Item (i).Saveasfile xfilepath

Jika xmailitem.Bodyformat olformathTml kemudian

XSAVEFILES = XSAVEFILES & VBCRLF & ""

Kalau tidak

XSAVEFILES = XSAVEFILES & “
"&" "& XFilePath &" "

Berakhir jika

Berakhir jika

Selanjutnya saya

Berakhir jika

Berikutnya

Atur xattachments = tidak ada

Atur xmailitem = tidak ada

Atur xselection = tidak ada

Akhir sub

Fungsi filerename (filePath sebagai string) sebagai string

Redup xpath sebagai string

Redup xfso sebagai fileSystemObject

Pada kesalahan resume berikutnya

Atur xfso = createObject (“Scripting.FilesystemObject ”)

xpath = filepath

Filerename = xpath

Jika xfso.FileExists (xpath) lalu

Gcount = gcount + 1

xpath = xfso.GetParentFoldername (gfilePath) & "\" & xfso.GetBasename (gfilePath) & """" & gcount & "".” + Xfso.GetExtensionName (GFilePath)

Filerename = filerename (xpath)

Berakhir jika

xfso = tidak ada

Fungsi akhir

Fungsi isembeddedAttachment (lampirkan sebagai lampiran)

Redup xitem sebagai mailitem

Redup xcid sebagai string

Redup xid sebagai string

Redup xhtml sebagai string

Pada kesalahan resume berikutnya

IsembeddedAttachment = false

Atur xitem = lampirkan.Induk

Jika xitem.Bodyformat olformathTml kemudian keluar fungsi

xcid = """"

xcid = lampirkan.PropertyAccessor.GetProperty (“http: // skema.Microsoft.com/mapi/proptag/0x3712001f "")

Jika xcid """" lalu

xhtml = xitem.Htmlbody

xid = ""cid:"" & xcid

If instr (xhtml, xid)> 0 lalu

IsembeddedAttachment = true

Berakhir jika

Berakhir jika

Fungsi akhir

Catatan: Anda dapat menyalin kode asli di atas dari Extand Office dan menempelkannya ke editor.

1. Tekan F5 untuk menjalankan skrip. Anda mungkin mendapatkan jendela pop-up yang meminta Anda untuk mengizinkan aksinya.

Menggunakan alat eksternal

Jika Anda menggunakan versi Outlook lain, ingin mengunduh jenis file selain PST, atau menemukan metode VBA yang rumit, Anda dapat mengunduh alat yang dapat membantu Anda mengunduh beberapa lampiran Outlook sekaligus.

Aplikasi seperti Outlook Attachment Extractor memiliki fungsionalitas untuk menyimpan lampiran tidak hanya dari file PST, tetapi dari format file lain seperti file OST, BAK, MSG, OLK, dan OLM juga. Anda juga dapat mengkonfigurasi aplikasi untuk memfilter lampiran berdasarkan ukuran file, tanggal, atau pengirim.

Cara mengunduh semua lampiran dari file yang rusak

Jika Anda tidak dapat membuka, melihat, atau menyimpan lampiran file di Outlook, file PST Microsoft Outlook mungkin rusak atau rusak. Anda dapat memperbaiki file PST untuk mengambil lampiran menggunakan alat seperti SCANPST.Aplikasi EXE.

Untuk menggunakan alat ini, tutup Outlook dan navigasikan ke salah satu lokasi berikut, tergantung pada versi Outlook Anda:

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

Kemudian, klik dua kali ScanPST.Exe.

Pilih Browse, Temukan File Data Outlook yang ingin Anda pindai dan tekan Start.

Jika alat menemukan kesalahan, pilih perbaikan untuk mencoba memperbaikinya. Setelah selesai, restart Outlook dan periksa apakah sekarang berhasil.

Merampingkan aktivitas email Anda

Mengunduh beberapa file dari Outlook itu mudah dan Anda bahkan dapat mengunduh beberapa file dari beberapa email sekaligus. Jika Anda menemukan metode bawaan dalam Outlook terlalu sulit, Anda dapat mengunduh alat seperti Outlook Attachment Extractor untuk membantu Anda.