วิธีสร้างแบบอักษรเป็นตัวหนาโดยใช้ vba (พร้อมตัวอย่าง)

คุณสามารถใช้คุณสมบัติ Font.Bold ใน VBA เพื่อสร้างแบบอักษรตัวหนาในเซลล์ที่ระบุใน Excel

ตัวอย่างเช่น คุณสามารถสร้างแมโครต่อไปนี้เพื่อทำให้แบบอักษรในเซลล์ A1 บนแผ่นงานเป็นตัวหนา:

 SubMakeFontBold ()
Range(" A1 ").Font.Bold = True
End Sub

คุณยังสามารถสร้างมาโครต่อไปนี้เพื่อทำให้แบบอักษรของแต่ละเซลล์เป็นตัวหนาในช่วง A1:C1 :

 SubMakeFontBold ()
Range(" A1:C1 ").Font.Bold = True
End Sub

ตัวอย่างต่อไปนี้แสดงวิธีนำแบบอักษรตัวหนาไปใช้จริงโดยใช้ VBA

ตัวอย่าง: ทำให้แบบอักษรเป็นตัวหนาโดยใช้ VBA

สมมติว่าเรามีชุดข้อมูลต่อไปนี้ใน Excel ที่มีข้อมูลเกี่ยวกับผู้เล่นบาสเก็ตบอลจากทีมต่างๆ:

เราสามารถสร้างแมโครต่อไปนี้เพื่อให้เฉพาะแบบอักษรในเซลล์ A1 ตัวหนา:

 SubMakeFontBold ()
Range(" A1 ").Font.Bold = True
End Sub

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

โปรดสังเกตว่าแบบอักษรของเซลล์ A1 มีการเปลี่ยนแปลงเป็นตัวหนา ในขณะที่เซลล์อื่นๆ ทั้งหมดยังคงไม่เปลี่ยนแปลง

หากเราต้องการทำให้แต่ละเซลล์ในช่วง A1:C1 เป็นตัวหนา เราสามารถสร้างมาโครต่อไปนี้:

 SubMakeFontBold ()
Range(" A1:C1 ").Font.Bold = True
End Sub

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

โปรดสังเกตว่าแบบอักษรในแต่ละเซลล์ในช่วง A1:C1 จะกลายเป็นตัวหนาแล้ว

หมายเหตุ : คุณสามารถค้นหาเอกสารฉบับเต็มสำหรับคุณสมบัติ VBA Font.Bold ได้ที่นี่

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

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

VBA: วิธีเปลี่ยนสีตัวอักษร
VBA: วิธีแทนที่อักขระในสตริง
VBA: วิธีแทรกบรรทัดด้วยการจัดรูปแบบ