วิธีใช้ VBA เพื่อเลือกช่วงจาก Active Cell ใน Excel (3 วิธี)

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

เราจะแสดงให้คุณเห็น 3 วิธีการใน Excel VBA ถึง เลือกช่วง จาก เซลล์ที่ใช้งานอยู่ . เพื่อแสดงให้เห็นสิ่งนี้ เราได้เลือกชุดข้อมูลที่มี 3 คอลัมน์ : “ ชื่อจริง ”, “ นามสกุล ” และ “ อีเมล ”. เราจะเลือก เซลล์ และใช้ Excel VBA เราจะเลือกช่วงจาก เซลล์ นั้น

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

เลือกช่วงจาก Active Cell.xlsm

3 วิธีในการเลือกช่วงจากเซลล์ที่ใช้งานโดยใช้ VBA ใน Excel

1. ใช้ VBA เพื่อเลือกช่วงจากเซลล์ที่ใช้งานไปยังเซลล์สุดท้ายที่ไม่ว่าง

สำหรับวิธีแรก เราจะใช้คุณสมบัติ Range.End

ที่นี่ เราจะป้อนรหัสของเราเป็น โมดูล เมื่อต้องการเรียกหน้าต่าง โมดูล ให้ทำดังนี้-

ขั้นตอน:

  • ประการแรก จาก นักพัฒนาซอฟต์แวร์ แท็บ >>> เลือก Visual Basic .

หน้าต่าง Visual Basic จะปรากฏขึ้น

  • สุดท้าย จาก แทรก >>> เลือก โมดูล .

เพื่อเปิดหน้าต่าง โมดูล

1.1. การใช้คุณสมบัติ End(xlUp)

ในส่วนนี้ เราจะเลือก ช่วง ขึ้นไป จนถึง เซลล์ที่ไม่ว่าง จาก เซลล์ที่ใช้งานอยู่ ของเรา

ขั้นตอน:

  • ประการแรก เปิดหน้าต่าง โมดูล
  • อย่างที่สอง พิมพ์ รหัสต่อไปนี้
2008

เรากำลังเรียก ขั้นตอนย่อย ขั้นตอน ToUp . จากนั้นเราจะเลือก ช่วง ค่าแรกคือ เซลล์ที่ใช้งานอยู่ ค่าสุดท้ายคือ ActiveCell.End(xlUp) สุดท้าย เรากำลังเลือก ช่วง ด้วย ช่วง . เลือก เมธอด

  • ประการที่สาม บันทึก และปิดหน้าต่าง
  • หลังจากนั้น เลือก เซลล์ C6 เซลล์ นี้คือ แอ็คทีฟ เซลล์ ของเรา

ตอนนี้ เราจะ เปิดหน้าต่าง มาโคร เมื่อต้องการทำเช่นนั้น-

  • จากแท็บ นักพัฒนาซอฟต์แวร์ >>> เลือก มาโคร .

หลังจากนั้น กล่องโต้ตอบ มาโคร จะปรากฏขึ้น

  • จากนั้น เลือก “ ToUp ” จาก “ ชื่อมาโคร:
  • สุดท้าย คลิกที่ เรียกใช้ .

เราจะเห็นว่า เราได้ เลือก ช่วงเซลล์ C4:C6 .<3

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

1.2. การรวมคุณสมบัติ End(xlDown)

ในส่วนนี้ เราจะเลือก ช่วง ลงล่าง จาก เซลล์ที่ใช้งานอยู่ .

ขั้นตอน:

  • ประการแรก เปิดหน้าต่าง โมดูล
  • ประการที่สอง พิมพ์ รหัสต่อไปนี้
9374

เรากำลังเรียก ย่อย ขั้นตอน ToDown จากนั้นเราจะเลือก ช่วง ค่าแรกคือ เซลล์ที่ใช้งานอยู่ ค่าสุดท้ายคือ ActiveCell.End(xlDown) ในที่สุดเราก็การเลือก ช่วง ด้วย ช่วง . เลือก วิธีการ

  • ประการที่สาม บันทึก และปิดหน้าต่าง
  • หลังจากนั้น เลือก เซลล์ C6 นี่คือ เซลล์ที่ใช้งานอยู่ ของเรา

  • จากนั้น เปิดกล่องโต้ตอบ มาโคร .
  • เลือก “ ToDown ”.
  • สุดท้าย คลิกที่ เรียกใช้ .

ดังนั้นเราจึง เลือก ช่วง จาก เซลล์ที่ใช้งานอยู่ โดยใช้ Excel VBA .

อ่านเพิ่มเติม: Excel VBA เพื่อวนซ้ำช่วงจนกระทั่งเซลล์ว่าง (4 ตัวอย่าง)

บทความที่คล้ายกัน

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

1.3. การใช้คุณสมบัติ End(xlToLeft)

ในส่วนนี้ เราจะเลือก ช่วง ทาง ซ้าย ของ เซลล์ที่ใช้งานอยู่ .

ขั้นตอน:

  • ประการแรก เรียกหน้าต่าง โมดูล ขึ้นมา
  • ประการที่สอง พิมพ์ รหัสต่อไปนี้
6094

เรากำลังเรียก ย่อย ขั้นตอน ToLeft จากนั้นเราจะเลือก ช่วง ค่าแรกคือ เซลล์ที่ใช้งานอยู่ ค่าสุดท้ายคือ ActiveCell.End(xlToLeft) . สุดท้าย เรากำลังเลือก ช่วง ด้วย ช่วง . เลือก เมธอด

  • ประการที่สาม บันทึก และปิดหน้าต่าง
  • หลังจากนั้น เลือก เซลล์ D7 นี่คือ เซลล์ที่ใช้งานอยู่ ของเรา

  • จากนั้น เปิดกล่องโต้ตอบ มาโคร .
  • เลือก “ ToLeft ”.
  • สุดท้าย คลิกที่ เรียกใช้ .

ดังนั้นเราจึง เลือก ช่วง จาก เซลล์ที่ใช้งานอยู่ โดยใช้ Excel VBA .

1.4. การนำคุณสมบัติ End(xlToRight) ไปใช้

ในส่วนนี้ เราจะเลือก ช่วง ไปทาง ด้านขวา ของ เซลล์ที่ใช้งานอยู่ .

ขั้นตอน:

  • ประการแรก เรียกหน้าต่าง โมดูล ขึ้นมา
  • ประการที่สอง พิมพ์ รหัสต่อไปนี้
5096

เรากำลังเรียก ขั้นตอนย่อย ToRight จากนั้นเราจะเลือก ช่วง ค่าแรกคือ เซลล์ที่ใช้งานอยู่ ค่าสุดท้ายคือ ActiveCell.End(xlToRight) สุดท้าย เรากำลังเลือก ช่วง ด้วย ช่วง . เลือก เมธอด

  • ประการที่สาม บันทึก และปิดหน้าต่าง
  • หลังจากนั้น เลือก เซลล์ C8 นี่คือ เซลล์ที่ใช้งานอยู่ ของเรา

  • จากนั้น เปิดกล่องโต้ตอบ มาโคร .
  • เลือก “ ไปทางขวา ”.
  • สุดท้าย คลิกที่ เรียกใช้ .

ดังนั้นเราจึง เลือก ช่วง จาก เซลล์ที่ใช้งานอยู่ โดยใช้ Excel VBA .

2. การใช้คุณสมบัติ Range.Offset ของ VBA เพื่อเลือกช่วงจากเซลล์ที่ใช้งานอยู่ การใช้ VBA ใน Excel

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

ขั้นตอน:

  • ประการแรก พิมพ์ รหัสต่อไปนี้ในหน้าต่าง โมดูล
3773

เราได้สร้าง ขั้นตอนย่อย การใช้ Offset จากนั้นเราจะเลือก ช่วง ค่าแรกคือ เซลล์ที่ใช้งานอยู่ ค่าสุดท้ายคือ ActiveCell.Offset (1,2) ด้วย คุณสมบัติออฟเซ็ต เรากำลังย้าย 1 แถวลง และ 2 คอลัมน์ ขวา สุดท้าย เรากำลังเลือก ช่วง ด้วย ช่วง . เลือก เมธอด

  • ประการที่สอง บันทึก และปิดหน้าต่าง
  • หลังจากนั้น เลือก เซลล์ B8 นี่คือ เซลล์ที่ใช้งานอยู่ ของเรา

  • จากนั้น เปิดกล่องโต้ตอบ มาโคร .
  • เลือก “ UsingOffset ”.
  • สุดท้าย คลิกที่ เรียกใช้ .

โดยสรุป เราได้ เลือก ช่วง จาก เซลล์ที่ใช้งานอยู่ นอกจากนี้ ขั้นตอนสุดท้ายควรมีลักษณะดังนี้

อ่านเพิ่มเติม: Excel VBA: รับช่วงของเซลล์ที่มีค่า (7 ตัวอย่าง)

3. เลือกช่วงจาก Active Cell โดยใช้ VBA ใน Excel โดยใช้คุณสมบัติ CurrentRegion

สำหรับวิธีสุดท้าย เราจะใช้คุณสมบัติ Range.CurrentRegion

ขั้นตอน:

  • ประการแรก พิมพ์ รหัสต่อไปนี้ในหน้าต่าง โมดูล
1976

เรากำลังเรียกขั้นตอน ย่อย ของเรา ภูมิภาค . จากนั้นเราจะเลือก ช่วง ด้วยคุณสมบัติ ภูมิภาคปัจจุบัน เรากำลังเลือก ช่วง จนถึง เซลล์ว่าง สุดท้าย เรากำลังเลือก ช่วง ด้วย ช่วง . เลือก เมธอด

  • ประการที่สอง บันทึก และกลับไปที่แผ่นงาน Excel
  • หลังจากนั้น เลือก เซลล์ C10 นี่คือ เซลล์ที่ใช้งานอยู่ ของเรา

  • จากนั้น เปิดกล่องโต้ตอบ มาโคร .
  • เลือก “ cRegion ”.
  • สุดท้าย คลิกที่ เรียกใช้ .

ดังนั้นเราจึง เลือก ช่วง จนถึง เซลล์ว่าง

ส่วนการปฏิบัติ

เราได้จัดทำชุดข้อมูลการปฏิบัติสำหรับแต่ละวิธีไว้ในไฟล์ Excel

สรุป

เรา ได้แสดงวิธีการ 3 ของ Excel VBA เลือกช่วง จาก เซลล์ที่ใช้งานอยู่ หากคุณประสบปัญหาในการทำความเข้าใจขั้นตอนต่างๆ โปรดแสดงความคิดเห็นด้านล่าง ขอบคุณที่อ่าน เก่งขึ้นเรื่อยๆ!

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