Daptar eusi
Dina VBA anjeun tiasa nganggo metode anu béda pikeun milarian barisan anu terakhir. Dina artikel ieu, kuring bakal ngajelaskeun métode béda tina VBA manggihan baris panungtungan di Excel.
Sangkan katerangan ieu katingali, abdi bade nganggo set data sampel. Aya 4 kolom dina set data anu ngagambarkeun inpormasi penjualan. Kolom ieu nyaéta Penjualan, Wewengkon, Produk, jeung Harga .
Unduh Pikeun Praktek
VBA Find Last Row.xlsm
Cara VBA Find Last Row dina Excel
1. Ngagunakeun SpecialCells Pikeun Milarian Baris Panungtungan
Anjeun tiasa nganggo metode SpecialCells pikeun milarian baris terakhir nganggo VBA .
Kahiji, buka Developer tab >> teras pilih Visual Basic
Jandela anyar Microsoft Visual Basic for Applications bakal muncul.
Ayeuna, ti Selapkeun >> pilih Modul
A Modul bakal dibuka.
Terus tuliskeun kodeu ieu dina Modul .
2526
Di dieu, kuring geus nyieun subprosedur anu disebut LastRow_SpecialCells , dimana tipe Long tina variabel LastRow geus didéklarasikeun.
Terus dihartikeun variabel maké métode Range.SpecialCells . Di dieu, kuring geus ngagunakeun kolom A ( A:A ) salaku rentang. Disadiakeun xlCellTypeLastCell salaku parameter tipe SpecialCells , ieu bakal mulangkeun sél panungtungan pikeun rentang (pikeun hal ieu, ti kolom A ).
Kuring geus ngagunakeun kotak pesen pikeun mintonkeun hasilna.
Sanggeus éta, Simpen kode jeung balik deui ka lembar kerja.
Deui, buka tab Témbongkeun >> ti Macros >> pilih Témbongkeun Makro
Teras, hiji kotak dialog bakal muncul.
Ayeuna, tina Nami makro pilih LastRow_SpecialCells ogé pilih buku kerja dina Macros in .
Ahirna, Jalankeun Makro nu dipilih.
Ku kituna, kotak pesen bakal muncul nu mintonkeun nomer baris panungtungan.
2. Ngagunakeun Rows.Count pikeun Sél Non-Kosong
Anjeun bisa maké métode Rows.Count pikeun manggihan baris panungtungan maké VBA .
Ayeuna, buka tab Developer >> teras pilih Visual Basic
Jandela anyar Microsoft Visual Basic for Applications bakal muncul.
Ayeuna, ti Selapkeun >> pilih Modul
A Modul bakal dibuka.
Terus tuliskeun kodeu ieu dina Modul .
5033
Di dieu, kuring geus nyieun subprosedur anu disebut LastRow_NonEmpty, dimana tipe variabel Long LastRow geus dinyatakeun.
Ayeuna, CELLS(Rows.Count, 1) bakal ngitung sabaraha baris dina kolom kahiji. Teras dianggo End(xlUp).Row ayeuna ieu bakal mendakan baris terakhir anu dianggo dina rentang Excel.
Tungtungna, kuring parantos nganggo kotak pesen pikeun nunjukkeunhasilna.
Terus, Simpen kode jeung balik deui ka lembar kerja.
Di dieu, buka tab Témbongkeun >> ti Macros >> pilih Témbongkeun Makro
Ayeuna, hiji kotak dialog bakal muncul.
Lajeng, tina Ngaran Makro pilih LastRow_NonEmpty oge pilih buku kerja dina Macros in .
Ahirna, Jalankeun Makro nu dipilih.
Ku kituna, kotak pesen bakal muncul nu mintonkeun nomer baris panungtungan.
3. Ngagunakeun Rows.Count pikeun Sakur Kolom nu Dipilih
Ku ngagunakeun kolom nu mana wae nu dipilih dina VBA, anjeun bisa manggihan baris panungtung.
Mimiti , buka tab Developer >> teras pilih Visual Basic
Jandela anyar Microsoft Visual Basic for Applications bakal muncul.
Ayeuna, ti Selapkeun >> pilih Modul
A Modul bakal dibuka.
Terus tuliskeun kodeu ieu dina Modul .
7962
Di dieu, kuring geus nyieun subprosedur anu disebut LastRow_AnyColumn, dimana tipe variabel Long LastRow geus dinyatakeun.
Lajeng, dina Rentang dibikeun kolom B salaku parameter sarta ogé Rows.Count , ieu bakal ngitung sabaraha baris anu aya dina kolom B . Salajengna, dipaké Tungtung(xlup). Baris nu bakal manggihan baris panungtungan dipaké dina rentang Excel.
Panungtungan, kuring geus ngagunakeun kotak pesen pikeun mintonkeunhasilna.
Salajengna, Simpen kode jeung balik deui ka lembar kerja.
Teras, buka tab Témbongkeun >> ti Macros >> pilih Témbongkeun Makro
Di dieu, hiji kotak dialog bakal muncul.
Ayeuna, tina Ngaran Makro pilih LastRow_AnyColumn oge pilih buku kerja dina Macros in .
Ahirna, Jalankeun Makro nu dipilih.
Ku kituna, kotak pesen bakal muncul nu mintonkeun nomer baris panungtungan.
Bacaan Sarupa:
- VBA Find in Column in Excel (7 Approach)
- Panggihan jeung Ganti Maké VBA (11 Cara)
- Teangan Cocog Pasti Nganggo VBA dina Excel (5 Cara)
- Kumaha Milarian String sareng VBA dina Excel (8 Conto)
4. Ngagunakeun UsedRange pikeun Milarian Baris Panungtungan
Anjeun tiasa nganggo properti UsedRange tina lembar kerja pikeun milarian anu terakhir baris maké VBA .
Ayeuna, buka tab Developer >> teras pilih Visual Basic
Teras, jandela anyar Microsoft Visual Basic for Applications bakal muncul.
Ayeuna, ti Selapkeun >> pilih Modul
A Modul bakal dibuka.
Teras, tuliskeun kodeu ieu dina Modul .
2890
Di dieu, kuring geus nyieun subprosedur anu disebut LastRow_UsedRange, dimana tipe variabel Long LastRow geus dinyatakeun.
Salajengna, ditetepkeunvariabel ngagunakeun métode ActiveSheet.UsedRange.Rows ogé disadiakeun ActiveSheet.UsedRange.Rows.Count salaku parameter tina ActiveSheet.UsedRange.Rows , ieu bakal mulangkeun baris panungtungan.
Kuring geus maké kotak pesen pikeun mintonkeun hasilna.
Ayeuna, Simpen kode jeung balik deui ka lembar kerja.
Teras, buka tab Témbongkeun >> ti Macros >> pilih Témbongkeun Makro
Salajengna, hiji kotak dialog bakal muncul.
Teras, ti Makro nami pilih LastRow_UsedRange ogé pilih buku kerja dina Macros in .
Ahirna, Jalankeun nu dipilih Makro .
Ku kituna, bakal muncul kotak pesen nu mintonkeun nomer baris panungtungan.
5. Ngagunakeun Range.Find to Find Last Baris
Anjeun tiasa nganggo metode Range.Find pikeun milarian baris terakhir nganggo VBA .
Ayeuna, buka Pamekar tab >> teras pilih Visual Basic
Di dieu, jandela anyar Microsoft Visual Basic for Applications bakal muncul.
Ayeuna, ti Selapkeun >> pilih Modul
A Modul bakal dibuka.
Terus tuliskeun kodeu ieu dina Modul .
6035
Di dieu, kuring geus nyieun subprosedur anu disebut Range_Find_Method, dimana tipe variabel Long LastRow geus dinyatakeun. .
Terus dihartikeun variabel ngagunakeun métode Cells.Find . Di dieu, nyatakeun 7paraméter. Dina Naon parameter anu kuring dianggo ("*") anu bakal mendakan sél non-kosong munggaran. Dibikeun A1 salaku rentang dina Sanggeus parameter pikeun ngamimitian. Dina LookAt parameter anu disayogikeun xlPart pikeun ningali bagian mana waé téks dina sél.
LookIn:=xlFormulas parameter bakal milarian rumus lamun aya wae. SearchOrder:=xlByRows parameter bakal pindah ka katuhu-ka-kénca sarta ogé ngagulung ka luhur unggal baris nepi ka manggihan sél nu teu kosong.
MatchCase:=False parameter bakal ngabejaan Panggihan teu mertimbangkeun hurup gede atawa leutik. Lamun kapanggih non-kosong, éta eureun sarta mulangkeun nomer baris.
Kuring geus ngagunakeun kotak pesen pikeun nembongkeun hasilna.
Ayeuna, Simpen kode teras balik deui ka lembar kerja.
Di dieu, buka tab Témbongkeun >> ti Macros >> pilih Témbongkeun Makro
Ayeuna, hiji kotak dialog bakal muncul.
Ayeuna, tina Ngaran makro pilih Range_Find_Method pilih oge lembar kerja dina Macros in .
Ahirna, Jalankeun Makro nu dipilih.
Ku kituna, kotak pesen bakal muncul nu mintonkeun nomer baris panungtungan.
Kacindekan
Dina artikel ieu, kuring geus ngajelaskeun 5 cara pikeun VBA neangan baris panungtungan dina Excel. Anjeun tiasa nuturkeun salah sahiji metodeu pikeun manggihan baris panungtungan. Upami anjeun gaduh kabingungan atanapi patarosan ngeunaan metode ieu anjeun tiasamairan di handap.