หากคุณทำงานกับชุดข้อมูลขนาดใหญ่ใน Microsoft Excel การจัดรูปแบบแถวสลับสีจะช่วยให้อ่านข้อมูลง่ายขึ้นและค้นพบรูปแบบหรือแนวโน้มได้สะดวกกว่า คุณสามารถใช้โค้ด VBA เพื่อนำสีแถวสลับไปใช้กับเซลล์ที่ผสานรวมได้อย่างง่ายดาย ในบทความนี้จะแนะนำวิธีการสลับสีแถวสำหรับเซลล์ผสานรวมใน Excel อย่างละเอียด
คุณสามารถดาวน์โหลดไฟล์ Excel จากลิงก์ด้านล่างเพื่อฝึกปฏิบัติตามไปพร้อมกัน
ขั้นตอนการจัดสีแถวสลับสำหรับเซลล์ผสานรวมใน Excel
ในชุดข้อมูลตัวอย่าง คอลัมน์ซ้ายสุดคือ Category (หมวดหมู่) ซึ่งมีชื่อหมวดหมู่สินค้าต่างๆ โดยใช้คำสั่ง Merge Cells (ผสานเซลล์) เพื่อผสานแถวที่ติดกัน การผสานแถวไม่ได้มีรูปแบบเฉพาะเจาะจงในหมายเลขแถว เราจะใช้ชุดข้อมูลนี้สาธิตการจัดสีแถวสลับใน Excel

ขั้นตอนที่ 1: เปิด Visual Basic Editor
เราจะใช้โค้ด VBA เพื่อนำรูปแบบสีแถวสลับไปใช้กับเซลล์ผสานรวมใน Excel ก่อนอื่นต้องเปิด Visual Basic Editor
วิธีทำ:
❶ ไปที่แท็บ Developer ในริบบอน
❷ คลิกคำสั่ง Visual Basic ในกลุ่ม Code
จะเปิด Visual Basic Editor ทันที
หรือกดปุ่มลัด ALT + F11 เพื่อเปิด Visual Basic Editor ได้เช่นกัน

อ่านเพิ่มเติม: วิธีจัดสีแถวสลับตามค่าเซลล์ใน Excel
ขั้นตอนที่ 2: แทรกโค้ด VBA ในโมดูลใหม่
ต่อไปต้องเปิดโมดูลใหม่เพื่อวางโค้ด VBA วิธีเปิดโมดูลใหม่:
❶ ไปที่แท็บ Insert
❷ เลือกคำสั่ง Module จากรายการแบบเลื่อนลง

❸ คัดลอกโค้ด VBA ด้านล่างนี้:
Sub Alternate_Colors()
Dim xRw As Long
Dim xCnt As Long
Dim xColr As Long
With Range("B5").CurrentRegion
.EntireColumn.Interior.Color = xlNone
.EntireColumn.Borders.LineStyle = xlNone
.Columns.Borders(xlInsideVertical).Weight = xlThin
.Columns.Borders(xlInsideHorizontal).Weight = xlThin
.BorderAround , xlThin
xColr = RGB(233, 237, 244)
Do
xColr = RGB(233, 237, 244) + RGB(208, 216, 232) - xColr
xCnt = Cells(xRw + 5, "B").MergeArea.Rows.Count
Cells(xRw + 5, "B").Resize(xCnt, .Columns.Count).Interior.Color = xColr
xRw = xRw + xCnt
Loop While xRw < .Rows.Count - 1
End With
End Sub
❹ วาง โค้ดลงในโมดูลที่เปิดใหม่

อ่านเพิ่มเติม: วิธีจัดสีทุกแถวสลับใน Excel (3 วิธี)
ขั้นตอนที่ 3: บันทึกสมุดงานเป็น Macro-Enabled Workbook
เพื่อบันทึกสมุดงานพร้อมโค้ด VBA:
❶ ไปที่แท็บ File ในริบบอน
❷ เลือกคำสั่ง Save
หรือกด CTRL + S พร้อมกัน

❸ คลิก No ในกล่องโต้ตอบที่ขึ้นมาเพื่อดำเนินการกับโค้ด VBA ต่อ

❹ เลือกตัวเลือก Excel Macro-Enabled Workbook (*.xlsm) ในรายการ Save as type

อ่านเพิ่มเติม: วิธีจัดสีแถวสลับใน Excel (8 วิธี)
ขั้นตอนที่ 4: รันโค้ด VBA
ตอนนี้เหลือแค่รันโค้ด วิธีรันโค้ด VBA:
❶ ไปที่แท็บ Developer
❷ เลือกคำสั่ง Macros ในกลุ่ม Code
หรือกด ALT + F8 เพื่อเปิดกล่องโต้ตอบ Macro

❸ คลิกปุ่ม Run ในกล่องโต้ตอบ Macro

โค้ด VBA จะทำงานและจัดสีแถวสลับสำหรับเซลล์ผสานรวม ตามภาพด้านล่าง

อ่านเพิ่มเติม: วิธีสลับสีแถวตามกลุ่มใน Excel (6 วิธี)
ส่วนฝึกปฏิบัติ
คุณจะได้แผ่น Excel ตามภาพด้านล่าง ที่ท้ายไฟล์ที่ให้มา เพื่อฝึกปฏิบัติทุกหัวข้อในบทความนี้

สรุป
บทความนี้ได้อธิบายขั้นตอนการสลับสีแถวสำหรับเซลล์ผสานรวมใน Excel หากมีข้อสงสัย สามารถถามได้ในส่วนความคิดเห็นด้านล่าง เราจะตอบให้โดยเร็วที่สุด โปรดเยี่ยมชมเว็บไซต์ Exceldemy เพื่อเรียนรู้เพิ่มเติม
บทความที่เกี่ยวข้อง
- Excel Alternating Row Color with Conditional Formatting [Video]
- วิธีสลับสีแถวใน Excel โดยไม่ใช้ตาราง (5 วิธี)