Terkadang, saat Anda mengirim atau menerima email dengan banyak penerima, Anda mungkin ingin membuat grup kontak untuk penerima tersebut. Artikel ini akan memperkenalkan cara cepat untuk melakukannya dengan Outlook VBA.
Di artikel kami sebelumnya "Cara Membuat Grup Kontak dari Daftar Penerima”, kami telah mempelajari metode umum untuk membuat grup kontak untuk penerima email. Yaitu pertama-tama memilih dan menyalin penerima dari email, lalu membuat grup kontak secara manual dan menempelkan penerima di bidang "Anggota ->". Jelas, cara ini sangat tidak praktis. Oleh karena itu, di sini kami akan memperkenalkan pendekatan lain, yang akan memanfaatkan Outlook VBA untuk mencapai grup kontak baru dengan cepat. Anda cukup menekan tombol tanpa perlu menyalin dan menempel berulang kali. Baca terus untuk mendapatkan langkah-langkah rumit dan kode VBA.
Buat Grup Kontak dari Daftar Penerima Email
- Sebagai langkah awal, Anda harus membuka tab "Pengembang" di Outlook.
- Kemudian di bawah tab ini, Anda dapat mencari dan mengklik tombol "Visual Basic".
- Setelah itu, jendela "Microsoft Visual Basic for Applications" baru akan terbuka. Sekarang Anda harus membuka modul baru dengan mengklik "Sisipkan"> "Modul".
- Selanjutnya di jendela modul baru, Anda dapat menyalin dan menempelkan kode berikut ke dalamnya.
Sub createcontactgroupforrecipients()
Dim obApp As Application
Dim olSel As Selection
Dim obj As Object
Dim oMail As MailItem
Dim tempMail As MailItem
Dim Recips As Recipients
Dim ConGroup As DistListItem
Dim strName As String
Set obApp = Outlook.Application
Set olSel = obApp.ActiveExplorer.Selection
For Each obj In olSel
If obj.Class = olMail Then
Set oMail = obj
Set tempMail = oMail.ReplyAll
Set Recips = tempMail.Recipients
Set ConGroup = obApp.CreateItem(olDistributionListItem)
strName = InputBox("Specify a name for the new contact group:")
With ConGroup
.AddMembers Recips
.DLName = strName
'Use ".Save" to directly save the new contact group
.Display
End With
tempMail.Close olDiscard
End If
Next
End Sub
- Nanti Anda dapat keluar dari jendela "Visual Basic" saat ini dan melanjutkan untuk menambahkan makro baru ke Bilah Alat Akses Cepat. Klik panah bawah di Quick Access Toolbar dan pilih "More Commands" dari daftar drop-down.
- Selanjutnya, Anda akan masuk ke jendela "Opsi Outlook". Pada tahap ini, Anda perlu mengambil langkah-langkah berikut:
- Pertama, setel "Pilih perintah dari" ke "Makro".
- Kemudian cari dan keluarkan makro yang ditambahkan sebelumnya.
- Selanjutnya klik tombol "Add" di tengah.
- Terakhir tekan tombol "OK".
- Setelah itu, Anda dapat kembali ke panel email Outlook dan mencobanya.
- Pertama-tama, Anda dapat melakukan pitch pada satu email di folder email mana pun.
- Kemudian klik tombol di Quick Access Toolbar, seperti gambar di bawah ini:
- Dan selanjutnya Anda akan menerima kotak pesan, yang meminta Anda untuk menentukan nama untuk grup kontak baru.
- Kemudian klik tombol “OK”. Sekaligus, grup kontak baru, yang berisi semua penerima email yang dipilih, akan terbuka. Anda dapat menekan "Simpan & Tutup" untuk menyimpannya.
Yang Harus Dimiliki dalam Perlindungan Data Outlook
Karena Outlook rentan, Anda harus melakukan tindakan pencegahan yang memadai untuk melindungi data Outlook mereka. Pertama, Anda harus membuat cadangan data Outlook biasa. Selain itu, Anda perlu mengetahui cara mencari tahu dan menjalankan alat perbaikan bawaan, Scanpst.exe. Kebutuhan terakhir namun tidak kalah pentingnya adalah eksternal yang luar biasa alat perbaikan data Outlook rusak, Seperti DataNumen Outlook Repair, yang akan datang untuk menyelamatkan Anda jika backup dan Scanpst.exe gagal.
Pengantar Penulis:
Shirley Zhang adalah pakar pemulihan data di DataNumen, Inc., yang merupakan pemimpin dunia dalam teknologi pemulihan data, termasuk memperbaiki SQL Server kesalahan database mdf dan produk perangkat lunak perbaikan pandangan. Untuk informasi lebih lanjut kunjungi www.datanumen.com