Talaan ng nilalaman
Sa VBA maaari kang gumamit ng iba't ibang paraan upang mahanap ang huling row. Sa artikulong ito, ipapaliwanag ko ang iba't ibang paraan ng paghahanap ng VBA sa huling row sa Excel.
Upang gawing nakikita ang paliwanag na ito, gagamit ako ng sample na dataset. Mayroong 4 na column sa dataset na kumakatawan sa impormasyon ng mga benta. Ang mga column na ito ay Tao ng Pagbebenta, Rehiyon, Produkto, at Presyo .
I-download Para Magsanay
VBA Find Last Row.xlsm
Mga Paraan para VBA Find Last Row sa Excel
1. Paggamit ng SpecialCells para Hanapin ang Huling Row
Maaari mong gamitin ang SpecialCells na paraan upang mahanap ang huling row gamit ang VBA .
Una, buksan ang Developer tab >> pagkatapos ay piliin ang Visual Basic
Isang bagong window ng Microsoft Visual Basic for Applications ang lalabas.
Ngayon, mula sa Insert >> piliin ang Module
Isang Module ang bubuksan.
Pagkatapos ay isulat ang sumusunod na code sa Module .
6744
Dito, nakagawa ako ng sub procedure na tinatawag na LastRow_SpecialCells , kung saan ang isang Long type ng variable na LastRow ay naideklara na.
Pagkatapos ay tinukoy ang variable gamit ang Range.SpecialCells na pamamaraan. Dito, ginamit ko ang column A ( A:A ) bilang range. Ibinigay ang xlCellTypeLastCell bilang uri ng parameter ng SpecialCells , ibabalik nito ang huling cell para sa hanay (para sa kasong ito, mula sa column A ).
Gumamit ako ng message box para ipakita ang resulta.
Pagkatapos noon, I-save ang code at bumalik sa worksheet.
Muli, buksan ang View tab >> mula sa Macros >> piliin ang View Macros
Pagkatapos, isang dialog box ay lalabas.
Ngayon, mula sa Macro name piliin ang LastRow_SpecialCells piliin din ang workbook sa loob ng Macros in .
Sa wakas, Patakbuhin ang ang napiling Macro .
Kaya, mag-pop up ito ng message box na nagpapakita ng huling row number.
2. Paggamit ng Rows.Count para sa Mga Non-Empty na Cell
Maaari mong gamitin ang Rows.Count na paraan upang mahanap ang huling row gamit ang VBA .
Ngayon, buksan ang tab na Developer >> pagkatapos ay piliin ang Visual Basic
Isang bagong window ng Microsoft Visual Basic for Applications ang lalabas.
Ngayon, mula sa Insert >> piliin ang Module
Isang Module ang bubuksan.
Pagkatapos ay isulat ang sumusunod na code sa Module .
1617
Dito, nakagawa ako ng sub procedure na tinatawag na LastRow_NonEmpty, kung saan ang isang Long na uri ng variable LastRow Naideklara ang .
Ngayon, bibilangin ng CELLS(Rows.Count, 1) kung ilang row ang naroon sa unang column. Pagkatapos ay ginamit ang End(xlUp).Row ngayon ay makikita nito ang huling ginamit na row sa isang hanay ng Excel.
Sa huli, gumamit ako ng kahon ng mensahe upang ipakita angresulta.
Pagkatapos, I-save ang code at bumalik sa worksheet.
Dito, buksan ang tab na View >> mula sa Macros >> piliin ang View Macros
Ngayon, isang dialog box ay lalabas.
Pagkatapos, mula sa Macro name piliin ang LastRow_NonEmpty piliin din ang workbook sa loob ng Macros in .
Sa wakas, Patakbuhin ang ang napiling Macro .
Kaya, mag-pop up ito ng message box na nagpapakita ng huling row number.
3. Paggamit ng Rows.Count para sa Anumang Napiling Column
Sa pamamagitan ng paggamit ng anumang napiling column sa VBA, makikita mo ang huling row.
Una , buksan ang tab na Developer >> pagkatapos ay piliin ang Visual Basic
Isang bagong window ng Microsoft Visual Basic for Applications ang lalabas.
Ngayon, mula sa Insert >> piliin ang Module
Isang Module ang bubuksan.
Pagkatapos ay isulat ang sumusunod na code sa Module .
7970
Dito, nakagawa ako ng sub procedure na tinatawag na LastRow_AnyColumn, kung saan ang isang Long na uri ng variable LastRow Naideklara ang .
Pagkatapos, sa Range binigay ang column B bilang parameter at gayundin Rows.Count , ito bibilangin kung gaano karaming mga row ang naroroon sa isang naibigay na column B . Susunod, ginamit ang End(xlup). Row na makikita ang huling ginamit na row sa isang Excel range.
Sa huli, gumamit ako ng message box para ipakita angresulta.
Susunod, I-save ang code at bumalik sa worksheet.
Pagkatapos, buksan ang tab na View >> mula sa Macros >> piliin ang View Macros
Dito, isang dialog box ay lalabas.
Ngayon, mula sa Macro name piliin ang LastRow_AnyColumn piliin din ang workbook sa loob ng Macros in .
Sa wakas, Patakbuhin ang ang napiling Macro .
Kaya, mag-pop up ito ng message box na nagpapakita ng huling row number.
Mga Katulad na Pagbasa:
- VBA Find in Column sa Excel (7 Approaches)
- Hanapin at Palitan Gamit ang VBA (11 Mga Paraan)
- Hanapin ang Eksaktong Tugma Gamit ang VBA sa Excel (5 Mga Paraan)
- Paano Maghanap ng String gamit ang VBA sa Excel (8 Halimbawa)
4. Paggamit ng UsedRange para Hanapin ang Huling Hilera
Maaari mong gamitin ang UsedRange property ng worksheet para mahanap ang huling row gamit ang VBA .
Ngayon, buksan ang Developer tab >> pagkatapos ay piliin ang Visual Basic
Pagkatapos, lalabas ang isang bagong window ng Microsoft Visual Basic for Applications .
Ngayon, mula sa Ipasok ang >> piliin ang Module
Isang Module ang bubuksan.
Pagkatapos, isulat ang sumusunod na code sa Module .
5194
Dito, nakagawa ako ng sub procedure na tinatawag na LastRow_UsedRange, kung saan ang isang Long na uri ng variable Naideklara ang LastRow .
Susunod, tinukoy angvariable gamit ang ActiveSheet.UsedRange.Rows method ay nagbigay din ng ActiveSheet.UsedRange.Rows.Count bilang parameter ng ActiveSheet.UsedRange.Rows , ibabalik nito ang huling row.
Gumamit ako ng message box para ipakita ang resulta.
Ngayon, I-save ang code at bumalik sa worksheet.
Pagkatapos, buksan ang tab na View >> mula sa Macros >> piliin ang View Macros
Susunod, isang dialog box ay lalabas.
Pagkatapos, mula sa Macro pangalan piliin ang LastRow_UsedRange piliin din ang workbook sa loob ng Macros in .
Sa wakas, Patakbuhin ang napiling Macro .
Kaya, mag-pop up ito ng message box na nagpapakita ng huling row number.
5. Gamit ang Range.Find to Find Last Row
Maaari mong gamitin ang Range.Find paraan upang mahanap ang huling row gamit ang VBA .
Ngayon, buksan ang Developer tab >> pagkatapos ay piliin ang Visual Basic
Dito, isang bagong window ng Microsoft Visual Basic for Applications ang lalabas.
Ngayon, mula sa Ipasok ang >> piliin ang Module
Isang Module ang bubuksan.
Pagkatapos ay isulat ang sumusunod na code sa Module .
1238
Dito, nakagawa ako ng sub procedure na tinatawag na Range_Find_Method, kung saan ang isang Long na uri ng variable LastRow ay idineklara .
Pagkatapos ay tinukoy ang variable gamit ang Cells.Find na paraan. Dito, idineklara ang 7mga parameter. Sa Anong parameter ang ginamit ko (“*”) na hahanapin ang unang cell na hindi walang laman. Ibinigay ang A1 bilang range sa Pagkatapos ng parameter upang magsimula. Sa LookAt parameter na ibinigay xlPart upang tingnan ang anumang bahagi ng text sa loob ng cell.
LookIn:=xlFormulas na parameter ay hahanapin mga formula kung mayroon man. SearchOrder:=xlByRows Ang parameter ay lilipat pakanan-pakaliwa at mag-loop din pataas sa bawat row hanggang sa makakita ito ng isang cell na hindi walang laman.
MatchCase:=False sasabihin ng parameter sa Find na huwag isaalang-alang ang mga malalaking titik o maliliit na titik. Kapag may nakitang hindi blangko, hihinto ito at ibinabalik ang row number.
Gumamit ako ng message box para ipakita ang resulta.
Ngayon, I-save ang code at bumalik sa worksheet.
Dito, buksan ang View tab >> mula sa Macros >> piliin ang View Macros
Ngayon, isang dialog box ay lalabas.
Ngayon, mula sa Macro name piliin ang Range_Find_Method piliin din ang worksheet sa loob ng Macros in .
Sa wakas, Patakbuhin ang ang napiling Macro .
Kaya, mag-pop up ito ng message box na nagpapakita ng huling row number.
Konklusyon
Sa artikulong ito, ipinaliwanag ko ang 5 paraan upang VBA mahanap ang huling row sa Excel. Maaari mong sundin ang alinman sa mga paraan upang mahanap ang huling hilera. Kung sakaling mayroon kang anumang pagkalito o tanong tungkol sa mga pamamaraang ito maaari mongmagkomento sa ibaba.
