Note: The other languages of the website are Google-translated. Back to English

จะไปที่แถวแรกหรือแถวสุดท้ายใน Excel ได้อย่างไร?

ใช้เวลานานในการเลื่อนและไปที่แถวแรกหรือแถวสุดท้ายที่ว่างในขณะที่คุณกำลังทำงานกับแผ่นงานขนาดใหญ่ ในบทความนี้ผมจะแนะนำเทคนิคบางอย่างสำหรับการไปยังแถวแรกหรือแถวสุดท้ายใน Excel อย่างรวดเร็ว

ไปที่แถวแรกหรือแถวสุดท้ายที่ว่างด้วย VBA

ไปที่แถวหรือคอลัมน์สุดท้ายที่ว่างด้วยยูทิลิตี้ Select Last Rowความคิดที่ดี 3


ไปที่แถวแรกหรือแถวสุดท้ายที่ว่างด้วย VBA

นี่คือ VBA สองตัวที่ช่วยให้คุณไปที่แถวแรกหรือแถวสุดท้ายที่ว่างในแผ่นงานที่ใช้งานอยู่ได้อย่างรวดเร็วโปรดทำตามด้านล่าง

1 กด Alt + F11 คีย์เพื่อเปิดใช้งาน Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง. ดูภาพหน้าจอ:
doc แรกสุดท้ายว่างเปล่า 1

2 จากนั้นคลิก สิ่งที่ใส่เข้าไป > โมดูล และวางโค้ดด้านล่างลงในสคริปต์ ดูภาพหน้าจอ:

VBA: ไปที่แถวว่างแรก

Sub Findfirstblankcell()
'UpdatebyExtendoffice20170712
    Dim Rng As Range
    Dim WorkRng As Range
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    Set WorkRng = Application.Selection
    Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
    For Each Rng In WorkRng
        If Rng.Value = "" Then
            MsgBox "No Value, in " & Rng.Address
        End If
    Next
End Sub
doc แรกสุดท้ายว่างเปล่า 2
doc แรกสุดท้ายว่างเปล่า 3

3 กด F5 เพื่อเรียกใช้รหัสและกล่องโต้ตอบจะปรากฏขึ้นเพื่อเตือนให้คุณเลือกช่วงที่จะทำงาน ดูภาพหน้าจอ:
doc แรกสุดท้ายว่างเปล่า 4

4 คลิก OK. กล่องโต้ตอบจะปรากฏขึ้นเพื่อเตือนให้คุณทราบการอ้างอิงเซลล์ของแถวแรกที่ว่างเปล่าโปรดดูภาพหน้าจอ:
doc แรกสุดท้ายว่างเปล่า 5

5 คลิก OK ซ้ำ ๆ เพื่อปิดไฟล์ Microsoft Excel ไดอะล็อก แล้วไปที่ ชื่อ - นามสกุล พิมพ์ A2 ลงไปแล้วกด เข้าสู่ และคุณจะไปที่แถวแรกที่ว่าง ดูภาพหน้าจอ:
doc แรกสุดท้ายว่างเปล่า 6

เคล็ดลับ: หากคุณต้องการไปที่แถวสุดท้ายที่ว่างโปรดใช้รหัส VBA ด้านล่างและหลังจากที่คุณกดปุ่ม F5 เคอร์เซอร์จะไปที่แถวสุดท้ายโดยตรง

VBA: ไปที่แถวสุดท้ายที่ว่าง

Sub selectlastemptyrow()
Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Select
End Sub

หมายเหตุ: VBA นี้จะเลือกเซลล์ว่างสุดท้ายในคอลัมน์ A หากต้องการเลือกเซลล์ว่างสุดท้ายในคอลัมน์อื่นโปรดเปลี่ยน 1 ในโค้ด Cells (Rows.Count, 1) เป็นตัวเลขอื่น


ไปที่แถวหรือคอลัมน์สุดท้ายที่ว่างด้วยยูทิลิตี้ Select Last Row

หากคุณต้องการไปยังแถวหรือคอลัมน์สุดท้ายที่ว่างอย่างรวดเร็วคุณสามารถสมัครได้ Kutools สำหรับ Excel's แถวสุดท้าย or คอลัมน์สุดท้าย uความเอียง ด้วยวิธีนี้คุณสามารถไปที่เซลล์ที่ไม่ว่างสุดท้ายของแถวหรือคอลัมน์สุดท้ายในแผ่นงานปัจจุบันจากนั้นเซลล์ถัดไปคือแถวว่างสุดท้ายหรือคอลัมน์ว่าง

Kutools สำหรับ Excel, ที่มีมากกว่า 300 ฟังก์ชั่นที่มีประโยชน์ทำให้งานของคุณง่ายขึ้น 

หลังจากการติดตั้ง Kutools สำหรับ Excel โปรดทำดังนี้:(ดาวน์โหลด Kutools for Excel ฟรีทันที!)

คลิก Kutools > เลือก > เลือกเซลล์สุดท้าย > แถวสุดท้าย/คอลัมน์สุดท้าย. ดูภาพหน้าจอ:

doc แรกสุดท้ายว่างเปล่า 7

จากนั้นเซลล์ที่ไม่ว่างสุดท้ายในแถวสุดท้าย (หรือคอลัมน์) จะถูกเลือก เพียงกดแป้นลูกศรลง (หรือแป้นลูกศรขวา) เพื่อเปิดใช้งานแถวสุดท้าย (หรือคอลัมน์) ที่ว่างเปล่า


บทความสัมพัทธ์


เครื่องมือเพิ่มประสิทธิภาพการทำงานในสำนักงานที่ดีที่สุด

Kutools สำหรับ Excel แก้ปัญหาส่วนใหญ่ของคุณและเพิ่มผลผลิตของคุณได้ถึง 80%

  • นำมาใช้ใหม่: ใส่อย่างรวดเร็ว สูตรที่ซับซ้อนแผนภูมิ และสิ่งที่คุณเคยใช้มาก่อน เข้ารหัสเซลล์ ด้วยรหัสผ่าน; สร้างรายชื่อผู้รับจดหมาย และส่งอีเมล ...
  • ซุปเปอร์ฟอร์มูล่าบาร์ (แก้ไขข้อความและสูตรหลายบรรทัดได้อย่างง่ายดาย); การอ่านเค้าโครง (อ่านและแก้ไขเซลล์จำนวนมากได้อย่างง่ายดาย); วางลงในช่วงที่กรองแล้ว...
  • ผสานเซลล์ / แถว / คอลัมน์ โดยไม่สูญเสียข้อมูล แยกเนื้อหาของเซลล์ รวมแถว / คอลัมน์ที่ซ้ำกัน... ป้องกันเซลล์ซ้ำ; เปรียบเทียบช่วง...
  • เลือกซ้ำหรือไม่ซ้ำ แถว; เลือกแถวว่าง (เซลล์ทั้งหมดว่างเปล่า); Super Find และ Fuzzy Find ในสมุดงานจำนวนมาก สุ่มเลือก ...
  • สำเนาถูกต้อง หลายเซลล์โดยไม่เปลี่ยนการอ้างอิงสูตร สร้างการอ้างอิงอัตโนมัติ ถึงหลายแผ่น ใส่สัญลักษณ์แสดงหัวข้อย่อย, กล่องกาเครื่องหมายและอื่น ๆ ...
  • แยกข้อความ, เพิ่มข้อความ, ลบตามตำแหน่ง, ลบ Space; สร้างและพิมพ์ผลรวมย่อยของเพจ แปลงระหว่างเนื้อหาของเซลล์และความคิดเห็น...
  • ซุปเปอร์ฟิลเตอร์ (บันทึกและใช้โครงร่างตัวกรองกับแผ่นงานอื่น ๆ ); การเรียงลำดับขั้นสูง ตามเดือน / สัปดาห์ / วันความถี่และอื่น ๆ ตัวกรองพิเศษ โดยตัวหนาตัวเอียง ...
  • รวมสมุดงานและแผ่นงาน; ผสานตารางตามคอลัมน์สำคัญ แยกข้อมูลออกเป็นหลายแผ่น; Batch แปลง xls, xlsx และ PDF...
  • คุณสมบัติที่ทรงพลังมากกว่า 300 รายการ. รองรับ Office/Excel 2007-2021 และ 365 รองรับทุกภาษา ง่ายต่อการปรับใช้ในองค์กรหรือองค์กรของคุณ คุณสมบัติเต็มรูปแบบ ทดลองใช้ฟรี 30 วัน รับประกันคืนเงินภายใน 60 วัน
kte แท็บ 201905

แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก

  • เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
  • เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
  • เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!
ด้านล่าง officetab
จัดเรียงความคิดเห็นโดย
ความคิดเห็น (3)
ยังไม่มีการให้คะแนน เป็นคนแรกที่ให้คะแนน!
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ย่อย selectlasttemptyrow()
เซลล์(Rows.Count, 1).End(xlUp).Offset(1, 0).Select
ย่อยสิ้นสุด



วิธีลองใช้กับแผ่นที่ 2 จากแผ่นที่ 1
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ย่อย selectlasttemptyrow()
ชีต("sheet2")).Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Select
ย่อยสิ้นสุด
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
Ótimo โพสต์, แก้ไขปัญหา meu:
Achando a primeira célula vazia de determinada coluna de uma planilha.

Sub SelecionaProximaCélulaVazia()
เซลล์(Rows.Count, 2).End(xlUp).Offset(1, 0).Select
ย่อยสิ้นสุด

Este VBA เลือกจาก última célula vazia na coluna B. เลือกรายการจาก última célula vazia em outra coluna, เปลี่ยนแปลง 2 ไม่มี código Cells (Rows.Count, 2) สำหรับหมายเลขอื่น
มีความคิดเห็นยังไม่มีการโพสต์ที่นี่
แสดงความคิดเห็นของคุณ
โพสต์ในฐานะแขก
×
ให้คะแนนโพสต์นี้:
0   ตัวอักษร
สถานที่แนะนำ

ช่องทางอื่นๆ

ลิขสิทธิ์© 2009 - wwwextendoffice.com | สงวนลิขสิทธิ์. ขับเคลื่อนโดย ExtendOffice. | แผนผังเว็บไซต์
Microsoft และโลโก้ Office เป็นเครื่องหมายการค้าหรือเครื่องหมายการค้าจดทะเบียนของ Microsoft Corporation ในสหรัฐอเมริกาและ / หรือประเทศอื่น ๆ
ได้รับการปกป้องโดย Sectigo SSL