Arahan untuk menghantar e-mel dari spreadsheet Excel menggunakan skrip VBA

Menggunakan skrip VBA di Excel tidak memerlukan pengetahuan pengaturcaraan. VBA membantu anda melakukan banyak tugas lanjutan seperti membuat laporan hamparan yang mengandungi semua maklumat PC, menghantar e-mel terus dari hamparan ...

Untuk menghantar e-mel dari Microsoft Excel hanya memerlukan beberapa skrip mudah. Jangan takut untuk menambah ciri ini ke hamparan anda jika anda ingin benar-benar mendapatkan perisian pejabat Excel.

E-mel dari Excel

Terdapat banyak sebab mengapa anda mahu menghantar e-mel di Microsoft Excel. Sebagai contoh, pekerja anda mengemaskini dokumen dan hamparan mingguan, dan anda mahu menerima pemberitahuan e-mel apabila tindakan itu selesai atau kadang-kadang, anda mahu menghantar e-mel semua kenalan dalam buku kerja yang sama. di ...

Anda mesti berfikir menggunakan skrip e-mel Excel yang rumit, tetapi ia sebenarnya sangat mudah. Artikel ini akan membimbing anda untuk memanfaatkan ciri yang telah lama tersedia dalam Excel VBA, yang dipanggil Objek Data Kerjasama (CDO) .

Arahan untuk menghantar e-mel dari spreadsheet Excel menggunakan skrip VBA

CDO adalah komponen pesanan yang digunakan dalam Windows dari versi awal. Ia digunakan untuk dipanggil CDONTS. Selepas Windows 2000 & XP dilahirkan, "CDO for Windows 2000" menggantikannya. Komponen ini dimasukkan dalam pemasangan VBA dalam Microsoft Word atau Excel dan tersedia untuk digunakan pada bila-bila masa.

Menggunakan komponen ini untuk menghantar e-mel dalam produk Windows dengan VBA sangat mudah. Sebagai contoh, artikel ini menggunakan CDO dalam Excel untuk menghantar e-mel yang mengandungi hasil dalam satu sel.

Langkah 1: Buat Makro VBA

Pertama, pergi ke tab Pembangun Excel > klik Insert in Controls panel , kemudian pilih butang arahan.

Arahan untuk menghantar e-mel dari spreadsheet Excel menggunakan skrip VBA

Seret ke dalam lembaran kerja ini, kemudian buat makro baru dengan mengklik Makro di pita Pembangun.

Arahan untuk menghantar e-mel dari spreadsheet Excel menggunakan skrip VBA

Apabila anda mengklik butang Buat , ia membuka editor VBA.

Tambah rujukan ke perpustakaan CDO dengan menavigasi ke Alat> Rujukan dalam editor.

Arahan untuk menghantar e-mel dari spreadsheet Excel menggunakan skrip VBA

Tatal ke bawah senarai sehingga anda melihat Microsoft CDO untuk Perpustakaan Windows 2000 . Tandai kotak semak dan klik OK .

Arahan untuk menghantar e-mel dari spreadsheet Excel menggunakan skrip VBA

Apabila anda klik OK , perhatikan nama fungsi di mana skrip disekat, kerana anda akan memerlukannya kemudian.

Langkah 2: Tetapkan medan CDO "Dari" dan "Kepada"

Untuk melakukan ini, anda perlu membuat objek berkaitan e-mel terlebih dahulu dan menyediakan semua medan penghantaran e-mel yang diperlukan.

Ingat bahawa banyak bidang mungkin atau mungkin tidak, tetapi Dari dan Untuk diperlukan.

Dim CDO_Mail Sebagai Objek
Dim CDO_Config Sebagai Objek
Dim SMTP_Config Sebagai Variant
Dim strSubject Sebagai String
Dim strFrom Sebagai String
Dim strTo Sebagai String
Dim strCc Sebagai String
Dim strBcc Sebagai String
Dim strBody As String

strSubject = "Hasil dari Excel Spreadsheet"
strFrom = "[email protected]"
strTo = "[email protected]"
strCc = ""
strBcc = ""
strBody = "Jumlah hasil untuk suku ini adalah:" & Str (Sheet1 .Cells (2, 1))

Perkara yang menarik adalah bahawa anda boleh membuat apa-apa rentetan yang dikehendaki untuk menyesuaikan mesej e-mel keseluruhan dan memberikannya pemboleh ubah strBody.

Pecah bersama isi mesej e-mel menggunakan rentetan & untuk memasukkan data dari mana-mana hamparan Microsoft Excel tepat dalam e-mel (seperti ditunjukkan di atas).

Langkah 3: Konfigurasi CDO untuk menggunakan SMTP luaran

Sekeping kod berikutnya adalah di mana anda mengkonfigurasi CDO untuk menggunakan mana-mana pelayan SMTP luaran untuk menghantar e-mel.

Contoh ini tidak menyediakan SSL melalui Gmail, CDO boleh menggantikan SSL tetapi ia berada di luar skop artikel ini. Sekiranya anda perlu menggunakan SSL, kod maju dalam Github dapat membantu anda.

Tetapkan CDO_Mail = CreateObject ("CDO.Message")
Pada Kesalahan GoTo Error_Handling

Tetapkan CDO_Config = CreateObject ("CDO.Configuration")
CDO_Config.Load -1

Tetapkan SMTP_Config = CDO_Config.Fields

Dengan SMTP_Config.Item
("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
.Telem ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp. gmail.com "
.Temem (" http://schemas.microsoft.com/cdo/configuration/smtpauthenticate ") = 1
.Temem (" http://schemas.microsoft.com/cdo/configuration/sendusername ") =" [email protected] "
.Telem (" http://schemas.microsoft.com/cdo/configuration/sendpassword ") =" kata laluan "
.Titem (" http://schemas.microsoft.com/cdo/configuration/smtpserverport ") = 25
.Telem (" http://schemas.microsoft.com/cdo/configuration/smtpusessl ") = Benar
.Update
Akhir Dengan

Dengan CDO_Mail
Set. Konfigurasi = CDO_Config
End With

Langkah 4: Penyediaan CDO lengkap

Anda kini telah mengkonfigurasi pelayan SMTP anda untuk menghantar e-mel. Apa yang perlu anda lakukan ialah mengisi medan yang sesuai untuk objek CDO_Mail dan mengeluarkan arahan Send .

Inilah caranya:

CDO_Mail.Subject = strSubject
CDO_Mail.From = strFrom
CDO_Mail.To = strTo
CDO_Mail.TextBody = strBody
CDO_Mail.CC = strCc
CDO_Mail.BCC = strBcc
CDO_Mail.Send

Error_Handling:
Jika Err.Description <> "" Kemudian MsgBox Err.Description

Tiada tanda timbul atau tanda keselamatan muncul seperti yang biasanya anda lihat apabila menggunakan objek e-mel Outlook.

CDO hanya meletakkan komponen e-mel bersebelahan dan menggunakan butiran sambungan pelayan untuk membolehkan penghantaran maklumat. Ini adalah cara yang paling mudah untuk menggabungkan e-mel ke skrip Microsoft Word atau Excel VBA.

Untuk menyambungkan butang arahan ke skrip ini, akses editor kod dan klik Sheet1 untuk melihat kod VBA lembaran kerja tersebut.

Taipkan nama fungsi di mana anda menyisipkan skrip di atas.

Arahan untuk menghantar e-mel dari spreadsheet Excel menggunakan skrip VBA

Inilah maklumat yang anda terima dalam peti masuk.

Arahan untuk menghantar e-mel dari spreadsheet Excel menggunakan skrip VBA

Nota : Jika anda menerima ralat Pengangkut gagal menyambung ke pelayan , pastikan anda telah memasukkan nama pengguna, kata laluan, pelayan SMTP dan nombor port yang betul dalam baris kod yang disenaraikan dengan SMTP_Config .

Meningkatkan dan mengautomasikan keseluruhan proses

Mengirim e-mel dari Excel dengan satu butang adalah benar-benar selamat dan mudah. Sekiranya anda ingin menggunakan ciri ini dengan kerap, anda boleh mengautomasikannya.

Untuk melakukan ini, anda perlu menukar makro. Pergi ke Visual Basic Editor, salin dan tampal keseluruhan kod yang dikumpulkan. Seterusnya, pilih ThisWorkbook dari hierarki Projek .

Dari dua medan drop-down di bahagian atas tetingkap kod, pilih Buku Kerja dan klik Buka dari menu Kaedah . Tampalkan skrip e-mel di atas ke dalam Private Sub Workbook_Open () . Tindakan ini akan berjalan makro apabila anda membuka fail Excel.

Arahan untuk menghantar e-mel dari spreadsheet Excel menggunakan skrip VBA

Seterusnya, buka Penjadual Tugas . Anda akan menggunakan alat ini untuk meminta Windows untuk membuka hamparan secara automatik pada jarak tertentu. Pada masa itu, makro anda akan diaktifkan dan diemail.

Arahan untuk menghantar e-mel dari spreadsheet Excel menggunakan skrip VBA

Pilih Buat Tugas Asas ... dari menu Tindakan dan ikut arahan sehingga anda mencapai skrin Tindakan.

Pilih Mula program dan klik Seterusnya .

Arahan untuk menghantar e-mel dari spreadsheet Excel menggunakan skrip VBA

Gunakan butang Layari untuk mencari lokasi Microsoft Excel pada komputer atau salin & tampal laluan dalam medan Program / skrip .

Kemudian masukkan laluan ke dokumen Microsoft Excel dalam bidang Tambah hujah .

Arahan lengkap dan jadwal anda akan dibuat.

Anda harus menguji ciri ini dengan menjadualkan tindakan dalam beberapa minit akan datang, kemudian menyemak semula tugas setelah anda melihatnya berfungsi dengan berkesan.

Nota : Anda mungkin perlu menyesuaikan tetapan Pusat Amanah untuk memastikan bahawa makro berjalan seperti berikut:

Buka hamparan dan navigasi ke Fail> Pilihan> Pusat Amanah .

Di sini, klik Tetapan Pusat Amanah . Pada skrin seterusnya, pilih Jangan sekali-kali tunjukkan maklumat tentang kandungan yang disekat .

Microsoft Excel adalah alat yang sangat berkuasa, tetapi belajar bagaimana menggunakannya kadang-kadang boleh mencabar untuk banyak orang. Jika anda ingin menguasai perisian ini, anda perlu tahu cara menggunakan VBA. Ia tidak mudah.

Walau bagaimanapun, dengan pengalaman VBA yang sedikit, anda boleh mengautomasikan tugas-tugas asas di Microsoft Excel dan mempunyai lebih banyak masa memfokuskan pada tugas yang lebih penting.

Harap artikel ini membantu anda. Saya berharap kejayaan anda!

Leave a Comment

Cara Membaiki Microsoft Teams Di Mana Boleh Cari Ralat Team

Cara Membaiki Microsoft Teams Di Mana Boleh Cari Ralat Team

Bosan dengan ralat Microsoft Teams Where to Find Team yang mengecewakan? Dapatkan pembetulan langkah demi langkah untuk desktop, web dan mudah alih. Selesaikannya dengan cepat dengan panduan pakar kami—tiada kemahiran teknikal diperlukan!

Cara Membaiki Ralat Bantuan Cara Menggunakan Microsoft Teams

Cara Membaiki Ralat Bantuan Cara Menggunakan Microsoft Teams

Bosan dengan Ralat Bantuan Microsoft Teams yang mengecewakan yang menyekat aliran kerja anda? Dapatkan pembetulan langkah demi langkah yang berfungsi pada versi terkini. Kosongkan cache, kemas kini dan banyak lagi—tiada kemahiran teknikal diperlukan!

Cara Membaiki Ralat Log Masuk Microsoft Teams pada Chromebook

Cara Membaiki Ralat Log Masuk Microsoft Teams pada Chromebook

Menghadapi ralat log masuk Microsoft Teams pada Chromebook? Temui penyelesaian langkah demi langkah untuk menyelesaikan masalah log masuk dengan cepat. Kosongkan cache, kemas kini aplikasi dan banyak lagi untuk kerja berpasukan yang lancar. Berfungsi pada OS Chrome terkini!

Menyelesaikan Masalah Kelewatan Persidangan Video Microsoft Teams pada Wi-Fi

Menyelesaikan Masalah Kelewatan Persidangan Video Microsoft Teams pada Wi-Fi

Bergelut dengan kelewatan persidangan video Microsoft Teams semasa menggunakan Wi-Fi? Panduan penyelesaian masalah muktamad ini memberikan penyelesaian pantas, petua lanjutan dan pengoptimuman Wi-Fi untuk memulihkan panggilan video yang jelas serta-merta.

Mengapa Status Microsoft Teams Saya Tersekat?

Mengapa Status Microsoft Teams Saya Tersekat?

Kecewa dengan status Microsoft Teams anda yang tersekat pada Away? Ketahui sebab utama seperti tamat masa melahu dan tetapan kuasa, serta pembetulan langkah demi langkah untuk kembali ke Available dengan pantas. Dikemas kini dengan ciri Teams terkini.

Menyelesaikan Ralat Sertai Mesyuarat Microsoft Teams melalui Pautan Langsung

Menyelesaikan Ralat Sertai Mesyuarat Microsoft Teams melalui Pautan Langsung

Bergelut dengan Ralat Sertai Mesyuarat Microsoft Teams? Temui langkah-langkah terbukti untuk menyelesaikannya melalui pautan langsung. Penyelesaian pantas untuk penyertaan yang lancar – tiada kemahiran teknikal diperlukan!

Di Mana Boleh Cari Kod QR Microsoft Teams untuk Log Masuk Mudah Alih Pantas

Di Mana Boleh Cari Kod QR Microsoft Teams untuk Log Masuk Mudah Alih Pantas

Ketahui dengan tepat di mana untuk mencari Kod QR Microsoft Teams untuk log masuk mudah alih yang sangat pantas. Panduan langkah demi langkah dengan visual untuk memudahkan anda berhubung dalam beberapa saat—tiada kata laluan diperlukan!

Cara Membaiki Ralat Main Semula Media Microsoft Teams pada tahun 2026

Cara Membaiki Ralat Main Semula Media Microsoft Teams pada tahun 2026

Bosan dengan ralat main balik media Microsoft Teams yang merosakkan mesyuarat 2026 anda? Ikuti panduan pakar langkah demi langkah kami untuk membetulkan gangguan audio, video dan perkongsian dengan pantas—tiada kemahiran teknikal diperlukan. Kolaborasi yang lancar menanti!

Di manakah Kunci Pendaftaran Microsoft Teams Terletak pada Windows 11?

Di manakah Kunci Pendaftaran Microsoft Teams Terletak pada Windows 11?

Buka kunci lokasi tepat kunci pendaftaran Microsoft Teams pada Windows 11. Panduan langkah demi langkah untuk mencari, mengakses dan mengubahnya dengan selamat untuk prestasi dan penyelesaian masalah yang optimum. Penting untuk profesional IT dan peminat Teams.

Menyelesaikan Masalah Gelung Permulaan Skrin Aluan Microsoft Teams

Menyelesaikan Masalah Gelung Permulaan Skrin Aluan Microsoft Teams

Kecewa dengan gelung permulaan skrin alu-aluan Microsoft Teams? Ikuti langkah penyelesaian masalah yang terbukti untuk gelung permulaan skrin alu-aluan Microsoft Teams kami: kosongkan cache, tetapkan semula aplikasi, pasang semula. Kembali ke kolaborasi yang lancar dalam beberapa minit!

Penyelesaian Masalah Ralat Proksi Microsoft Teams

Penyelesaian Masalah Ralat Proksi Microsoft Teams

Bergelut dengan Ralat Proksi Microsoft Teams? Ketahui Penyelesaian Masalah Ralat Proksi Microsoft Teams yang terbukti Langkah-langkah pembetulan. Kosongkan cache, laraskan tetapan proksi dan kembali kepada panggilan lancar dalam beberapa minit dengan panduan pakar kami.

Di manakah Microsoft Teams dalam Outlook? Mencari Ikon yang Hilang

Di manakah Microsoft Teams dalam Outlook? Mencari Ikon yang Hilang

Kecewa dengan ikon Microsoft Teams yang hilang dalam Outlook? Ketahui dengan tepat di mana untuk mencarinya, mengapa ia hilang dan langkah-langkah terbukti untuk memulihkannya untuk mesyuarat yang mudah. ​​Dikemas kini untuk versi terkini!

Mengapa Microsoft Teams Begitu Perlahan? 10 Petua untuk Mempercepatkannya pada Tahun 2026

Mengapa Microsoft Teams Begitu Perlahan? 10 Petua untuk Mempercepatkannya pada Tahun 2026

Kecewa dengan Microsoft Teams yang lambat? Ketahui mengapa Microsoft Teams begitu perlahan dan gunakan 10 petua terbukti ini untuk mempercepatkannya secara dramatik pada tahun 2026 untuk kolaborasi yang lancar.

Cara Log Masuk ke Pusat Pentadbiran Microsoft Teams dengan Betul

Cara Log Masuk ke Pusat Pentadbiran Microsoft Teams dengan Betul

Kuasai cara log masuk ke Pusat Pentadbiran Microsoft Teams dengan betul dengan panduan langkah demi langkah kami yang tepat. Betulkan ralat biasa, pastikan keselamatan dan uruskan Teams dengan mudah untuk pentadbir di mana-mana sahaja.

Cara Muat Turun Microsoft Teams untuk Mac dan MacBook Air/Pro

Cara Muat Turun Microsoft Teams untuk Mac dan MacBook Air/Pro

Temui cara paling mudah untuk memuat turun Microsoft Teams untuk Mac, MacBook Air dan MacBook Pro. Arahan langkah demi langkah, keperluan sistem dan petua penyelesaian masalah untuk pemasangan yang lancar dalam versi terkini. Mulakan sekarang!