วิธีใช้ 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 วิธีการเลือกจะค้นหาแถวสุดท้ายของสเปรดชีตไปที่แถวนั้นและไฮไลต์