Vba: วิธีรับหมายเลขคอลัมน์จากช่วง

คุณสามารถใช้วิธีต่อไปนี้เพื่อรับหมายเลขคอลัมน์จากช่วงใน Excel โดยใช้ VBA:

วิธีที่ 1: รับหมายเลขคอลัมน์จากช่วงที่ระบุ

 Sub GetColumnNumber()

colNum = Range(" D7 ").Column
MsgBox colNum

End Sub

มาโครนี้จะแสดงกล่องข้อความพร้อมหมายเลขคอลัมน์ที่ตรงกับเซลล์ D7 ซึ่งจะเป็น 4 เนื่องจาก D เป็นคอลัมน์ที่สี่บนแผ่นงาน

วิธีที่ 2: รับหมายเลขคอลัมน์ของช่วงที่เลือกในปัจจุบัน

 Sub GetColumnNumber()

colNum = Selection.Column
MsgBox colNum

End Sub

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

เช่น ถ้าเลือกเซลล์ B3 เมื่อคุณเรียกใช้แมโครนี้ กล่องข้อความจะปรากฏขึ้นพร้อมกับค่า 2 เนื่องจากคอลัมน์ B เป็นคอลัมน์ที่สองในแผ่นงาน

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

ตัวอย่างที่ 1: รับหมายเลขคอลัมน์จากช่วงที่ระบุ

สมมติว่าเราต้องการได้รับหมายเลขคอลัมน์สำหรับการอ้างอิงเซลล์ D7

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

 Sub GetColumnNumber()

colNum = Range(" D7 ").Column
MsgBox colNum

End Sub

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

กล่องข้อความจะแสดงค่า 4 ซึ่งสอดคล้องกับหมายเลขคอลัมน์ของการอ้างอิงเซลล์ D7

ตัวอย่างที่ 2: รับหมายเลขคอลัมน์ของช่วงที่เลือกในปัจจุบัน

สมมติว่าเราต้องการรับหมายเลขคอลัมน์ของเซลล์ที่ใช้งานอยู่ในปัจจุบัน

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

 Sub GetColumnNumber()

colNum = Selection.Column
MsgBox colNum

End Sub

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

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

กล่องข้อความจะแสดงค่า 2 ซึ่งสอดคล้องกับหมายเลขคอลัมน์ของเซลล์ที่ใช้งานอยู่ในปัจจุบันใน B3

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

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

VBA: วิธีรับหมายเลขแถวจากช่วง
VBA: วิธีค้นหาค่าในคอลัมน์
VBA: วิธีนับจำนวนคอลัมน์ที่ใช้