Loncat ke daftar isi utama

Bagaimana cara pergi ke baris kosong pertama atau terakhir di Excel?

Ini memakan waktu untuk menggulir dan pergi ke baris kosong pertama atau terakhir saat Anda mengerjakan lembar kerja yang besar. Pada artikel ini, saya memperkenalkan beberapa trik untuk dengan cepat pergi ke baris kosong pertama atau terakhir di Excel.

Pergi ke baris kosong pertama atau terakhir dengan VBA

Pergi ke baris atau kolom kosong terakhir dengan utilitas Select Last Rowide bagus3


Pergi ke baris kosong pertama atau terakhir dengan VBA

Berikut adalah dua VBA yang dapat membantu Anda dengan cepat pergi ke baris kosong pertama atau terakhir di lembar aktif, lakukan seperti di bawah ini.

1. tekan Alt + F11 kunci untuk mengaktifkan Microsoft Visual Basic untuk Aplikasi jendela. Lihat tangkapan layar:
doc pertama terakhir kosong 1

2. Lalu klik Menyisipkan > Modul dan tempel kode di bawah ini ke dalam skrip. Lihat tangkapan layar:

VBA: Pergi ke baris kosong pertama.

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 pertama terakhir kosong 2
doc pertama terakhir kosong 3

3. tekan F5 untuk menjalankan kode, dan dialog muncul untuk mengingatkan Anda agar memilih rentang untuk bekerja. Lihat tangkapan layar:
doc pertama terakhir kosong 4

4. klik OK. Sebuah dialog muncul untuk mengingatkan Anda referensi sel dari baris kosong pertama, lihat tangkapan layar:
doc pertama terakhir kosong 5

5. klik OK berulang kali untuk menutup Microsoft Excel dialog. Dan kemudian pergi ke Nama kotak, ketik A2 ke dalamnya, tekan Enter kunci, dan Anda akan pergi ke baris kosong pertama. Lihat tangkapan layar:
doc pertama terakhir kosong 6

olymp trade indonesiaTip: Jika Anda ingin pergi ke baris kosong terakhir, gunakan kode VBA di bawah ini, dan setelah Anda menekan F5 kunci, kursor langsung menuju ke baris kosong terakhir.

VBA: Pergi ke baris kosong terakhir

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

Note: VBA ini akan memilih sel kosong terakhir di Kolom A. Untuk memilih sel kosong terakhir di kolom lain, ubah 1 di kode Sel (Rows.Count, 1) ke nomor lain.


Pergi ke baris atau kolom kosong terakhir dengan utilitas Select Last Row

Jika Anda ingin pergi ke baris atau kolom kosong terakhir dengan cepat, Anda bisa menerapkan Kutools untuk Excel'S Baris terakhir or Kolom Terakhir utility. Dengan mereka, Anda bisa dengan cepat masuk ke sel terakhir yang tidak kosong dari baris atau kolom terakhir di lembar kerja saat ini, lalu sel berikutnya adalah baris kosong terakhir atau kolom kosong.

Kutools untuk Excel, dengan lebih dari 300 fungsi praktis, membuat pekerjaan Anda lebih mudah. 

Setelah menginstal Kutools for Excel, lakukan seperti di bawah ini:锛圲nduh Gratis Kutools untuk Excel Sekarang!)

Klik Kutools > Pilih > Pilih Sel Terakhir > Baris terakhir/Kolom Terakhir. Lihat tangkapan layar:

doc pertama terakhir kosong 7

Kemudian sel tidak kosong terakhir di baris (atau kolom) terakhir dipilih. Cukup tekan tombol panah bawah (atau tombol panah kanan) untuk mengaktifkan baris (atau kolom) kosong terakhir.


Artikel Relatif

Alat Produktivitas Kantor Terbaik

馃 Kutools AI Ajudan: Merevolusi analisis data berdasarkan: Eksekusi Cerdas   |  Hasilkan Kode  |  Buat Rumus Khusus  |  Analisis Data dan Hasilkan Grafik  |  Aktifkan Fungsi Kutools...
Fitur Populer: Temukan, Sorot, atau Identifikasi Duplikat   |  Hapus Baris Kosong   |  Gabungkan Kolom atau Sel tanpa Kehilangan Data   |   Putaran tanpa Formula ...
Pencarian Super: VLookup Beberapa Kriteria    VLookup Nilai Berganda  |   VLookup di Beberapa Lembar   |   Pencarian Fuzzy ....
Daftar Drop-down Lanjutan: Buat Daftar Drop Down dengan Cepat   |  Daftar Drop Down yang Bergantung   |  Multi-pilih Drop Down List ....
Manajer Kolom: Tambahkan Jumlah Kolom Tertentu  |  Pindahkan Kolom  |  Alihkan Status Visibilitas Kolom Tersembunyi  |  Bandingkan Rentang & Kolom ...
Fitur Unggulan: Fokus Kisi   |  Tampilan Desain   |   Bar Formula Besar    Manajer Buku Kerja & Lembar   |  Perpustakaan Sumberdaya (Teks otomatis)   |  Pemetik tanggal   |  Gabungkan Lembar Kerja   |  Enkripsi/Dekripsi Sel    Kirim Email berdasarkan Daftar   |  Filter Super   |   Filter Khusus (filter tebal/miring/coret...) ...
15 Perangkat Teratas12 Teks Tools (Tambahkan Teks, Hapus Karakter, ...)   |   50 + Grafik jenis (Gantt Chart, ...)   |   40+ Praktis Rumus (Hitung usia berdasarkan ulang tahun, ...)   |   19 Insersi Tools (Masukkan Kode QR, Sisipkan Gambar dari Jalur, ...)   |   12 Konversi Tools (Angka ke Kata, Konversi Mata Uang, ...)   |   7 Gabungkan & Pisahkan Tools (Lanjutan Gabungkan Baris, Pisahkan Sel, ...)   |   ... dan banyak lagi

Tingkatkan Keterampilan Excel Anda dengan Kutools for Excel, dan Rasakan Efisiensi yang Belum Pernah Ada Sebelumnya. Kutools for Excel Menawarkan Lebih dari 300 Fitur Lanjutan untuk Meningkatkan Produktivitas dan Menghemat Waktu.  Klik Di Sini untuk Mendapatkan Fitur yang Paling Anda Butuhkan...

Deskripsi Produk


Tab Office Membawa antarmuka Tab ke Office, dan Membuat Pekerjaan Anda Jauh Lebih Mudah

  • Aktifkan pengeditan dan pembacaan tab di Word, Excel, PowerPoint, Publisher, Access, Visio, dan Project.
  • Buka dan buat banyak dokumen di tab baru di jendela yang sama, bukan di jendela baru.
  • Meningkatkan produktivitas Anda sebesar 50%, dan mengurangi ratusan klik mouse untuk Anda setiap hari!
Comments (3)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
脫timo post, Resolveu meu problema:
Achando a primeira c茅lula vazia de determinada coluna de uma planilha.

Sub SelecionaPr贸ximaC茅lulaVazia()
Cells(Rows.Count, 2).End(xlUp).Offset(1, 0).Select
End Sub

Este VBA selecionar谩 a 煤ltima c茅lula vazia na coluna B. Para selecionar a 煤ltima c茅lula vazia em outra coluna, altere 2 no c贸digo Cells (Rows.Count, 2) para outro n煤mero.
This comment was minimized by the moderator on the site
Sub selectlastemptyrow()
Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Select
End Sub



How to try this on sheet2 from sheet1
This comment was minimized by the moderator on the site
Sub selectlastemptyrow()
Sheets("sheet2").Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Select
End Sub
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
Rate this post:
0   Characters
Suggested Locations