Cách gửi nhiều email từ bảng tính Excel (2 phương pháp dễ dàng)

Chúng tôi lưu trữ các loại thông tin khác nhau trong Excel của chúng tôi bảng tính. Ví dụ:nó có thể có Email địa chỉ của những người quan trọng hoặc các công ty khác. Và chúng tôi có thể cần gửi email đến những địa chỉ đó khi cần thiết. Tuy nhiên, việc sao chép địa chỉ lặp đi lặp lại cho từng người trong số họ khá mệt mỏi và mất thời gian. Trong bài viết này, chúng tôi sẽ chỉ cho bạn các phương pháp dễ dàng và hiệu quả để Gửi nhiều email từ Bảng tính Excel .

Tải xuống sách bài tập sau để tự thực hành.

2 phương pháp dễ dàng để gửi nhiều email từ bảng tính Excel

Để minh họa, chúng tôi sẽ sử dụng tập dữ liệu mẫu làm ví dụ. Ví dụ:tập dữ liệu sau đại diện cho Người bán hàng và Email của họ các địa chỉ. Tại đây, chúng tôi sẽ gửi email đến từng người trong số họ lấy địa chỉ từ Bảng tính Excel này .

1. Gửi nhiều email từ bảng tính Excel với kết hợp thư trong Word

Trong phương pháp đầu tiên của chúng tôi, chúng tôi sẽ sử dụng MS Word và tính năng Kết hợp Thư trong Word để Gửi nhiều email từ Bảng tính Excel . Do đó, hãy làm theo các bước bên dưới để thực hiện tác vụ.

CÁC BƯỚC:

Đầu tiên, hãy mở Word trống tệp.
Sau đó, nhập tin nhắn mong muốn của bạn.
Sau đó, đi tới Thư ➤ Chọn người nhận ➤ Sử dụng danh sách hiện có .

Cách gửi nhiều email từ bảng tính Excel (2 phương pháp dễ dàng)

Do đó, Chọn nguồn dữ liệu hộp thoại sẽ bật ra.
Sau đó, chọn Excel gửi Email địa chỉ được lưu trữ.
Nhấn Mở .

Cách gửi nhiều email từ bảng tính Excel (2 phương pháp dễ dàng)

Do đó, Chọn bảng hộp thoại sẽ xuất hiện.
Tại đó, chọn trang tính mong muốn của bạn và nhấn OK .

Cách gửi nhiều email từ bảng tính Excel (2 phương pháp dễ dàng)

Bây giờ, hãy chọn từ bạn cần thay thế cho mỗi thư. Trong ví dụ này, hãy chọn Wilham .
Tiếp theo, trong Thư , chọn Người bán hàng từ Chèn trường hợp nhất thả xuống.

Cách gửi nhiều email từ bảng tính Excel (2 phương pháp dễ dàng)

Do đó, nó sẽ trả về thông báo như được minh họa bên dưới.

Cách gửi nhiều email từ bảng tính Excel (2 phương pháp dễ dàng)

Ngoài ra, nếu bạn muốn xem bản xem trước thư của mình từ góc độ của người nhận, hãy nhấp vào Xem trước kết quả .

Cách gửi nhiều email từ bảng tính Excel (2 phương pháp dễ dàng)

Trong Kết thúc &Hợp nhất thả xuống, chọn Gửi tin nhắn qua email .

Cách gửi nhiều email từ bảng tính Excel (2 phương pháp dễ dàng)

Theo đó, Hợp nhất vào E-mail hộp thoại sẽ xuất hiện.
Chọn tiêu đề Email trong Tới và nhập Dòng chủ đề của bạn ( Xin chào ) theo yêu cầu.
Cuối cùng, nhấn OK và nó sẽ gửi thư đến tất cả người nhận.

Cách gửi nhiều email từ bảng tính Excel (2 phương pháp dễ dàng)

Đọc thêm: Cách gửi bảng tính Excel có thể chỉnh sửa qua email (3 phương pháp nhanh)

Bài đọc tương tự

Cách Tự động Gửi Email từ Excel Dựa trên Ngày
Gửi Email từ Excel với Nội dung bằng Macro (với các Bước Dễ dàng)
Cách Tự động Gửi Tệp Excel tới Email (3 Phương pháp Thích hợp)
Cách Gửi Email Nếu Điều kiện Đáp ứng trong Excel (3 Phương pháp Dễ dàng)
Tự động gửi Email từ Excel Dựa trên Nội dung Ô (2 Phương pháp)

2. Áp dụng Excel VBA để gửi nhiều email từ bảng tính

Tuy nhiên, bạn có thể tránh một số rắc rối nếu sử dụng VBA mã để thực hiện các hoạt động. Trong phương pháp này, chúng tôi sẽ hiển thị 3 các ví dụ khác nhau về Gửi nhiều email từ Bảng tính thông qua Excel VBA .

2.1 Email hàng loạt cho một danh sách

Trong ví dụ này, bạn sẽ thấy cách gửi một tin nhắn chung cho mọi người. Vì vậy, hãy tìm hiểu các bước sau.

CÁC BƯỚC:

Trước tiên, hãy chọn Nhà phát triển ➤ Visual Basic .

Cách gửi nhiều email từ bảng tính Excel (2 phương pháp dễ dàng)

Do đó, VBA cửa sổ sẽ bật ra.
Bây giờ, hãy nhấp vào Chèn ➤ Mô-đun .
Tiếp theo, sao chép mã sau và dán vào Mô-đun cửa sổ.

Sub massEmails()
Dim appOutlook As Object
Dim Email As Object
Dim mailbody, mailto As String
Dim i, j As Integer
Set appOutlook = CreateObject("Outlook.Application")
Set Email = appOutlook.CreateItem(olMailItem)
For i = 2 To 5
    mailto = mailto & Cells(i, 2) & ";"
Next i
ThisWorkbook.Save
Email.To = mailto
Email.Subject = "Important Notice"
Email.Body = "Greetings Everyone," & vbNewLine & "Please go through the Company Rules." & vbNewLine & "Regards."
Email.Display
End Sub

Cách gửi nhiều email từ bảng tính Excel (2 phương pháp dễ dàng)

Lưu tệp và nhấn F5 để chạy mã.
Do đó, Outlook cửa sổ sẽ xuất hiện và bạn sẽ thấy tất cả người nhận trong Tới lĩnh vực này.
Cuối cùng, nhấn Gửi .

Cách gửi nhiều email từ bảng tính Excel (2 phương pháp dễ dàng)

2.2 Email có nhiều tệp đính kèm

Ngoài ra, nếu bạn có nhiều tệp cần đính kèm và bạn phải gửi chúng đến nhiều địa chỉ email, hãy làm theo quy trình bên dưới.

CÁC BƯỚC:

Nhấp vào Nhà phát triển đầu tiên.
Sau đó, chọn Visual Basic .
Sau đó, trong VBA cửa sổ, chọn Mô-đun trong Chèn .
Trong Mô-đun cửa sổ, sao chép và dán đoạn mã dưới đây.

Sub attachments()
Dim appOutlook As Object
Dim Email As Object
Dim source, mailto As String
Dim i, j As Integer
Set appOutlook = CreateObject("Outlook.Application")
Set Email = appOutlook.CreateItem(olMailItem)
For i = 2 To 5
    mailto = mailto & Cells(i, 2) & ";"
Next i
For j = 2 To 5
    source = "D:\SOFTEKO\how to send multiple emails from excel spreadsheet\" & Cells(j, 3)
    Email.attachments.Add source
Next
ThisWorkbook.Save
source = ThisWorkbook.FullName
Email.attachments.Add source
Email.To = mailto
Email.Subject = "Important Sheets"
Email.Body = "Greetings Everyone," & vbNewLine & "Please go through the Sheets." & vbNewLine & "Regards."
Email.Display
End Sub

Cách gửi nhiều email từ bảng tính Excel (2 phương pháp dễ dàng)

Lưu nó và chạy mã bằng cách nhấn F5 .
Do đó, Outlook cửa sổ sẽ xuất hiện và bạn sẽ thấy các tệp đính kèm mong muốn.

Cách gửi nhiều email từ bảng tính Excel (2 phương pháp dễ dàng)

2.3 Email dựa trên giá trị ô

Chúng tôi sẽ hiển thị một ví dụ khác trong đó Excel tệp sẽ tự động gửi email đến nhiều địa chỉ khi một giá trị ô nhất định khác với yêu cầu của chúng tôi. Trong tập dữ liệu sau, chúng tôi có 50 trong ô B5 . Mã của chúng tôi sẽ gửi email nếu nó dưới 100 . Bây giờ, hãy tìm hiểu quy trình sau để thực hiện tác vụ.

Cách gửi nhiều email từ bảng tính Excel (2 phương pháp dễ dàng)

CÁC BƯỚC:

Trước hết, hãy chọn trang tính và nhấp chuột phải vào chuột.
Sau đó, chọn Xem mã .

Cách gửi nhiều email từ bảng tính Excel (2 phương pháp dễ dàng)

Trong hộp thoại bật ra, hãy sao chép và dán đoạn mã dưới đây.

Dim rn As Range
Private Sub Worksheet_Change(ByVal Target As Range)
    On Error Resume Next
    If Target.Cells.Count > 1 Then Exit Sub
  Set rn = Intersect(Range("B5"), Target)
    If rn Is Not hing Then Exit Sub
    If IsNumeric(Target.Value) And Target.Value < 100 Then
        Call Mail_small_Text_Outlook
    End If
End Sub
Sub MailCellvalues()
Dim appOutlook As Object
Dim Email As Object
Dim mailbody, mailto As String
Dim i, j As Integer
Set appOutlook = CreateObject("Outlook.Application")
Set Email = appOutlook.CreateItem(olMailItem)
For i = 2 To 5
    mailto = mailto & Cells(i, 3) & ";"
Next i
ThisWorkbook.Save
Email.To = mailto
Email.Subject = "Important Notice"
Email.Body = "Greetings Everyone," & vbNewLine & "Please raise B5 above 100." & vbNewLine & "Regards."
Email.Display
End Sub

Cách gửi nhiều email từ bảng tính Excel (2 phương pháp dễ dàng)

Sau đó, lưu tệp và nhấn F5 để chạy nó.
Do đó, bạn sẽ thấy kết quả đầu ra trong Outlook cửa sổ.

Cách gửi nhiều email từ bảng tính Excel (2 phương pháp dễ dàng)

Đọc thêm:Cách gửi email từ danh sách Excel (2 cách hiệu quả)

Kết luận

Từ đó, bạn sẽ có thể Gửi nhiều email từ Bảng tính Excel theo các phương pháp được mô tả ở trên. Tiếp tục sử dụng chúng và cho chúng tôi biết nếu bạn có thêm cách để thực hiện nhiệm vụ. Làm theo ExcelDemy trang web cho nhiều bài viết như thế này. Đừng quên để lại nhận xét, đề xuất hoặc truy vấn nếu bạn có bất kỳ câu hỏi nào trong phần bình luận bên dưới.

Các bài viết có liên quan

Gửi Email Nhắc nhở Tự động từ Trang tính Excel Sử dụng VBA
Cách Gửi Email Tự động Khi Điều kiện Đáp ứng trong Excel
[Đã giải quyết]:Chia sẻ sổ làm việc không hiển thị trong Excel (với các bước dễ dàng)
Macro để Gửi Email từ Excel (5 Ví dụ Thích hợp)
Macro để Gửi Email từ Excel với Nội dung (3 Trường hợp Hữu ích)
Excel Macro:Gửi Email đến Địa chỉ trong Ô (2 Cách Dễ dàng)