Temukan Baris Terakhir dengan Data dalam Rentang Menggunakan Makro Excel VBA (7 Metode)

  • Bagikan Ini
Hugh West

Saat bekerja dengan Microsoft Excel, menemukan baris atau kolom terakhir adalah tugas yang umum. Kami menggunakan keyboard untuk menemukan baris atau kolom yang terakhir digunakan. Namun, Anda mungkin menemukan diri Anda dalam situasi di mana Anda perlu menemukan baris yang terakhir digunakan dari kumpulan data yang kompleks. Dalam tutorial ini, Anda akan belajar menemukan baris terakhir dengan data dalam suatu rentang menggunakan VBA di Excel dengan contoh praktis dan ilustrasi yang tepat.

Unduh Buku Kerja Praktik

Unduh buku kerja latihan ini.

Temukan Baris Terakhir yang Digunakan dalam Range.xlsm

7 Metode untuk Menemukan Baris Terakhir dengan Data dalam Rentang Menggunakan Makro Excel VBA

Di bagian yang akan datang, kami akan memberi Anda tujuh metode yang akan membantu Anda menemukan baris terakhir dengan data dalam rentang menggunakan VBA di Excel. Kami menyarankan Anda mempelajari dan menerapkan semua metode ini untuk memperkaya pengetahuan Excel Anda.

📕 Baca lebih lanjut : Temukan Sel Terakhir Dengan Nilai dalam Baris di Excel (6 Metode)

Untuk mendemonstrasikan tutorial ini, kita akan menggunakan dataset ini:

Di sini, kami memiliki dataset yang terdiri dari beberapa informasi pemain. Kami akan menggunakan ini untuk mengajarkan Anda semua metode.

Buka Editor VBA

Sebelum kita mulai, di sini kami usia memberi Anda pengingat sederhana untuk membuka Editor VBA di Excel.

Pertama, tekan Alt+F11 pada keyboard Anda. Kemudian, pilih Sisipkan> Modul. Setelah itu, ini akan membuka editor VBA Excel.

1. Penggunaan Properti Range.End untuk Menemukan Baris Terakhir dengan Data dalam Rentang Menggunakan VBA

Sekarang, metode ini pada dasarnya menemukan akhir dari suatu rentang. Terutama, rentang sel yang terakhir digunakan. Kita dapat menggunakan metode ini untuk menemukan baris terakhir dengan data dalam rentang tertentu. Menggunakan VBA akan memberi Anda hasil yang diinginkan.

📌 Langkah-langkah

Pertama, buka VBA Editor.

Kemudian, ketikkan kode berikut ini:

 Sub range_end_method() Dim sht As Worksheet Dim LastRow As Long Set sht = ActiveSheet LastRow = Range("B4").End(xlDown).Row MsgBox "Baris terakhir yang digunakan: " & LastRow End Sub 

Sekarang, simpan file tersebut. Kemudian, tekan Alt+F8 untuk membuka kotak dialog Makro. Pilih range_end_method

Setelah itu, klik Run.

Seperti yang Anda lihat, kami telah berhasil menemukan baris terakhir dengan data dalam suatu rentang menggunakan VBA di Excel.

2. Range.Find Properti VBA di Excel

Sekarang, dalam VBA kita menggunakan metode Range.Find untuk mencari nilai tertentu dari dataset. Tetapi metode ini berguna untuk menemukan baris terakhir dengan data dalam suatu rentang. Ini berfungsi seperti kotak dialog Find & Replace dari Excel. Range. Metode Find memiliki banyak argumen. Tapi kami tidak akan menggunakan semuanya.

Sebelum kita menggunakan metode Range.Find, mari kita beri Anda sepotong informasi singkat:

Cells.Find("*", urutan pencarian:=xlByRows, arah pencarian:=xlPrevious)

Apa := "*" - Tanda bintang adalah karakter wildcard yang menemukan teks atau angka apa pun di dalam sel. Ini pada dasarnya sama dengan menjelajahi sel yang tidak kosong.

Urutan Pencarian:= xlByRows - Ini berarti mencari melalui setiap baris sebelum pindah ke baris berikutnya. Arahnya dicari dari kiri ke kanan atau kanan ke kiri tergantung pada argumen SearchDirection. Opsi tambahan di sini adalah xlByColumns, yang digunakan saat mencari kolom terakhir.

ArahPencarian:=xlSebelumnya - Ini menentukan arah mana yang akan dijelajahi. xlPrevious berarti akan mencari dari kanan-ke-kiri atau dari bawah-ke-atas. Alternatif lainnya adalah xlNext yang bergeser ke arah yang berlawanan.

📌 Langkah-langkah

Pertama, buka Editor VBA.

Kemudian, ketikkan kode berikut ini:

 Sub range_find_method() Dim sht As Worksheet Dim LastRow As Long Set sht = ActiveSheet LastRow = sht.Cells.Find("*", searchorder:=xlByRows, searchdirection:=xlPrevious).Row MsgBox "Baris terakhir yang digunakan: " & LastRow End Sub 

Sekarang, simpan file tersebut. Kemudian, tekan Alt+F8 untuk membuka kotak dialog Macro. Pilih range_find_method.

Setelah itu, klik pada Lari .

Pada akhirnya, ini akan menemukan baris terakhir dengan data di lembar kerja Excel kita.

3. Menggunakan Fungsi SpecialCells untuk Menemukan Baris Terakhir Menggunakan VBA

Metode ini berfungsi seperti menekan Ctrl + End Saat Anda menekan Ctrl + End pada keyboard Anda, itu akan selalu membawa Anda ke baris terakhir di mana pun Anda berada. Tetapi jika Anda ingin menemukan baris terakhir yang digunakan dengan data menggunakan kode VBA di Excel, kode ini adalah suatu keharusan bagi Anda.

📌 Langkah-langkah

Pertama, buka Editor VBA.

Kemudian, ketikkan kode berikut ini:

 Sub specialcells_method() Dim sht As Worksheet Dim LastRow As Long Set sht = ActiveSheet LastRow = sht.Cells.SpecialCells(xlCellTypeLastCell).Row MsgBox "Baris terakhir yang digunakan: " & LastRow End Sub 

Sekarang, simpan file tersebut. Kemudian, tekan Alt+F8 untuk membuka kotak dialog Macro. Pilih metode_sel_khusus .

Setelah itu, klik pada Lari .

Seperti yang Anda lihat, kami berhasil menemukan baris terakhir dengan data menggunakan VBA di Excel.

4. Menggunakan Fungsi UsedRange untuk Menemukan Baris Terakhir dengan Data dalam Rentang

The UsedRange dalam VBA adalah kepemilikan lembar kerja yang mengembalikan objek rentang yang mewakili rentang yang digunakan (semua sel Excel yang digunakan atau dimuat dalam lembar kerja) pada lembar kerja tertentu. Ini adalah properti yang berarti area yang dicakup atau ditentukan oleh sel yang digunakan kiri atas dan sel yang digunakan kanan terakhir di lembar kerja.

📌 Langkah-langkah

Pertama, buka Editor VBA.

Kemudian, ketikkan kode berikut ini:

 Sub usedRange_method() Dim sht As Worksheet Dim LastRow As Long Set sht = ActiveSheet LastRow = sht.UsedRange.Rows(sht.UsedRange.Rows.Count).Row MsgBox "Baris terakhir yang digunakan: " & LastRow End Sub 

Sekarang, simpan file tersebut. Kemudian, tekan Alt+F8 untuk membuka kotak dialog Macro. Pilih metode_jangkauan_yang digunakan.

Setelah itu, klik pada Lari .

Terakhir, Anda akan melihat baris terakhir yang digunakan pada lembar kerja di Excel dengan sukses.

5. Menggunakan Rentang Tabel menggunakan VBA di Excel

Jika Anda memiliki tabel di lembar kerja Anda, Anda dapat menemukan baris terakhir dengan data dengan metode ini.

📌 Langkah-langkah

Pertama, buka Editor VBA.

Kemudian, ketikkan kode berikut ini:

 Sub TableRange_method() Dim sht As Worksheet Dim LastRow As Long Set sht = ActiveSheet LastRow = sht.ListObjects("Table1").Range.Rows.Count + 3 MsgBox "Baris terakhir yang digunakan: " & LastRow End Sub 

Catatan : Di sini, kita menambahkan 3 dengan baris terakhir karena dataset kita dimulai setelah baris 3.

Sekarang, simpan file tersebut. Kemudian, tekan Alt+F8 untuk membuka kotak dialog Macro. Pilih Metode TabelRange_method.

Setelah itu, klik pada Lari .

Seperti yang Anda lihat, kami telah berhasil menggunakan metode rentang tabel dalam kode VBA untuk menemukan baris terakhir dengan data di Excel.

6. Penggunaan Rentang Bernama untuk Menemukan Baris Terakhir dengan Data dalam Rentang

Metode ini tidak umum digunakan di Excel. Tapi, kami pikir Anda harus mempelajarinya untuk memperkaya pengetahuan Anda.

Jika dataset Anda memiliki rentang bernama, Anda dapat menggunakan kode ini. Lihatlah tangkapan layar berikut. Ini memiliki rentang bernama di dalamnya.

📌 Langkah-langkah

Pertama, buka Editor VBA.

Kemudian, ketikkan kode berikut ini:

 Sub nameRange_method() Dim sht As Worksheet Dim LastRow As Long Set sht = ActiveSheet LastRow = sht.Range("Named_Range").Rows.Count + 1 MsgBox "baris terakhir yang digunakan: " & LastRow End Sub 

Catatan : Kita menambahkan 1 ke LastRow karena range kita dimulai setelah baris 1.

Sekarang, simpan file tersebut. Kemudian, tekan Alt+F8 untuk membuka kotak dialog Makro. Pilih namaRange_method.

Setelah itu, klik Run.

Seperti yang Anda lihat, kita berhasil menemukan baris terakhir dengan data menggunakan VBA.

7. Fungsi CurrentRegion dari VBA di Excel

Anda juga dapat menggunakan metode CurrentRegion dari VBA untuk menemukan baris yang terakhir digunakan di Excel. Meskipun rumit, Anda dapat menggunakan ini untuk keuntungan Anda jika Anda mau.

📌 Langkah-langkah

Pertama, buka Editor VBA.

Kemudian, ketikkan kode berikut ini:

 Sub CurrentRegion_method() Dim sht As Worksheet Dim LastRow As Long Set sht = ActiveSheet LastRow = sht.Range("B4").CurrentRegion.Rows.Count + 3 'tambahkan angka sesuai dengan pilihan anda' MsgBox "Baris terakhir yang digunakan: " & LastRow End Sub 

Catatan Dan tambahkan nomor baris sesuai dengan pilihanmu. Di sini, kita menambahkan 3 karena dataset kita dimulai setelah baris ke-3.

Sekarang, simpan file tersebut. Kemudian, tekan Alt+F8 untuk membuka kotak dialog Macro. Pilih Metode_Wilayah_Arus

Setelah itu, klik Run.

Seperti yang Anda lihat, kita telah berhasil menemukan baris terakhir dengan data menggunakan kode VBA.

💬 Hal-hal yang Perlu Diingat

Range.End hanya bekerja pada satu baris atau kolom. Jika dataset Anda berisi banyak sel kosong, maka akan sulit untuk menemukan baris terakhir dengan data.

Terkadang, kamu harus menambahkan beberapa nilai pada methodmu untuk menjalankan kodenya dengan lancar. Kita menambahkan nomor baris untuk menemukan cell terakhir. Jadi, kamu harus mengingat dari mana datasetmu dimulai.

Kesimpulan

Sebagai penutup, saya harap tutorial ini telah memberi Anda sepotong pengetahuan yang berguna untuk menemukan baris terakhir dengan data dalam suatu rentang menggunakan VBA di Excel. Kami menyarankan Anda mempelajari dan menerapkan semua instruksi ini ke kumpulan data Anda. Unduh buku kerja latihan dan coba sendiri. Juga, jangan ragu untuk memberikan umpan balik di bagian komentar. Umpan balik Anda yang berharga membuat kami termotivasi untuk membuat tutorial seperti ini.

Jangan lupa untuk memeriksa situs web kami Exceldemy.com untuk berbagai masalah dan solusi terkait Excel.

Teruslah mempelajari metode baru dan teruslah berkembang!

Hugh West adalah pelatih dan analis Excel yang sangat berpengalaman dengan pengalaman lebih dari 10 tahun di industri ini. Beliau meraih gelar Sarjana di bidang Akuntansi dan Keuangan dan gelar Master di bidang Administrasi Bisnis. Hugh memiliki hasrat untuk mengajar dan telah mengembangkan pendekatan pengajaran unik yang mudah diikuti dan dipahami. Pengetahuan ahlinya tentang Excel telah membantu ribuan siswa dan profesional di seluruh dunia meningkatkan keterampilan dan unggul dalam karier mereka. Melalui blognya, Hugh membagikan pengetahuannya kepada dunia, menawarkan tutorial Excel gratis dan pelatihan online untuk membantu individu dan bisnis mencapai potensi penuh mereka.