Excel VBA makroslari yordamida diapazondagi ma'lumotlar bilan oxirgi qatorni toping (7 usul)

Hugh West

18-10-2023 Makroslar va amp; Excel VBA
  • Buni Baham Ko'Ring
Hugh West

Microsoft Excel bilan ishlashda oxirgi satr yoki ustunlarni topish odatiy vazifadir. Oxirgi ishlatilgan satr yoki ustunlarni topish uchun klaviaturadan foydalanamiz. Ammo, siz murakkab ma'lumotlar to'plamidan oxirgi ishlatilgan qatorni topishingiz kerak bo'lgan vaziyatga tushib qolishingiz mumkin. Ushbu qoʻllanmada siz amaliy misollar va tegishli rasmlar bilan Excelda VBA-dan foydalanib, diapazondagi maʼlumotlar bilan oxirgi qatorni topishni oʻrganasiz.

Amaliyot darsligini yuklab oling

Ushbu mashq kitobini yuklab oling.

Oxirgi ishlatilgan qatorni diapazonda toping.xlsm

Excel VBA makroslari yordamida diapazondagi ma'lumotlar bilan oxirgi qatorni topishning 7 usuli

Keyingi bo'limlarda , biz sizga Excelda VBA-dan foydalanib, diapazondagi ma'lumotlarning oxirgi qatorini topishga yordam beradigan etti usulni taqdim etamiz. Excel bilimlaringizni boyitish uchun ushbu usullarning barchasini oʻrganishingizni va qoʻllashingizni tavsiya qilamiz.

📕 Batafsil oʻqing : Excelda Qatordagi oxirgi qiymatli katakchani toping (6 usul)

Ushbu qoʻllanmani koʻrsatish uchun biz ushbu maʼlumotlar toʻplamidan foydalanamiz:

Bu yerda bizda baʼzi oʻyinchilar haqidagi maʼlumotlardan iborat maʼlumotlar toʻplami mavjud. Biz bundan sizga barcha usullarni o'rgatish uchun foydalanamiz.

VBA muharririni oching

Boshlashdan oldin biz sizga VBA muharririni ochish uchun oddiy eslatma beramiz. Excel.

Avval, klaviaturada Alt+F11 tugmalarini bosing. Keyin, Qo'shish > Modul. Shundan so'ng u Excelning VBA muharririni ochadi.

1.VBA yordamida diapazondagi ma'lumotlar bilan oxirgi qatorni topish uchun Range.End xususiyatidan foydalanish

Endi bu usul asosan diapazon oxirini topadi. Asosan, oxirgi ishlatilgan hujayra diapazoni. Ushbu usuldan ma'lum diapazondagi ma'lumotlar bilan oxirgi qatorni topish uchun foydalanishimiz mumkin. VBA dan foydalanish sizga kerakli natijalarni beradi.

📌 Qadamlar

① Avval VBA Muharrirni oching.

② Keyin quyidagi kodni kiriting:

7492

③ Endi faylni saqlang. Keyin, so'l dialog oynasini ochish uchun Alt+F8 tugmalarini bosing. range_end_method

④ ni tanlang. Shundan so'ng Run tugmasini bosing.

Ko'rib turganingizdek, biz Excelda VBA-dan foydalanib, diapazondagi ma'lumotlar bilan oxirgi qatorni muvaffaqiyatli topdik.

2. Range.Excelda VBA xususiyatini toping

Endi VBA-da ma'lumotlar to'plamidan ma'lum bir qiymatni qidirish uchun Range.Find usulidan foydalanamiz. Ammo bu usul diapazondagi ma'lumotlar bilan oxirgi qatorni topish uchun foydali bo'ladi. Bu Find & amp kabi ishlaydi; Excel dialog oynasini almashtiring. Diapazon. Find usuli juda ko'p argumentlarga ega. Lekin biz ularning hammasidan foydalanmaymiz.

Range.Find usulini qo‘llashdan oldin sizga qisqacha ma’lumot beramiz:

Cells.Find(“*”, searchorder:=xlByRows, searchdirection:=xlPrevious)

Nima := ”*” – Yulduzcha har qanday matn yoki raqamni topadigan joker belgidir. hujayrada. Bu, birinchi navbatda, bo'sh bo'lmagan narsalarni o'rganish bilan bir xilxujayra.

SearchOrder:=xlByRows - Bu keyingisiga o'tishdan oldin har bir butun qatorni qazib olishni anglatadi. Yo'nalish SearchDirection argumentiga qarab chapdan o'ngga yoki o'ngdan chapga qidiriladi. Bu erda qo'shimcha variant xlByColumns bo'lib, oxirgi ustunni aniqlashda foydalaniladi.

SearchDirection:=xlPrevious - Bu qaysi yo'nalishni o'rganish kerakligini belgilaydi. xlPrevious o'ngdan chapga yoki pastdan tepaga qarab qidirishni bildiradi. Boshqa muqobil - qarama-qarshi yo'lda siljiydigan xlNext.

📌 Qadamlar

① Avval VBA muharririni oching.

② Keyin quyidagi kodni kiriting:

5264

③ Endi faylni saqlang. Keyin, Makro dialog oynasini ochish uchun Alt+F8 tugmalarini bosing. diapazon_topish_metodini tanlang.

④ Shundan so'ng Ishga tushirish tugmasini bosing.

Oxir-oqibat, u Excel ish varag'imizdagi ma'lumotlar bilan oxirgi qatorni topadi.

3. VBA yordamida oxirgi qatorni topish uchun SpecialCells funksiyasidan foydalanish

Bu usul klaviaturada Ctrl+End tugmalarini bosish kabi ishlaydi. Klaviaturada Ctrl+End tugmalarini bosganingizda, qayerda bo'lishingizdan qat'i nazar, u sizni doim oxirgi qatorga olib boradi. Ammo Excelda VBA kodlari yordamida ma'lumotlar bilan oxirgi foydalanilgan qatorni topmoqchi bo'lsangiz, bu kod siz uchun majburiydir.

📌 Qadamlar

① Avval VBA muharririni oching.

② Keyin quyidagi kodni kiriting:

4705

③ Endi faylni saqlang. Keyin,Makro dialog oynasini ochish uchun Alt+F8 tugmalarini bosing. maxsus hujayralar_usuli -ni tanlang.

④ Shundan so'ng Ishga tushirish tugmasini bosing.

Ko'rib turganingizdek, biz Excelda VBA yordamida ma'lumotlar bilan oxirgi qatorni muvaffaqiyatli topdik.

4. Diapazondagi ma'lumotlar bilan oxirgi qatorni topish uchun UsedRange funksiyasidan foydalanish

VBA-dagi UsedRange - bu ma'lum bir ish varag'ida foydalanilgan diapazonni (ishchi varaqda ishlatilgan yoki yuklangan barcha Excel kataklari) ifodalovchi diapazon ob'ektini qaytaradigan ishchi varaqning egaligi. Bu yuqori chapdagi foydalanilgan katakchalar va ishchi varaqdagi oxirgi o'ng foydalanilgan katakchalar bilan qoplangan yoki belgilangan maydonni bildiruvchi xususiyatdir.

📌 Qadamlar

① Avval VBA muharririni oching.

② Keyin quyidagi kodni kiriting:

3197

③ Endi faylni saqlang. Keyin, Makro dialog oynasini ochish uchun Alt+F8 tugmalarini bosing. usedRange_method-ni tanlang.

④ Shundan so'ng Run tugmasini bosing.

Nihoyat, Excel ish varag'ida oxirgi ishlatilgan qatorni muvaffaqiyatli ko'rasiz.

5. Excelda VBA yordamida jadval diapazonidan foydalanish

Agar sizda Ish varag'ingizdagi jadvalda ushbu usul yordamida ma'lumotlar bilan oxirgi qatorni topishingiz mumkin.

📌 Qadamlar

① Birinchidan, VBA muharririni oching. .

② Keyin quyidagi kodni kiriting:

5412

Eslatma : Bu yerda maʼlumotlar toʻplamimiz boshlanganda oxirgi qatorga 3 qoʻshamiz. 3-qatordan keyin.

③ Endi faylni saqlang. Keyin Alt+F8 tugmalarini bosingMakro dialog oynasini ochish uchun. TableRange_method-ni tanlang.

④ Shundan so'ng Run tugmasini bosing.

Ko'rib turganingizdek, Excelda ma'lumotlar bilan oxirgi qatorni topish uchun VBA kodlarida jadval diapazoni usulidan muvaffaqiyatli foydalandik.

6. Topish uchun nomlangan diapazondan foydalanish Ma'lumotlar diapazonidagi oxirgi qator

Bu usul Excelda keng qo'llanilmaydi. Biroq, bilimingizni boyitish uchun buni oʻrganishingiz kerak deb oʻylaymiz.

Agar maʼlumotlar toʻplamingiz nomli diapazonga ega boʻlsa, ushbu koddan foydalanishingiz mumkin. Quyidagi skrinshotni ko'rib chiqing. Unda nomli diapazon mavjud.

📌 Qadamlar

① Avval VBA muharririni oching. .

② Keyin quyidagi kodni kiriting:

9318

Izoh : Biz LastRowga 1 qo'shmoqdamiz, chunki diapazonimiz 1-qatordan keyin boshlangan. .

③ Endi faylni saqlang. Keyin, so'l dialog oynasini ochish uchun Alt+F8 -ni bosing. nameRange_method-ni tanlang.

④ Shundan so'ng Run tugmasini bosing.

Ko'rib turganingizdek, biz VBA yordamida ma'lumotlar bilan oxirgi qatorni muvaffaqiyatli topdik.

7. Excelda VBA ning CurrentRegion funktsiyasi

Shuningdek, VBA ning CurrentRegion usulidan ham foydalanishingiz mumkin. Excelda oxirgi ishlatilgan qatorni topish uchun. Bu qiyin bo'lsa-da, agar xohlasangiz, bundan o'z foydangiz uchun foydalanishingiz mumkin.

📌 Qadamlar

① Avval VBA muharririni oching.

② Keyin quyidagi kodni kiriting:

1168

Izoh : diapazon birinchi katakcha bo'lishi kerak.ma'lumotlar to'plamingiz. Va tanlovingizga ko'ra qatorlar raqamingizni qo'shing. Bu erda biz 3 qo'shdik, chunki bizning ma'lumotlar to'plamimiz 3-qatordan keyin boshlangan.

③ Endi faylni saqlang. Keyin, Makro dialog oynasini ochish uchun Alt+F8 tugmalarini bosing. Mavjud mintaqaviy_metod

④ ni tanlang. Shundan so'ng "Ishga tushirish" tugmasini bosing.

Ko'rib turganingizdek, biz VBA kodidan foydalangan holda ma'lumotlar bilan oxirgi qatorni muvaffaqiyatli topdik.

💬 Esda tutish kerak bo'lgan narsalar

✎ Range.End faqat ishlaydi bitta satr yoki ustun. Agar ma'lumotlar to'plamida juda ko'p bo'sh hujayralar bo'lsa, oxirgi qatorni topish qiyin bo'ladi.

✎ Ba'zan kodni ishga tushirish uchun usullaringizga ba'zi qiymatlarni qo'shishingiz kerak bo'ladi. silliq. Oxirgi katakchani topish uchun qator raqamlarini qo'shdik. Shunday qilib, siz ma'lumotlar to'plami qayerdan boshlanganini eslab qolishingiz kerak.

Xulosa

Xulosa qilish uchun, umid qilamanki, ushbu qo'llanma sizga diapazondagi ma'lumotlarning oxirgi qatorini topish bo'yicha foydali bilimlarni taqdim etdi. Excelda VBA-dan foydalanish. Ushbu ko'rsatmalarning barchasini o'rganishingizni va ma'lumotlar to'plamiga qo'llashingizni tavsiya qilamiz. Amaliy ish kitobini yuklab oling va ularni o'zingiz sinab ko'ring. Shuningdek, sharhlar bo'limida o'z fikringizni bildiring. Sizning qimmatli fikr-mulohazalaringiz bizni shunga o'xshash darsliklar yaratishga undaydi.

Excel bilan bog'liq turli muammolar va yechimlar uchun bizning veb-saytimizni Exceldemy.com tekshirishni unutmang.

Yangi usullarni o'rganishda va rivojlanishda davom eting!

Oldingi xabar Excelda eksa sarlavhalarini qanday qo'shish mumkin (2 ta tezkor usul)
Keyingi post Hujayrada Excelda matn bo'lsa, hisoblash (4 usul)

Hugh West - bu sohada 10 yildan ortiq tajribaga ega bo'lgan yuqori tajribali Excel treneri va tahlilchisi. Buxgalteriya hisobi va moliya yo‘nalishi bo‘yicha bakalavr va biznes boshqaruvi bo‘yicha magistr darajasiga ega. Xyu o'qitishga ishtiyoqi bor va unga amal qilish va tushunish oson bo'lgan o'ziga xos o'qitish usulini ishlab chiqdi. Uning Excel bo'yicha ekspert bilimlari butun dunyo bo'ylab minglab talabalar va mutaxassislarga o'z malakalarini oshirishga va o'z martabalarida muvaffaqiyat qozonishlariga yordam berdi. Xyu o'z blogi orqali o'z bilimlarini dunyo bilan baham ko'radi, jismoniy shaxslar va korxonalarga o'z salohiyatini to'liq ro'yobga chiqarishga yordam berish uchun bepul Excel darsliklari va onlayn treninglarni taklif qiladi.