วิธีใช้ VBA เพื่อไปที่แถวสุดท้ายในแผ่นงาน Excel
หนึ่งในสิ่งที่ยอดเยี่ยมเกี่ยวกับ Microsoft Excel คือความสามารถในการสร้างฟังก์ชันที่มีประโยชน์โดยอัตโนมัติ เมื่อสเปรดชีตธุรกิจมีแถวหลายร้อยหรือหลายพันแถวคุณอาจพบว่าการเคลื่อนย้ายผ่านเซลล์ทำได้ยาก ขจัดปัญหานี้ด้วยการสร้างฟังก์ชันการค้นหาของคุณเอง ด้วยการใช้โค้ดไม่กี่บรรทัดคุณสามารถสร้าง VBA Sub ที่ค้นหาแถวสุดท้ายในสเปรดชีตและไปที่แถวนั้นโดยอัตโนมัติ
1
เปิด Excel และเปิดสเปรดชีตที่มีหลายคอลัมน์
2
กด“ Alt-F11” เพื่อเปิดตัวแก้ไข“ Visual Basic” แล้วคลิก“ แทรก | โมดูล." VBA เพิ่มโมดูลใหม่ในหน้าต่างโครงการ
3
วางรหัสต่อไปนี้ลงในหน้าต่างแก้ไขที่ปรากฏทางด้านขวาของหน้าต่างโครงการ:
Sub SelectLastRow () Dim finalRow As Integer
finalRow = ActiveSheet.UsedRange.Rows.Count
ถ้า finalRow = 0 แล้ว finalRow = 1 End If
แถว (finalRow) เลือก End Sub
Sub นี้กำหนดแถวสุดท้ายของสเปรดชีตโดยการตรวจสอบคุณสมบัติ Count ของคอลเลกชันแถว จากนั้น Sub จะเก็บค่านั้นไว้ในตัวแปร finalRow คำสั่งสุดท้ายของ Sub ส่งผ่านค่าของ finalRow ไปยังเมธอด VBA Select
4
กด“ F5” เพื่อเรียกใช้ Sub วิธีการเลือกจะค้นหาแถวสุดท้ายของสเปรดชีตไปที่แถวนั้นและไฮไลต์