วิธีเน้นเซลล์ใน vba: พร้อมตัวอย่าง

คุณสามารถใช้วิธีการต่อไปนี้ใน VBA เพื่อเน้นเซลล์:

วิธีที่ 1: เน้นเซลล์ที่ใช้งานอยู่

 SubHighlightActiveCell ()
ActiveCell.Interior.Color = vbYellow
End Sub

มาโครนี้จะเน้นเซลล์ที่ใช้งานอยู่ในปัจจุบันด้วยพื้นหลังสีเหลือง

วิธีที่ 2: เน้นช่วงเซลล์

 SubHighlightRange ()
Range(" B2:B10 ").Interior.Color = vbYellow
End Sub

มาโครนี้จะเน้นแต่ละเซลล์ในช่วง B2:B10 ด้วยพื้นหลังสีเหลือง

วิธีที่ 3: เน้นช่วงเซลล์ตามเกณฑ์

 SubHighlightRangeBasedOnCriteria ()

  Dim rng As Range
  
  For Each rng In Range(" B2:B10 ")
  
      If rng.Value > 20 Then
        rng.Interior.Color = vbYellow
      End If
      
  Next rng
  
End Sub

มาโครนี้จะเน้นทุกเซลล์ในช่วง B2:B10 ที่มีค่ามากกว่า 20

ตัวอย่างต่อไปนี้แสดงวิธีการใช้แต่ละวิธีในทางปฏิบัติกับชุดข้อมูลต่อไปนี้ใน Excel:

ตัวอย่างที่ 1: เน้นเซลล์ที่ใช้งานอยู่

สมมติว่าเซลล์ B3 ถูกเลือกอยู่ในปัจจุบัน

เราสามารถสร้างมาโครต่อไปนี้เพื่อเน้นเซลล์ที่ใช้งานอยู่นี้:

 SubHighlightActiveCell ()
ActiveCell.Interior.Color = vbYellow
End Sub

เมื่อเราเรียกใช้แมโครนี้ เราได้รับผลลัพธ์ต่อไปนี้:

โปรดสังเกตว่าเซลล์ B3 ถูกไฮไลต์ และเซลล์อื่นๆ ทั้งหมดยังคงไม่ถูกแตะต้อง

ตัวอย่างที่ 2: เน้นช่วงของเซลล์

สมมติว่าเราต้องการเน้นแต่ละเซลล์ในช่วง B2:B10

เราสามารถสร้างมาโครต่อไปนี้เพื่อทำสิ่งนี้:

 SubHighlightRange ()
Range(" B2:B10 ").Interior.Color = vbYellow
End Sub

เมื่อเราเรียกใช้แมโครนี้ เราได้รับผลลัพธ์ต่อไปนี้:

โปรดทราบว่าแต่ละเซลล์ในช่วง B2:B10 จะถูกไฮไลต์ และเซลล์อื่นๆ ทั้งหมดจะยังคงไม่ถูกแตะต้อง

ตัวอย่างที่ 3: เน้นช่วงของเซลล์ตามเกณฑ์

สมมติว่าเราต้องการเน้นทุกเซลล์ในช่วง B2:B10 ที่มีค่ามากกว่า 20

เราสามารถสร้างมาโครต่อไปนี้เพื่อทำสิ่งนี้:

 SubHighlightRangeBasedOnCriteria ()

  Dim rng As Range
  
  For Each rng In Range(" B2:B10 ")
  
      If rng.Value > 20 Then
        rng.Interior.Color = vbYellow
      End If
      
  Next rng
  
End Sub

เมื่อเราเรียกใช้แมโครนี้ เราได้รับผลลัพธ์ต่อไปนี้:

โปรดทราบว่าแต่ละเซลล์ในช่วง B2:B10 ที่มีค่ามากกว่า 20 จะถูกไฮไลต์ และเซลล์อื่นๆ ทั้งหมดจะยังคงไม่ถูกแตะต้อง

แหล่งข้อมูลเพิ่มเติม

บทช่วยสอนต่อไปนี้จะอธิบายวิธีการทำงานทั่วไปอื่นๆ ใน VBA:

VBA: วิธีใช้การจัดรูปแบบตามเงื่อนไขกับเซลล์
VBA: วิธีใช้การจัดรูปแบบตามเงื่อนไขกับค่าที่ซ้ำกัน
VBA: วิธีค้นหาค่าในคอลัมน์