Note: The other languages of the website are Google-translated. Back to English

Bagaimana cara memindahkan email dari pengirim yang tidak dikenal ke folder tertentu di Outlook? 

Dalam pekerjaan sehari-hari Anda, Anda mungkin menerima banyak email yang datang dari pengirim yang tidak dikenal yang tidak disimpan di folder Kontak Anda. Ini mungkin beberapa email sampah atau berbahaya, dalam hal ini, Anda ingin memindahkan email ini secara otomatis ke folder tertentu, bukan ke Kotak Masuk. Bagaimana Anda bisa menyelesaikan pekerjaan ini di Outlook?

Pindahkan email dari pengirim yang tidak dikenal ke folder tertentu dengan membuat aturan

Pindahkan email dari pengirim yang tidak dikenal ke folder tertentu dengan menerapkan kode VBA


Pindahkan email dari pengirim yang tidak dikenal ke folder tertentu dengan membuat aturan

Sebenarnya, Anda dapat membuat aturan untuk memindahkan email dari pengirim yang tidak dikenal ke folder tertentu secara otomatis, lakukan hal berikut:

1. Buat folder baru di bawah folder Kotak Masuk yang akan menempatkan email datang dari pengirim yang tidak dikenal seperti gambar berikut yang ditampilkan:

doc memindahkan email dari tidak dikenal 1

2. Lalu klik Beranda > Peraturan > Kelola Aturan & Peringatan, lihat tangkapan layar:

doc memindahkan email dari tidak dikenal 2

3. di Aturan dan Peringatan kotak dialog, klik Aturan baru bawah Aturan Email tab, lihat tangkapan layar:

doc memindahkan email dari tidak dikenal 3

4. Dan klik OK tombol untuk pergi ke Wizard Aturanklik Terapkan aturan pada pesan yang saya terima pilihan dari Mulai dari aturan kosong kotak bagian, lihat tangkapan layar:

doc memindahkan email dari tidak dikenal 4

5. Lalu klik Next tombol, pada langkah ini, jangan pilih opsi apa pun, dan klik Next tombol langsung, kotak peringatan muncul, silakan klik Yes tombol, lihat tangkapan layar:

doc memindahkan email dari tidak dikenal 5

6. Dan di kotak dialog berikutnya, centang pindahkan ke folder yang ditentukan pilihan dalam Langkah1: Pilih tindakan daftar kotak, dan kemudian klik teks tertaut ditentukan, dan di tempat terbuka Aturan dan Peringatan dialog, tentukan folder tempat Anda ingin memindahkan email, lihat tangkapan layar:

doc memindahkan email dari tidak dikenal 6

7. Klik OK tombol, dan lanjutkan mengklik Next tombol, dalam hal ini Apakah ada pengecualian dialog, periksa kecuali jika pengirim ada di Buku Alamat yang ditentukan pilihan dalam Langkah1: Pilih pengecualian daftar kotak, dan kemudian klik teks tertaut ditentukan, Dan Tambahkan Daftar Alamat kotak akan muncul, pilih folder kontak yang berisi kontak yang ingin Anda kecuali, lihat tangkapan layar:

doc memindahkan email dari tidak dikenal 7

8. Lalu klik Add tombol, dan kemudian klik Next untuk masuk ke dialog wizard terakhir, ketikkan nama aturan di Langkah 1: Tentukan nama untuk aturan ini kotak teks, dan centang Aktifkan aturan ini pilihan dari Langkah2: Aturan penyiapan bagian opsi. Lihat tangkapan layar:

doc memindahkan email dari tidak dikenal 8

9. Dan kemudian klik Finish serta Ok tombol untuk menutup dialog. Mulai sekarang, ketika email datang dari pengirim yang tidak dikenal, mereka akan dipindahkan ke folder tertentu secara otomatis.


Pindahkan email dari pengirim yang tidak dikenal ke folder tertentu dengan menerapkan kode VBA

Mungkin metode di atas merepotkan Anda, di sini, Anda dapat menerapkan kode untuk mengatasinya secepat mungkin.

1. Tahan ALT + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.

2. di Microsoft Visual Basic untuk Aplikasi jendela, klik dua kali Sesi Pandangan ini dari Project1 (VbaProject.OTM) panel untuk membuka mode, lalu salin dan tempel kode berikut ke dalam modul kosong.

Kode VBA: Pindahkan email secara otomatis dari pengirim yang tidak dikenal ke folder tertentu:

Public WithEvents MailItems As Outlook.Items
Private Sub Application_Startup()
    Set MailItems = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Items
End Sub
Private Sub MailItems_ItemAdd(ByVal item As Object)
Dim xSenderEmailAddress As String
Dim xContactItems As Outlook.Items
Dim xContactItem As ContactItem
Dim I As Long
Dim xFilter As String
Dim xTargetFolder As Folder
Dim xContactFolder As Folder
Dim xStore As Store
Dim xInboxFlds As Folders
Dim xSubFolder As Folder
Dim xFound As Boolean
On Error Resume Next
If item.Class = olMail Then
    xSenderEmailAddress = item.SenderEmailAddress
End If
For Each xStore In Outlook.Application.Session.Stores
    Set xContactItems = xStore.GetDefaultFolder(olFolderContacts).Items
    For I = 3 To 1 Step -1
        xFilter = "[Email" & I & "Address] = " & xSenderEmailAddress
        Set xContactItem = xContactItems.Find(xFilter)
        If TypeName(xContactItem) <> "Nothing" Then Exit For
    Next
Next
If xContactItem Is Nothing Then
    Set xInboxFlds = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Folders
    xFound = False
    For Each xSubFolder In xInboxFlds
        If xSubFolder.Name = "Unknown" Then
            xFound = True
            Set xTargetFolder = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Folders("Unknown")
            Exit For
        End If
    Next
    If xFound = False Then
        Set xTargetFolder = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Folders.Add("Unknown")
    End If
    item.Move xTargetFolder
End If
End Sub

doc memindahkan email dari tidak dikenal 9

3. Kemudian simpan kode dan tutup jendela kode, dan mulai ulang Outlook agar kode diterapkan. Mulai sekarang, ketika email datang dari beberapa pengirim yang tidak dikenal, mereka akan dipindahkan ke folder Tidak Dikenal secara otomatis, lihat tangkapan layar:

doc memindahkan email dari tidak dikenal 10

Note: Para tidak diketahui folder akan dibuat secara otomatis ketika ada beberapa email yang tidak dikenal masuk. Anda dapat mengubah nama folder "unknow”Kepada orang lain dalam naskah.


Kutools for Outlook - Menghadirkan 100 Fitur Canggih ke Outlook, dan Membuat Pekerjaan Lebih Mudah!

  • CC / BCC Otomatis dengan aturan saat mengirim email; Maju Otomatis Beberapa Email secara khusus; Balas otomatis tanpa server pertukaran, dan lebih banyak fitur otomatis ...
  • Peringatan BCC - tunjukkan pesan ketika Anda mencoba membalas semua jika alamat email Anda ada di daftar BCC; Ingatkan Saat Lampiran Hilang, dan lebih banyak fitur pengingat ...
  • Balas (Semua) Dengan Semua Lampiran di percakapan surat; Balas Banyak Email dalam hitungan detik; Tambah Salam Otomatis saat membalas; Tambahkan Tanggal ke dalam subjek ...
  • Alat Lampiran: Kelola Semua Lampiran di Semua Email, Lepaskan Otomatis, Kompres Semua, Ganti Nama Semua, Simpan Semua ... Laporan Cepat, Hitung Email yang Dipilih...
  • Email Sampah yang Kuat dengan kebiasaan; Hapus Duplikat Email dan Kontak... Memungkinkan Anda melakukan lebih cerdas, lebih cepat, dan lebih baik di Outlook.
shot kutools outlook tab kutools 1180x121
tembak kutools outlook kutools plus tab 1180x121
 
Urutkan komentar berdasarkan
komentar (0)
Belum ada peringkat. Jadilah yang pertama memberi peringkat!
Belum ada komentar yang diposting di sini
Tinggalkan komentar anda
Posting sebagai Tamu
×
Beri peringkat pos ini:
0   Karakter
Lokasi yang Disarankan

Ikuti kami

Hak Cipta © 2009 - www.extendoffice.com. | Seluruh hak cipta. Dipersembahkan oleh ExtendOffice. | Peta Situs
Microsoft dan logo Office adalah merek dagang atau merek dagang terdaftar dari Microsoft Corporation di Amerika Serikat dan / atau negara lain.
Dilindungi oleh Sectigo SSL