Bagaimana cara memindahkan pesan email ke folder tertentu setelah membaca di Outlook?
Memindahkan pesan email ke folder tertentu setelah membaca adalah cara terbaik untuk menjaga folder Kotak Masuk tetap bersih di Outlook. Bagi banyak pengguna Outlook, mereka cenderung membuat aturan untuk pemindahan email yang telah dibaca ini. Sebenarnya, Outlook tidak mendukung proses panduan aturan ini. Pada artikel ini, kami akan menunjukkan cara memindahkan pesan email ke folder tertentu setelah membaca dengan kode VBA di Outlook.
Pindahkan pesan email ke folder tertentu setelah membaca di Outlook
- Otomatiskan pengiriman email dengan CC / BCC Otomatis, Maju Otomatis berdasarkan aturan; mengirim Balas otomatis (Di Luar Kantor) tanpa memerlukan server pertukaran...
- Dapatkan pengingat seperti Peringatan BCC saat membalas semua saat Anda berada di daftar BCC, dan Ingatkan Saat Lampiran Hilang untuk lampiran yang terlupakan...
- Tingkatkan efisiensi email dengan Balas (Semua) Dengan Lampiran, Tambahkan Ucapan atau Tanggal & Waktu secara Otomatis ke Tanda Tangan atau Subjek, Balas Beberapa Email...
- Sederhanakan pengiriman email dengan Ingat Email, Alat Lampiran (Kompres Semua, Simpan Otomatis Semua...), Hapus Duplikat, dan Laporan Cepat...
Pindahkan pesan email ke folder tertentu setelah membaca di Outlook
Anda dapat memindahkan pesan email ke folder tertentu setelah membaca dengan menjalankan kode VBA di Outlook.
1. Pertama, Anda perlu membuat nama folder baru "Ulasan”Di bawah folder Kotak Masuk.
2. Buka folder Inbox, lalu silahkan tekan lain + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.
3. Kemudian klik dua kali untuk memperluas Project1 > Objek Microsoft Outlook > Sesi Pandangan ini untuk membuka Proyek Vba.OTM Editor.
4. Kemudian salin dan tempel kode VBA di bawah ini ke editor VbaProject.OTM seperti yang ditunjukkan pada gambar di atas.
Kode VBA: pindahkan pesan setelah dibaca
Sub MoveInbox2Reviewed()
On Error Resume Next
Set oOutlook = CreateObject("Outlook.Application")
Set oNamespace = oOutlook.GetNamespace("MAPI")
Set oFolderSrc = oNamespace.GetDefaultFolder(olFolderInbox)
Set oFolderDst = oFolderSrc.Folders("Reviewed")
Set oFilteredItems = oFolderSrc.Items.Restrict("[UnRead] = False")
For Each oMessage In oFilteredItems
oMessage.Move oFolderDst
Next
End Sub
5. Kemudian klik Save untuk menyimpan kode VBA dan kemudian tutup Microsoft Visual Basic untuk Aplikasi jendela.
6. Klik kanan file Quick Access Toolbar, Lalu pilih Sesuaikan Bilah Alat Akses Cepat dari menu klik kanan. Lihat tangkapan layar:
7. Dalam Pilihan Outlook kotak dialog, Anda perlu:
1). Pilih Macro dalam Pilih perintah dari daftar drop-down;
2). Pilih Proyek1. ThisOutlookSession di kotak di bawah Pilih perintah dari daftar drop-down;
3). Klik Add tombol;
4). Klik OK .
8. Kemudian Anda dapat melihat file Makro tombol ditampilkan di Quick Access Toolbar. Pastikan Anda berada di folder kotak masuk tempat Anda ingin memindahkan semua pesan yang sudah dibaca, lalu klik Makro tombol untuk menjalankan kode VBA di dalam Kotak Masuk.
Catatan:
1. Kode VBA ini dapat diterapkan di Outlook 2007, 2010, dan 2013; Namun, di Outlook 2007, Anda dapat langsung mengklik Run tombol untuk menjalankan kode.
2. Jika ada beberapa akun email yang ada di Outlook Anda, kode VBA hanya dapat diterapkan di akun yang file datanya disetel sebagai default. Anda dapat memeriksa file data default dengan mengklik File > Info > Pengaturan akun > Pengaturan akun untuk membuka Pengaturan akun kotak dialog. Lalu pergi ke File Data tab, Anda akan melihat file data default ditandai dengan sebelumnya.
3. Jika Anda ingin mengubah file data default ke akun email lain, pilih dan sorot akun yang ingin Anda tetapkan sebagai default, lalu klik Ditetapkan sebagai default dalam Pengaturan akun kotak dialog.
4. Saat menjalankan kode VBA untuk pertama kalinya dan mengetahui pesan yang sudah dibaca tidak dipindahkan sekaligus, teruskan mengklik tombol Makro sampai semua pesan yang sudah dibaca di Kotak Masuk dipindahkan.
Alat Produktivitas Kantor Terbaik
Kutools untuk Outlook - Lebih dari 100 Fitur Canggih untuk Meningkatkan Outlook Anda
🤖 Asisten Surat AI: Email profesional instan dengan keajaiban AI--satu klik untuk mendapatkan balasan jenius, nada sempurna, penguasaan multibahasa. Ubah email dengan mudah! ...
📧 Email Otomatis: Di Luar Kantor (Tersedia untuk POP dan IMAP) / Jadwal Kirim Email / Auto CC/BCC Sesuai Aturan Saat Mengirim Email / Penerusan Otomatis (Aturan Lanjutan) / Tambah Salam Otomatis / Secara Otomatis Membagi Email Multi-Penerima menjadi Pesan Individual ...
📨 email Management: Mengingat Email dengan Mudah / Blokir Email Penipuan berdasarkan Subjek dan Lainnya / Hapus Email Duplikat / Pencarian / Konsolidasi Folder ...
📁 Lampiran Pro: Penyimpanan Batch / Pelepasan Batch / Kompres Batch / Penyimpanan otomatis / Lepaskan Otomatis / Kompres Otomatis ...
🌟 Antarmuka Ajaib: 😊Lebih Banyak Emoji Cantik dan Keren / Tingkatkan Produktivitas Outlook Anda dengan Tampilan Tab / Minimalkan Outlook Daripada Menutup ...
👍 Keajaiban sekali klik: Balas Semua dengan Lampiran Masuk / Email Anti-Phishing / 🕘Tampilkan Zona Waktu Pengirim ...
👩🏼🤝👩🏻 Kontak & Kalender: Batch Tambahkan Kontak Dari Email yang Dipilih / Bagi Grup Kontak menjadi Grup Individual / Hapus Pengingat Ulang Tahun ...
Lebih 100 Fitur Tunggu Eksplorasi Anda! Klik Di Sini untuk Menemukan Lebih Banyak.