บ่อยครั้ง ผู้ใช้มีข้อมูลประจำตัวในการส่งจดหมายของลูกค้าหนึ่งหรือสองคนในไฟล์ Excel ดังนั้น พวกเขาจึงต้องดึงข้อมูลประจำตัวอื่นๆ ที่ตรงกับข้อมูลที่มีอยู่ในไฟล์ที่ใช้งานอยู่ ในกรณีเหล่านี้ พวกเขาพยายาม จดหมายเวียน จาก Excel เป็น Excel Excel มาโคร VBA สามารถบรรลุจดหมายเวียนได้อย่างง่ายดาย
สมมติว่าผู้ใช้กำลังทำงานในสมุดงาน Excel ที่มีข้อมูลประจำตัวการส่งจดหมายเพียงฉบับเดียว (เช่น ที่อยู่อีเมล ). ผู้ใช้มีไฟล์อื่นที่เขามีข้อมูลประจำตัวอื่นๆ ที่จำเป็นสำหรับการส่งจดหมายสำหรับรายการสมุดงานที่ใช้งานอยู่
ในบทความนี้ เราสาธิต มาโคร VBA เพื่อส่งจดหมายเวียนจาก Excel ไปยัง Excel
ดาวน์โหลดสมุดงาน Excel
สมุดงานข้อมูลการส่งจดหมายไม่สมบูรณ์
สมุดงานข้อมูลการส่งจดหมายที่มีอยู่
มาโคร VBA เพื่อส่งจดหมายเวียนจาก Excel ไปยัง Excel
ดังที่เราได้กล่าวไว้ก่อนหน้านี้ เราต้องดึงข้อมูลรับรองทางไปรษณีย์ที่ตรงกันของรายการที่มีอยู่จากสมุดงานอื่น โดยปกติ การรวมไฟล์อย่างง่ายจะทำงาน แต่แล้วเราต้องค้นหาที่อยู่ทางไปรษณีย์แต่ละแห่งที่เรากำลังจะส่งอีเมลไป ดังนั้น การรวมเวิร์กบุ๊ก Excel สองรายการจะทำให้วัตถุประสงค์ทั้งหมดเป็นโมฆะ ไปที่ส่วนด้านล่างเพื่อทำความเข้าใจสถานการณ์และวิธีจัดการกับสถานการณ์เพิ่มเติม
ข้อมูลเมลที่มีอยู่ในสมุดงาน Excel
สมมติว่าข้อมูลประจำตัวการส่งจดหมายที่น่าตื่นเต้นที่เรามีในสมุดงาน Excel อาจมีลักษณะเหมือนภาพด้านล่าง นอกจากนี้ ข้อมูลอาจมีหลายร้อยแถวและหลายสิบคอลัมน์ เพื่อวัตถุประสงค์ในการนำเสนอ เรานำแถวสองสามแถวกับคอลัมน์จำนวนหนึ่ง และเราตั้งชื่อสมุดงานนี้ว่า Mail_Data ด้วยแผ่นงานเดียวที่บรรยายเป็นข้อมูลเมล .
อ่านเพิ่มเติม:วิธีการรวมจดหมายจาก Excel ไปยัง Outlook พร้อมไฟล์แนบ (2 ตัวอย่าง)
ข้อมูลเมลที่จำเป็นในสมุดงานอื่น
ตอนนี้ เรามี สมุดงาน Excel . อื่นแล้ว โดยที่เพียง 4 หรือ 5 ที่อยู่อีเมลที่มีอยู่ และเราต้องการผสานข้อมูลกับสมุดงานที่มีอยู่ก่อนหน้านี้เพื่อเติมเซลล์ว่างที่จำเป็นทั้งหมดโดยอัตโนมัติ
อ่านเพิ่มเติม: วิธีการรวมจดหมายจาก Excel ไปยัง Outlook (ด้วยขั้นตอนง่ายๆ)
มาโคร VBA เพื่อส่งจดหมายเวียนจาก Excel ไปยัง Excel
ดังนั้น เนื่องจากเราต้องการรวมสมุดงานที่ใช้งานอยู่กับสมุดงานที่มีอยู่ เราจึงต้องใช้ รหัสมาโคร VBA .
ขั้นตอนที่ 1: ใช้ ALT+F11 หรือไปที่นักพัฒนา แท็บ> Visual Basic เพื่อเปิด Microsoft Visual Basic หน้าต่าง. ในหน้าต่าง คลิกที่ แทรก> โมดูล เพื่อแทรกโมดูล .
ขั้นตอนที่ 2: วางมาโครต่อไปนี้ใน โมดูล .
Sub Mail_Merge_From_Excel_to_Excel()
Book1_Path = "C:\Users\maruf\Desktop\Softeko\Mail Merge from Excel to Excel\Mail_Data.xlsx"
Book1_Name = "Mail_Data"
Book2_Name = "Mail_Merge"
Sheet1_Name = "Mail Data"
Sheet2_Name = "Mail Merge"
No_of_Columns = 9
Workbooks.Open Book1_Path
Set Rng1 = Workbooks(Book1_Name).Worksheets(Sheet1_Name).UsedRange
Set Rng2 = Workbooks(Book2_Name).Worksheets(Sheet2_Name).UsedRange
For i = 1 To Rng2.Rows.Count
For j = 1 To Rng1.Rows.Count
If Rng1.Cells(j, No_of_Columns) = Rng2.Cells(i, No_of_Columns) Then
For k = 1 To No_of_Columns - 1
Rng2.Cells(i, k) = Rng1.Cells(j, k)
Next k
Exit For
End If
Next j
Next i
End Sub
➤ จากภาพด้านบน ส่วนของตัวเลขจะกำหนด
1 – เริ่มรหัสแมโครประกาศ รหัสมาโคร VBA ของ Sub ชื่อ.
2 – กำหนดเส้นทางสมุดงานที่มีอยู่ในอุปกรณ์ นอกจากนี้ ให้ส่งชื่อตัวแปรและหมายเลขคอลัมน์ด้วย
3 – เปิดสมุดงานที่มีอยู่ก่อนหน้านี้โดยใช้ Workbooks.Open คำสั่ง
4 – กำหนดช่วงบางอย่างให้กับสมุดงานและแผ่นงานต่างๆ
5 – ดำเนินการซ้อน VBA FOR วนซ้ำเพื่อรวมข้อมูลในกรณีที่เงื่อนไขที่กำหนดได้รับความพึงพอใจโดย VBA IF คำชี้แจง
ขั้นตอนที่ 3: หลังจากใส่รหัสแล้ว ให้ใช้ F5 คีย์หรือคลิกเรียกใช้> เรียกใช้ Sub/UserForm เพื่อเรียกใช้แมโคร
🔺 ทันที Excel จะเปิด Mail_Dataที่ปิดอยู่ทันที สมุดงาน
🔺 กลับไปที่ Merge_Data สมุดงานเพื่อดูการเปลี่ยนแปลง คุณเห็น Excel รวมข้อมูลรับรองอีเมลของรายการที่มีอยู่ตามที่เราต้องการ
อ่านเพิ่มเติม: มาโครเพื่อเติมเอกสารจดหมายเวียนจาก Excel
บทสรุป
ในบทความนี้ เราสาธิต VBA Macro Code เพื่อส่งจดหมายเวียนจาก Excel ไปยัง Excel เราหวังว่าวิธีนี้จะช่วยคุณได้ แสดงความคิดเห็นหากคุณมีคำถามเพิ่มเติมหรือมีอะไรเพิ่มเติม
บทความที่เกี่ยวข้อง
- มาโครเพื่อเติมเอกสารจดหมายเวียนจาก Excel
- วิธีการเปลี่ยนรูปแบบวันที่ในจดหมายเวียนของ Excel (พร้อมขั้นตอนด่วน)
- วิธีการผสานไฟล์ Excel เข้ากับป้ายกำกับการส่งจดหมาย (ด้วยขั้นตอนง่ายๆ)
- จดหมายผสานจาก Excel ไปยัง Word Envelopes (2 วิธีง่ายๆ)
- วิธีการส่งจดหมายเวียนรูปภาพจาก Excel ไปยัง Word (2 วิธีง่ายๆ)
.