Excel VBA เพื่อเลือกช่วงที่ใช้ในคอลัมน์ (8 ตัวอย่าง)

  • แบ่งปันสิ่งนี้
Hugh West

บทช่วยสอนนี้จะสาธิต 8 ตัวอย่างของการใช้ VBA เพื่อเลือก ช่วงที่ใช้ ในคอลัมน์ใน excel โดยทั่วไป คุณสมบัติ UsedRange ใน excel แสดงถึงส่วนของเวิร์กชีตที่มีข้อมูลอยู่ เพื่อแสดงตัวอย่างอย่างชัดเจน เราจะใช้คุณสมบัติ UsedRange ในชุดข้อมูลเฉพาะสำหรับตัวอย่างทั้งหมด

ดาวน์โหลดแบบฝึกหัดแบบฝึกหัด

เราสามารถดาวน์โหลดแบบฝึกหัดแบบฝึกหัดได้จากที่นี่ .

VBA เพื่อเลือก UsedRange ใน Column.xlsm

8 ตัวอย่างง่ายๆ ของ VBA เพื่อเลือก UsedRange ในคอลัมน์

ในภาพต่อไปนี้ เราสามารถดูชุดข้อมูลที่เราจะใช้สำหรับตัวอย่างทั้งหมด ชุดข้อมูลประกอบด้วยชื่อของ พนักงานขาย , ตำแหน่งที่ตั้ง , ภูมิภาค, และ ' ยอดรวม ' ของยอดขาย ในชุดข้อมูลนี้ จะพิจารณาช่วงที่ใช้รวมถึงส่วนหัวด้วย ดังนั้น ช่วงที่ใช้ในชุดข้อมูลต่อไปนี้คือ ( B2:E15 )

1. เลือก UsedRange ในคอลัมน์ที่มี VBA ใน Excel

ก่อนอื่น เราจะเลือกคอลัมน์ทั้งหมดจากชุดข้อมูลของเรา ในการทำเช่นนี้ เราจะใช้คุณสมบัติ VBA เลือก UsedRange ในคอลัมน์ มาดูขั้นตอนในการดำเนินการวิธีนี้กัน

STEPS:

  • เริ่มต้นด้วย คลิกขวา บนแผ่นงานที่ใช้งานอยู่ชื่อ ' Select_Columns '.
  • นอกจากนี้ เลือกตัวเลือก ' View Code '.

  • จากนั้น การดำเนินการด้านบนจะเปิดช่องว่างหน้าต่างรหัส VBA สำหรับแผ่นงานนั้น เรายังสามารถรับหน้าต่างโค้ดนี้ได้โดยกด Alt + F11 .
  • ถัดไป พิมพ์โค้ดต่อไปนี้ในหน้าต่างโค้ดนั้น:
8293
  • หลังจากนั้น คลิกที่ เรียกใช้ หรือกดปุ่ม F5 เพื่อเรียกใช้โค้ด

  • สุดท้าย เราได้ผลลัพธ์ดังภาพต่อไปนี้ เราจะเห็นว่าตอนนี้มีการเลือกช่วงที่ใช้ในคอลัมน์จากชุดข้อมูลของเราแล้ว

2. ใช้ VBA เพื่อคัดลอกช่วงที่ใช้ทั้งหมดในคอลัมน์

ในตัวอย่างที่สอง เราจะใช้ VBA เพื่อคัดลอกช่วงที่ใช้ทั้งหมดในคอลัมน์จากชุดข้อมูลของเรา โดยทั่วไป เราใช้วิธีนี้เพื่อคัดลอกภูมิภาคเฉพาะจากชุดข้อมูลของเรา เราจำเป็นต้องทำตามขั้นตอนด้านล่างเพื่อดำเนินการตามวิธีนี้

ขั้นตอน:

  • ขั้นแรก ไปที่แท็บแผ่นงานที่ใช้งานอยู่ชื่อ ' คัดลอก '.
  • ถัดไป คลิกขวา บนแท็บนั้น และเลือกตัวเลือก ' ดูรหัส '.

<18

  • จะเปิดหน้าต่างโค้ด VBA ว่างสำหรับแผ่นงานปัจจุบัน อีกวิธีในการรับหน้าต่างนี้คือการกด Alt + F11 จากแป้นพิมพ์
  • จากนั้น แทรกโค้ดด้านล่างในหน้าต่างโค้ดนั้น:
6469
  • ตอนนี้ หากต้องการรันโค้ด ให้คลิกที่ เรียกใช้ หรือกดปุ่ม F5

  • ในที่สุด เราจะเห็นผลลัพธ์ดังต่อไปนี้ นอกจากนี้ เราสามารถเห็นเส้นขอบรอบช่วงที่ใช้ แสดงว่ารหัสมีการคัดลอกข้อมูลภายในเส้นขอบนี้

อ่านเพิ่มเติม: Excel VBA: คัดลอกช่วงไดนามิกไปยังสมุดงานอื่น

3. นับจำนวน ของคอลัมน์ใน UsedRange โดยใช้ VBA

ในตัวอย่างที่สาม เราจะนับจำนวนคอลัมน์ในชุดข้อมูลของเราโดยใช้ excel VBA เลือก ช่วงที่ใช้ เมธอด ในคอลัมน์ . ตัวอย่างนี้จะส่งคืนจำนวนคอลัมน์ทั้งหมดภายในช่วงที่ใช้ในชุดข้อมูลของเราในกล่องข้อความ ทำตามขั้นตอนด้านล่างเพื่อดำเนินการวิธีนี้

ขั้นตอน:

  • ขั้นแรก เลือกแผ่นงานที่ใช้งานอยู่ชื่อ ' Count_Columns '
  • ประการที่สอง คลิกขวา ที่ชื่อแผ่นงานที่ใช้งานอยู่ และคลิกที่ตัวเลือก ' ดูโค้ด '

  • คำสั่งดังกล่าวจะเปิดหน้าต่างโค้ด VBA ว่างสำหรับแผ่นงานที่ใช้งานอยู่ เรายังสามารถรับหน้าต่างรหัสได้โดยกด Alt + F11 จากแป้นพิมพ์
  • ประการที่สาม ป้อนรหัสต่อไปนี้ในหน้าต่างรหัสเปล่านั้น:
9234
  • ถัดไป คลิกที่ เรียกใช้ หรือกดปุ่ม F5 เพื่อเรียกใช้โค้ด

  • สุดท้าย เราจะได้ผลลัพธ์ในกล่องข้อความ จำนวนคอลัมน์ในช่วงที่ใช้คือ 4 .

อ่านเพิ่มเติม: วิธีใช้ VBA เพื่อนับแถวในช่วง ด้วย Data ใน Excel (5 Macros)

4. Excel VBA เพื่อนับจำนวนคอลัมน์สุดท้ายในช่วงที่ใช้

ในวิธีก่อนหน้านี้ เราได้แยกจำนวนคอลัมน์สุดท้ายใน ช่วงที่ใช้.อย่างไรก็ตาม ในตัวอย่างนี้ เราจะกำหนดจำนวนของคอลัมน์สุดท้ายในช่วงที่ใช้ทั่วทั้งเวิร์กชีตโดยใช้คุณสมบัติ VBA เลือก UsedRange มาดูขั้นตอนที่เราต้องปฏิบัติตามเพื่อดำเนินการนี้

ขั้นตอน:

  • เริ่มต้นด้วย คลิกขวา บนแผ่นงานที่มีชื่อว่า ' Last Column '.
  • จากนั้น เลือกตัวเลือก ' View Code '.

  • ดังนั้น คำสั่งดังกล่าวจึงเปิดหน้าต่างโค้ด VBA ว่างสำหรับแผ่นงานนั้น วิธีอื่นในการเปิดหน้าต่างรหัสคือการกด Alt + F11 .
  • หลังจากนั้น ใส่รหัสต่อไปนี้ในหน้าต่างรหัสนั้น:
2047
  • ตอนนี้ คลิกที่ เรียกใช้ หรือกดปุ่ม F5 เพื่อเรียกใช้โค้ด

  • ในท้ายที่สุด เราจะได้ผลลัพธ์ในกล่องข้อความ คอลัมน์สุดท้ายในช่วงที่ใช้คือคอลัมน์ 5 ของเวิร์กชีต

การอ่านที่คล้ายกัน

  • วิธีใช้ VBA สำหรับแต่ละแถวในช่วงใน Excel
  • ใช้ VBA เพื่อเลือกช่วงจากเซลล์ที่ใช้งานอยู่ใน Excel (3 วิธี)
  • มาโคร Excel: จัดเรียงหลายคอลัมน์ด้วยช่วงไดนามิก (4 วิธี)

5. เลือกเซลล์สุดท้ายของคอลัมน์สุดท้ายจาก UsedRange ด้วย VBA

ในตัวอย่างที่ห้า เราจะใช้คุณสมบัติ VBA เลือก ช่วงที่ใช้ เพื่อเลือกเซลล์สุดท้ายของคอลัมน์สุดท้ายในแผ่นงาน excel เพื่อแสดงตัวอย่างนี้ เราจะดำเนินการต่อกับชุดข้อมูลก่อนหน้าของเรา ตอนนี้ มาดูขั้นตอนในการทำวิธีนี้

ขั้นตอน:

  • ขั้นแรก เลือกแผ่นงานที่ใช้งานอยู่ชื่อ ' Last_Cell '.
  • ถัดไป คลิกขวา ที่ชื่อแผ่นงานนั้น เลือกตัวเลือก ' View Code '.

  • จากนั้นเราจะได้หน้าต่าง VBA code ที่ว่างเปล่า . นอกจากนี้ เราสามารถกด Alt + F11 เพื่อเปิดหน้าต่างโค้ดนั้น
  • หลังจากนั้น พิมพ์โค้ดต่อไปนี้ในหน้าต่างโค้ดนั้น:
7162
  • ตอนนี้ หากต้องการรันโค้ด ให้คลิกที่ เรียกใช้ หรือกด F5 .

  • ในที่สุด เราจะเห็นผลลัพธ์ในภาพต่อไปนี้ เซลล์สุดท้ายที่เลือกของคอลัมน์สุดท้ายคือเซลล์ E15 .

6. ค้นหาช่วงเซลล์ของ Selected UsedRange ด้วย Excel VBA

ในตัวอย่างนี้ เราจะใช้ VBA เพื่อค้นหาช่วงเซลล์ของช่วงที่เลือกใช้ในแผ่นงาน excel เราจะใช้โค้ด VBA สำหรับคอลัมน์ทั้งหมดในช่วงที่เราใช้ รหัสจะส่งกลับช่วงเซลล์เช่นเดียวกับที่อยู่ของคอลัมน์ในช่วงที่ใช้ ทำตามขั้นตอนด้านล่างเพื่อดำเนินการนี้

ขั้นตอน:

  • ในตอนเริ่มต้น คลิกขวา บนแท็บแผ่นงานที่ใช้งานอยู่ ชื่อ ' ค้นหาช่วงเซลล์ '.
  • อย่างที่สอง เลือกตัวเลือก ' ดูรหัส '.

  • จะเปิดหน้าต่างรหัส VBA ว่าง อีกวิธีในการเปิดหน้าต่างรหัสนี้คือการกด Alt + F11 .
  • ประการที่สาม ป้อนโค้ดต่อไปนี้ในหน้าต่างโค้ดนั้น:
5790
  • จากนั้น เรียกใช้โค้ดโดยคลิกที่ เรียกใช้ หรือกดปุ่ม F5

  • ในตอนท้าย กล่องข้อความ เช่น รูปภาพต่อไปนี้แสดงผลลัพธ์

การอ่านที่คล้ายกัน

  • VBA เพื่อวนรอบแถวและ คอลัมน์ในช่วงใน Excel (5 ตัวอย่าง)
  • วิธีแปลงช่วงเป็นอาร์เรย์ใน Excel VBA (3 วิธี)

7. แทรก คุณสมบัติ VBA UsedRange เพื่อนับเซลล์ว่าง

ในตัวอย่างนี้ เราจะใช้คุณสมบัติ VBA เลือก UsedRange เพื่อนับเซลล์ว่างในแผ่นงาน Excel บางครั้งเราอาจมีเซลล์ว่างในช่วงที่ใช้ของชุดข้อมูลของเรา เราสามารถนับจำนวนเซลล์ว่างเหล่านั้นได้อย่างง่ายดายโดยใช้คุณสมบัติ UsedRange มาดูขั้นตอนการดำเนินการตามตัวอย่างนี้กัน

STEPS:

  • ขั้นแรก คลิกขวา บนแท็บแผ่นงานที่ใช้งานอยู่ชื่อ ' Empty_Cells '.
  • ถัดไป เลือกตัวเลือก ' ดูรหัส '.

  • การดำเนินการข้างต้นจะเปิดหน้าต่างโค้ด VBA ที่ว่างเปล่า วิธีอื่นในการเปิดหน้าต่างโค้ดคือการกด Alt + F11 .
  • จากนั้นใส่โค้ดต่อไปนี้ในหน้าต่างโค้ดนั้น:
5620
  • หลังจากนั้น คลิกที่ เรียกใช้ หรือกดปุ่ม F5 เพื่อเรียกใช้โค้ด

  • สุดท้าย เราจะได้ผลลัพธ์ในกล่องข้อความ เดอะกล่องข้อความจะแสดงจำนวนเซลล์ทั้งหมดและเซลล์ว่างในช่วงที่เราใช้

8. VBA UsedRange เพื่อค้นหาเซลล์ว่างเซลล์แรกในคอลัมน์ใน Excel

ในตัวอย่างสุดท้าย เราจะใช้ excel VBA เพื่อเลือกคุณสมบัติ ช่วงที่ใช้ ในคอลัมน์เพื่อค้นหาเซลล์ว่างเซลล์แรกในแผ่นงาน excel ของเรา วิธีนี้จะค้นหาเซลล์ว่างเซลล์แรกของคอลัมน์ใดคอลัมน์หนึ่ง เซลล์ว่างจะอยู่นอกช่วงที่ใช้ของชุดข้อมูลเสมอ ดังนั้นหากเซลล์ใดว่างหรือไม่ว่างในช่วงที่ใช้จะไม่ได้รับการพิจารณาในวิธีนี้ ตอนนี้ ให้ทำตามขั้นตอนด้านล่างเพื่อดำเนินการตามวิธีนี้

ขั้นตอน:

  • เริ่มต้นด้วย คลิกขวา บนไอคอนที่ใช้งานอยู่ แท็บแผ่นงานชื่อ ' First_Empty '.
  • นอกจากนี้ เลือกตัวเลือก ' ดูรหัส '.

<3

  • จะเปิดหน้าต่างรหัส VBA ว่าง เรายังสามารถกด Alt + F11 เพื่อเปิดหน้าต่างโค้ดนั้น
  • นอกจากนี้ พิมพ์โค้ดต่อไปนี้ในหน้าต่างโค้ด VBA ว่าง:
1714
  • จากนั้น ในการเรียกใช้โค้ด ให้คลิกที่ เรียกใช้ หรือกดปุ่ม F5

  • สุดท้าย โค้ดด้านบนจะแทรกค่า ' FirstEmptyCell ' ในเซลล์ E16 เป็นเซลล์ว่างเซลล์แรกของคอลัมน์ E หลังจากช่วงที่ใช้ของชุดข้อมูล

อ่านเพิ่มเติม: Excel VBA ถึง วนซ้ำจนถึงช่วงเซลล์ว่าง (4 ตัวอย่าง)

สรุป

โดยสรุป บทช่วยสอนนี้แสดงตัวอย่าง 8 ตัวอย่างการใช้คุณสมบัติ VBA เลือก UsedRange ในแผ่นงาน Excel หากต้องการทดสอบทักษะของคุณ ให้ดาวน์โหลดแบบฝึกหัดที่ใช้สำหรับบทความนี้ โปรดอย่าลังเลที่จะแสดงความคิดเห็นในช่องด้านล่างหากคุณมีข้อสงสัยใดๆ ทีมงานของเราจะพยายามตอบกลับข้อความของคุณโดยเร็วที่สุด คอยติดตามโซลูชัน Microsoft Excel ที่เป็นนวัตกรรมใหม่ๆ ในอนาคต

Hugh West เป็นผู้ฝึกอบรมและนักวิเคราะห์ Excel ที่มีประสบการณ์สูงและมีประสบการณ์มากกว่า 10 ปีในอุตสาหกรรมนี้ เขาสำเร็จการศึกษาระดับปริญญาตรีสาขาการบัญชีและการเงิน และปริญญาโทสาขาบริหารธุรกิจ Hugh มีความหลงใหลในการสอนและได้พัฒนาแนวทางการสอนที่เป็นเอกลักษณ์ซึ่งง่ายต่อการติดตามและเข้าใจ ความรู้ความเชี่ยวชาญของเขาเกี่ยวกับ Excel ช่วยให้นักเรียนและผู้เชี่ยวชาญหลายพันคนทั่วโลกพัฒนาทักษะและความเป็นเลิศในอาชีพการงาน ฮิวจ์แบ่งปันความรู้ของเขากับคนทั้งโลกผ่านบล็อก โดยเสนอบทช่วยสอน Excel ฟรีและการฝึกอบรมออนไลน์เพื่อช่วยให้บุคคลและธุรกิจบรรลุศักยภาพสูงสุดของตนเอง