Làm cách nào để gửi hàng loạt email được cá nhân hóa đến một danh sách từ Excel qua Outlook?

Làm cách nào để gửi hàng loạt email được cá nhân hóa đến một danh sách từ Excel qua Outlook?

Ví dụ : tôi có dải tài liệu sau trong một trang tính chứa các cột Tên, Địa chỉ Email, Mã Đăng ký và giờ đây, tôi muốn gửi một tin nhắn với lời chào được cá thể hóa và Mã Đăng ký của riêng họ đến các Địa chỉ Email được phân tách trong cột A. Để xử lý yếu tố này, các chiêu thức sau đây hoàn toàn có thể giúp bạn .

Gửi hàng loạt email được cá nhân hóa đến một danh sách từ Excel với chức năng Kết hợp Thư

Gửi hàng loạt email được cá nhân hóa đến danh sách từ Excel với mã VBA

Bạn đang đọc: Làm cách nào để gửi hàng loạt email được cá nhân hóa đến một danh sách từ Excel qua Outlook?

Gửi hàng loạt email được cá nhân hóa đến một danh sách với các tệp đính kèm khác nhau bằng cách sử dụng Kutools cho Excel

Gửi hàng loạt email được cá nhân hóa đến một danh sách từ Excel với chức năng Kết hợp Thư

Với Lời của Mail Merge, bạn có thể hoàn thành công việc này một cách nhanh chóng và dễ dàng, vui lòng thực hiện theo từng bước sau:

1. Khởi chạy một tài liệu Word trống mới, sau đó bấm Mailings > Chọn người nhận > Sử dụng danh sách hiện có, xem ảnh chụp màn hình:

2. Trong Chọn nguồn dữ liệu cửa sổ, chọn sổ làm việc bao gồm phạm vi dữ liệu mà bạn muốn sử dụng, và bấm Mở nút, xem ảnh chụp màn hình:

3. Trong thời gian tới Chọn bảng hộp thoại, vui lòng chọn trang tính với phạm vi dữ liệu bạn cần, sau đó nhấp vào OK nút, xem ảnh chụp màn hình:

4. Và tài liệu chính của tin nhắn E-mail và danh sách địa chỉ của bạn đã được kết nối với nhau, bây giờ, bạn có thể chỉnh sửa tin nhắn văn bản và thêm phần giữ chỗ cho biết nơi thông tin duy nhất sẽ xuất hiện trong mỗi tin nhắn.

(1.) Để chèn tên lời chào riêng của họ, hãy nhấp vào Mailings > Chèn Trường Hợp nhất > Họ tên, tên được cá nhân hóa đã được chèn vào thư và tên trường được bao quanh bởi «».

(2.) Tiếp tục nhập tin nhắn của bạn và chèn Mã số đăng ký vào nơi bạn cần, xem ảnh chụp màn hình:

5. Sau khi soạn tin nhắn, bạn có thể nhấp vào Xem trước kết quả theo Mailing để xem trước các tin nhắn E-mail và thực hiện các thay đổi trước khi bạn thực sự hoàn thành việc phối.

6. Sau khi đảm bảo không có vấn đề gì, bạn có thể gửi E-mail đến những người nhận riêng biệt, vui lòng nhấp vào Mailings > Kết thúc & Hợp nhất > Gửi tin nhắn qua email, xem ảnh chụp màn hình:

7. Sau đó, trong cửa sổ bật ra Hợp nhất với E-mail hộp thoại, hãy thực hiện các thao tác sau:

(1.) Từ Đến danh sách thả xuống, vui lòng chọn Địa chỉ email cột;

(2.) Bạn có thể nhập chủ đề vào Tiêu Đề hộp văn bản dòng;

(3.) Từ Gửi hồ sơ phần, chọn Tất cả.

8. Và sau đó nhấp vào OK, các email được gửi đến những người nhận riêng biệt với mã đăng ký của riêng họ cùng một lúc, sau khi gửi email, bạn có thể truy cập Outlook của mình để đảm bảo rằng email đã được gửi thành công.

Gửi email được cá nhân hóa cho nhiều người nhận với các tệp đính kèm khác nhau: Với Kutools cho Excel‘s Gửi email, bạn có thể nhanh chóng gửi email được cá nhân hóa cho nhiều người nhận với các tệp đính kèm khác nhau từ Excel qua Outlook khi bạn cần. Đồng thời, bạn cũng có thể CC hoặc Bcc tin nhắn cho một người cụ thể.       Tải xuống và dùng thử miễn phí Kutools cho Excel ngay!

Gửi hàng loạt email được cá nhân hóa đến danh sách từ Excel với mã VBA

Ngoại trừ tính năng Kết hợp Thư, mã VBA sau cũng hoàn toàn có thể giúp bạn, vui mừng làm như sau :

1. Giữ ALT + F11 chìa khóa và nó mở Microsoft Visual Basic cho các ứng dụng cửa sổ.

2. Nhấp chuột Chèn > Mô-đunvà dán mã sau vào Mô-đun Cửa sổ.

Mã VBA: Gửi hàng loạt email được cá nhân hóa đến danh sách từ Excel:

#If VBA7 And Win64 Then
    Private Declare PtrSafe Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" ( _
                         ByVal hwnd As LongPtr, ByVal lpOperation As String, _
                         ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, _
                         ByVal nShowCmd As Long) As LongPtr
#Else
    Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" ( _
                         ByVal hwnd As Long, ByVal lpOperation As String, _
                         ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, _
                         ByVal nShowCmd As Long) As Long
#End If
Sub SendEMail()
'update by Extendoffice 20160506
    Dim xEmail As String
    Dim xSubj As String
    Dim xMsg As String
    Dim xURL As String
    Dim i As Integer
    Dim k As Double
    Dim xCell As Range
    Dim xRg As Range
    Dim xTxt As String
    On Error Resume Next
    xTxt = ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("Please select the data range:", "Kutools for Excel", xTxt,, ,, , 8)
    If xRg Is Nothing Then Exit Sub
    If xRg.Columns.Count <> 3 Then
        MsgBox " Regional format error, please check",, "Kutools for Excel"
        Exit Sub
    End If
    For i = 1 To xRg.Rows.Count
'       Get the email address
        xEmail = xRg.Cells(i, 2)
'       Message subject
        xSubj = "Your Registration Code"
'       Compose the message
        xMsg = ""
        xMsg = xMsg & "Dear " & xRg.Cells(i, 1) & "," & vbCrLf & vbCrLf
        xMsg = xMsg & " This is your Registration Code "
        xMsg = xMsg & xRg.Cells(i, 3).Text & "." & vbCrLf & vbCrLf
        xMsg = xMsg & " please try it, and glad to get your feedback! " & vbCrLf
        xMsg = xMsg & "Skyyang"
'       Replace spaces with %20 (hex)
        xSubj = Application.WorksheetFunction.Substitute(xSubj, " ", "%20")
        xMsg = Application.WorksheetFunction.Substitute(xMsg, " ", "%20")
'       Replace carriage returns with %0D%0A (hex)
        xMsg = Application.WorksheetFunction.Substitute(xMsg, vbCrLf, "%0D%0A")
'       Create the URL
        xURL = "mailto:" & xEmail & "?subject=" & xSubj & "&body=" & xMsg
'       Execute the URL (start the email client)
        ShellExecute 0&, vbNullString, xURL, vbNullString, vbNullString, vbNormalFocus
'       Wait two seconds before sending keystrokes
        Application.Wait (Now + TimeValue("0:00:02"))
        Application.SendKeys "%s"
    Next
End Sub

3. Sau đó nhấn F5 để chạy mã này và một hộp nhắc sẽ bật ra để nhắc bạn chọn phạm vi dữ liệu mà bạn muốn sử dụng, xem ảnh chụp màn hình:

4. Và sau đó nhấp vào OK, các email sẽ lần lượt được gửi đến các địa chỉ riêng biệt với mã đăng ký riêng lẻ, sau khi gửi email, bạn có thể truy cập vào Outlook của mình để đảm bảo rằng các email đã được gửi thành công.

Chú thích: Trong đoạn mã trên, bạn có thể thay đổi chủ đề hoặc nội dung thông điệp theo nhu cầu của mình.

Gửi hàng loạt email được cá nhân hóa đến một danh sách với các tệp đính kèm khác nhau bằng cách sử dụng Kutools cho Excel

Nếu bạn có Kutools cho Excel, Với khả Gửi email, bạn có thể nhanh chóng gửi email được cá nhân hóa cho nhiều người nhận với các tệp đính kèm khác nhau khi bạn cần.

Sau khi cài đặt Kutools cho Excel, hãy làm như sau:

1. Nhấp chuột Kutools Plus > Gửi email, xem ảnh chụp màn hình:

2. Trong Gửi Emials hộp thoại, vui lòng chọn phạm vi dữ liệu mà bạn muốn sử dụng, sau đó chỉ định địa chỉ người nhận, tệp đính kèm và chủ đề khi bạn cần, xem ảnh chụp màn hình:

3. Trong hộp chỉnh sửa, chèn các tên lời chào riêng lẻ, vui lòng chọn Họ tên từ danh sách thả xuống, sau đó nhấp vào Chèn trình giữ chỗ để chèn tên vào tin nhắn, hãy xem ảnh chụp màn hình:

4. Sau đó nhập nội dung thư của bạn vào hộp khi bạn cần, xem ảnh chụp màn hình:

Xem thêm: Đơn xin cấp điện sinh hoạt hộ gia đình, mua điện, đóng điện, chiếu sáng

5. Sau khi hoàn thiện nội dung email, vui lòng chọn chế độ gửi như bạn muốn, bạn có thể gửi bằng Outlook hoặc máy chủ được chỉ định của mình, xem ảnh chụp ba chiều:

Chú thích: Nếu bạn muốn sử dụng máy chủ khác, hãy nhấp vào Cài đặt máy chủ thư đi để đặt chế độ gửi cho riêng bạn, hãy xem screesnhot:

6. Cuối cùng, hãy nhấp vào Gửi để gửi email, sau khi hoàn tất, một hộp nhắc sẽ bật ra để nhắc bạn trạng thái gửi. xem screesnhot:

Nhấp vào Tải xuống và dùng thử miễn phí Kutools cho Excel ngay!

Demo: Gửi hàng loạt email được cá nhân hóa đến danh sách từ Excel qua Outlook

Kutools cho Excel: với hơn 300 bổ trợ Excel tiện dụng, dùng thử miễn phí không giới hạn trong 30 ngày.

Tải xuống và dùng thử không lấy phí ngay !

Bài viết liên quan:

Làm cách nào để gửi email đến nhiều người nhận trong một list từ Excel qua Outlook ?

Các công cụ năng suất văn phòng tốt nhất

Kutools cho Excel xử lý hầu hết các yếu tố của bạn và tăng 80 % hiệu suất của bạn

• Tái sử dụng:

  Chèn nhanh

  công thức phức tạp, biểu đồ

   và bất cứ thứ gì bạn đã sử dụng trước đây; Mã hóa ô với mật khẩu; Tạo list gửi thư và gửi email …

• Thanh siêu công thức (dễ dàng chỉnh sửa nhiều dòng văn bản và công thức); Bố cục đọc (dễ dàng đọc và chỉnh sửa số lượng ô lớn); Dán vào Dải ô đã Lọchữu ích. Cảm ơn !
• Hợp nhất các ô / hàng / cột mà không làm mất dữ liệu; Nội dung phân chia ô; Kết hợp các hàng / cột trùng lặp… Ngăn chặn các ô trùng lặp; So sánh các dãyhữu ích. Cảm ơn !
• Chọn trùng lặp hoặc duy nhất Hàng; Chọn hàng trống (tất cả các ô đều trống); Tìm siêu và Tìm mờ trong Nhiều Sổ làm việc; Chọn ngẫu nhiên …
• Bản sao đúng chuẩn Nhiều ô mà không thay đổi tham chiếu công thức; Tự động tạo tài liệu tìm hiểu thêm sang Nhiều Trang tính; Chèn Bullets, Hộp kiểm và hơn thế nữa …
• Trích xuất văn bản, Thêm Văn bản, Xóa theo Vị trí, Xóa khoảng trống; Tạo và In Tổng số phân trang; Chuyển đổi giữa nội dung ô và nhận xéthữu ích. Cảm ơn !
• Siêu lọc (lưu và áp dụng các lược đồ lọc cho các trang tính khác); Sắp xếp nâng cao theo tháng / tuần / ngày, tần suất và hơn thế nữa; Bộ lọc đặc biệt quan trọng bằng cách in đậm, in nghiêng …
• Kết hợp Workbook và WorkSheets; Hợp nhất các bảng dựa trên các cột chính; Chia tài liệu thành nhiều trang tính; Chuyển đổi hàng loạt xls, xlsx và PDFhữu ích. Cảm ơn !
• Hơn 300 tính năng can đảm và mạnh mẽ. Hỗ trợ Office / Excel 2007-2021 và 365. Hỗ trợ tất cả các ngôn ngữ. Dễ dàng triển khai trong doanh nghiệp hoặc tổ chức của bạn. Đầy đủ tính năng Dùng thử miễn phí 30 ngày. Bảo đảm hoàn lại tiền trong 60 ngày.

Đọc thêm … Tải xuống miễn phí… Mua, tựa vào, bám vào… 

Tab Office mang lại giao diện Tab cho Office và giúp việc làm của bạn trở nên thuận tiện hơn nhiều

Xem thêm: Những nguy hiểm đến từ wifi công cộng và cách phòng tránh

• Cho phép chỉnh sửa và đọc theo thẻ trong Word, Excel, PowerPoint

, Publisher, Access, Visio và Project.

Đọc thêm … Tải xuống miễn phí… Mua, tựa vào, bám vào… 

Source: https://vh2.com.vn
Category : Công Cộng