Əgər siz Excel VBA istifadə edərək sütunda verilənlərlə sətirləri saymağın ən asan yollarını axtarırsınızsa, onda siz doğru yerdəsiniz. Beləliklə, sütunda verilənlərlə sətirlərin asanlıqla sayılması haqqında daha çox bilmək üçün əsas məqaləmizdən başlayaq.

İş kitabını endirin

Excel VBA istifadə edərək sütunda verilənlərlə sətirləri saymağın 9 yolu

Burada şirkətin satış qeydlərini özündə əks etdirən aşağıdakı məlumat dəstinə sahibik. Sütun məlumatlarına əsaslanaraq sətirləri saymağın müxtəlif yollarını izah etmək üçün bu verilənlər toplusundan verilənlərlə müxtəlif sütunlardan istifadə edəcəyik.

Biz Microsoft Excel 365 versiyasını burada, rahatlığınıza uyğun olaraq istənilən digər versiyalardan istifadə edə bilərsiniz.

Metod-1: Excel-də Sütundakı Məlumatlarla Satırları Saymaq üçün VBA Rows.Count xassəsindən istifadə

Burada biz Satış sütununun satırlarını Satırlardan istifadə edən məhsullar üçün satış dəyərləri ilə hesablayacaq. VBA -dən xassə sayın.

Addım-01 :

➤ <1-ə keçin>Developer Tab >> Visual Basic Seçim.

Sonra Visual Basic Redaktoru açılacaq .

➤ Daxil et Tab >> Modulu Seçim bölməsinə keçin.

Bundan sonra a Modul yaradılacaq.

Addım-02 :

➤ Aşağıdakı kodu yazın

1477

Burada biz X -ni Tam kimi elan etdik, “D4:D11” əsaslı diapazondur.hansı sütunda sətirləri sayırıq və nəhayət, sətir nömrəsini X -ə təyin etdik.

Mesaj qutusu ( MsgBox ) bizə ümumi sayı kimi nəticə verəcək sətirlərin.

➤ F5 düyməsini basın.

Sonra kimi verilənləri olan sətirlərin ümumi sayını əldə edəcəksiniz. Mesaj qutusundakı Satış sütununun 8 sı.

Ətraflı oxuyun: Excel VBA  Məlumatla Satırları Saymaq üçün (4 Nümunə)

Metod-2: Sütunda Verilən Satırları Saymaq üçün Son Xüsusiyyətdən İstifadə

Bu bölmədə biz istifadə edəcəyik VBA Satış sütununun satış dəyərləri olan sətirləri saymaq üçün VBA son əmlakı.

Addımlar :

➤ Metod-1 dən Addım-01 -ni izləyin.

➤ Aşağıdakı kodu yazın

7152

Burada biz X -ni Tam kimi elan etdik, “D4” satırları saydığımız sütun əsasında diapazonun başlanğıc qiymətidir və nəhayət, sıra nömrəsini X -ə təyin etdik. X bizə bu sütunun ümumi istifadə edilmiş sətirlərini deyil, son istifadə olunan sətir nömrəsini verəcək. Beləliklə, ümumi sıra nömrəsini əldə etmək üçün X -dən 3 ( Başlanğıc Sıra Nömrəsi-1 = 4-1 = 3 ) çıxardıq.

Ümumi sıra sayı ilə mesaj qutusu ( MsgBox ) görünəcək.

➤ F5 düyməsini basın.

Bundan sonra mesaj qutusundakı Satış sütununun ümumi sıra sayı olaraq 8 olacaqsınız.

Daha çox oxuyun: Necə saymaq olarExcel-də verilənləri olan sətirlər (4 düstur)

Metod-3: Rows.Count xassəsinin və son xassəsinin birləşməsindən istifadə

Burada iki xüsusiyyətin birləşməsindən istifadə edəcəyik. VBA Sətrlər kimi. Satış sütununun ümumi sətirlərini saymaq üçün və Son əmlakı birlikdə sayın.

Addımlar :

➤ Metod-1 -in Addım-01 -ni izləyin.

➤ Aşağıdakı kodu yazın

8431

Burada biz X Tam kimi elan etdik, 4 in (Satır. Sayı, 4) Satış üçün sütun əsasında sətirləri sayırıq və nəhayət, sətir nömrəsini X -ə təyin etdik.

X son istifadə olunan sıranı qaytaracaq bu sütunun ümumi istifadə olunan sətirlərini deyil. Beləliklə, ümumi sıra nömrəsini əldə etmək üçün X -dən 3 ( Başlanğıc Sıra Nömrəsi-1 = 4-1 = 3 ) çıxardıq.

Ümumi sıra sayı ilə mesaj qutusu ( MsgBox ) görünəcək.

➤ F5 düyməsini basın.

Sonra mesaj qutusundakı Satış sütununun sətirlərinin ümumi sayı kimi 8 alacağıq.

Əlaqədar Məzmun: Excel-də Çoxsaylı Kriteriyalı Sətirləri Necə Saymaq olar (6 Metod)

Metod-4: Excel-də Sütundakı Məlumatlarla Satırları Saymaq üçün VBA Seçmə Xüsusiyyətindən İstifadə

Siz Seçim xassəsindən də istifadə edə bilərsiniz Satış məlumatlarına əsaslanan ümumi sətirləri saymaq sütun.

Addımlar :

➤ Metodun Addım-01 nə əməl edin -1 .

➤ Aşağıdakı kodu yazın

2241

Burada biz X i Tam kimi elan etdik, seçilmişlərin sətirləri diapazon burada hesablanacaq və nəhayət, biz sətir nömrəsini X -ə təyin etdik.

Mesaj qutusu ( MsgBox ) bizə nəticəni ümumi olaraq verəcək sətirlərin sayı.

Sonra biz əsas vərəqə qayıtmalıyıq.

➤ Satış sütununun diapazonunu seçin , və sonra Developer Tab >> Makrolar Seçiminə keçin.

Bundan sonra Makro dialoq qutusu açılacaq.

➤ Makro adı countrows4 seçin və sonra Çalışdır düyməsini basın. seçim.

Nəhayət, “İstifadə olunan sətirlərin sayı 8-dir” deyən aşağıdakı mesaj qutusunu alacağıq.

Ətraflı oxuyun: Excel-də VBA ilə sətirləri necə saymaq olar (5 yanaşma)

Metod-5: FIND funksiyasından istifadə edərək sütunda verilənlərlə sətirləri saymaq

Burada istifadə edəcəyik Bölgə sütununda mətn sətirləri olan sətirləri saymaq üçün FIND funksiyası .

Addımlar :

➤ Metod-1 -in Addım-01 -ni izləyin.

➤ Aşağıdakı kodu yazın

2693

Burada biz elan etdik X Tam kimi, rng kimi Dəzilə , “C4:C11” əsasda diapazondur hansı sütuna sətirləri sayırıq və nəhayət onu təyin etdik rng .

Biz rng kimi obyekt adından istifadənin təkrarlanmasının qarşısını almaq üçün WITH ifadəsindən istifadə etdik.

FIND funksiyasından istifadə edərək, X bu sütunun ümumi istifadə edilmiş sətirlərini deyil, son istifadə olunan sətir nömrəsini verəcəkdir. Beləliklə, ümumi sıra nömrəsini əldə etmək üçün X -dən 3 ( Başlanğıc Sıra Nömrəsi-1 = 4-1 = 3 ) çıxardıq.

Ümumi sıra sayı ilə mesaj qutusu ( MsgBox ) görünəcək.

➤ F5 düyməsini basın.

Nəhayət, mesaj qutusundakı Satış sütununun sətirlərinin ümumi sayı olaraq 8 olacaqsınız.

Əlaqədar Məzmun: Excel Görünən Sətirlərin sayı (Formula və VBA Kodu)

Oxşar oxunuşlar:

• Satırların sayı Excel-də Pivot Cədvəli ilə Qrupda (Addım-Addım Təlimat)
• Excel VBA: Vərəqdə sətirləri sayın (5 Nümunə)

Metod-6: VBA

-dən istifadə edərək Sütunda Data ilə Qeyri Boş Sıraları Sayın Burada, Satış sütununda bəzi boş xanalarımız var (bu metod üçün bəzi dəyərləri sildik) və VBA kodundan istifadə etməklə biz yalnız dəyərləri olan sətirlərin ümumi sayını hesablayacağıq.

Addımlar :

➤ Metod-1 in Addım-01 -ni izləyin.

➤ Aşağıdakı kodu yazın

2878

Burada biz X Uzun , Y və rng kimi Range , “D4:D11” sətirləri saydığımız və nəhayət əldə etdiyimiz sütun əsasında diapazonduronu rng -ə təyin etdi.

FOR döngəsi bu diapazonun hər bir xanasının COUNTA funksiyasından istifadə edərək hər hansı bir dəyərin olub olmadığını yoxlayacaq. dəyərləri olan xanalar üçün X hər dəfə 1 artırılacaq.

Nəhayət, mesaj vasitəsilə boş olmayan xanalarla ümumi sıra nömrələrini alacağıq. qutusu.

➤ F5 düyməsini basın.

Nəhayət, ümumi sayı olaraq 5 olacaqsınız. mesaj qutusundakı Satış sütununun boş olmayan sətirləri.

Ətraflı oxuyun: Excel-də VBA ilə Filtrlənmiş Satırları necə saymaq olar ( Addım-addım Təlimat)

Metod-7: Xüsusi Dəyəri olan Satırları Sayın

Burada satış dəyəri olan sətirlərin ümumi sayını sayacağıq. $2,522.00 Satış sütunundan.

Addımlar :

➤ Addımı izləyin -01 -dən Metod-1 .

➤ Aşağıdakı kodu yazın

5241

Burada biz X -ni kimi elan etdik. Uzun , Y və Rng kimi Range , “D4:D11” , bunun əsasında sütunda biz satırları sayırıq və nəhayət onu rng -ə təyin etdik.

FOR dövrəsi bu diapazonun xanalarından hər hansı birinin satış dəyərini ehtiva edib-etmədiyini yoxlayacaq 2522 COUNTIF funksiyası istifadə edərək və bu dəyərə malik olan xanalar üçün X hər dəfə 1 artırılacaq.

Nəhayət, mesaj vasitəsilə 2522 dəyəri olan ümumi sıra nömrələrini alacağıq.qutusu.

➤ F5 düyməsini basın.

Nəticədə, ümumi sayı sətirləri olaraq 3 olacaqsınız. mesaj qutusunda 2,522,00$ satış dəyərini ehtiva edən Satış sütununun.

Daha çox oxuyun: Excel VBA: Xüsusi Məlumatlarla Satırların Sayılması (8 Nümunə)

Metod-8: Xüsusi Dəyərdən Böyük Dəyərli Satırların Sayılması

Bu bölmədə biz Satış sütununda $3000,00 dan çox olan cərgələrin ümumi sayını hesablayın.

Addımlar :

➤ Metod-1 dən Addım-01 -ni izləyin.

➤ Aşağıdakı kodu yazın

7133

Burada biz X -ni Long , Y və rng -ni Range kimi elan etdik, “D4:D11” satırları saydığımız sütun əsasında diapazondur və nəhayət onu rng -ə təyin etdik.

FOR döngü bu diapazonun xanalarından hər hansı birinin COUNTIF funksiyasından istifadə edərək 3000 -dən böyük satış dəyərinə malik olub-olmadığını yoxlayacaq (yaxud hər hansı digər xana üçün cəhd edə bilərsiniz) kiçik, böyük və ya bərabər və s. kimi şərtlər) və bu dəyərə malik olan xanalar üçün X hər dəfə 1 artırılacaq.

Nəhayət, biz mesaj qutusu vasitəsilə 3000 -dən böyük olan ümumi sıra nömrələrini alacağıq.

➤ F5 düyməsini basın.

Sonra, satışları ehtiva edən Satış sütununun ümumi sayı sətirləri olaraq 3 olacaqsınız.mesaj qutusunda $3,000,00 -dən böyük dəyərlər.

Ətraflı oxuyun: Excel Dəyərlə Satırları Necə Sayır (8 Yollar)

Metod-9: Xüsusi mətn sətri ilə sətirləri saymaq

Biz burada alma olan sətirlərin sayını alacağıq. tam və ya qismən Məhsul sütununda.

Addımlar :

➤ Addım- 01 -dən Metod-1 .

➤ Aşağıdakı kodu yazın

9718

Burada biz X -ni Uzun kimi elan etdik. , Y və rng kimi Range , “B4:B11” hansı sütuna əsaslanaraq diapazondur sətirləri hesablayır və nəhayət biz onu rng -ə təyin etdik.

FOR dövrəsi bu diapazonun xanalarından hər hansı birinin mətn sətirinin olub olmadığını yoxlayacaq. “tətbiq et” COUNTIF funksiyasından istifadə edərək (burada, sətirdən əvvəl və sonra Ulduz simvolundan istifadə etməklə həm dəqiq uyğunluqlar, həm də qismən uyğunluqlar üçün hesablanacaq) və bu dəyərə malik olan xanalar üçün X hər dəfə 1 artırılacaq e.

Nəhayət, mesaj qutusu vasitəsilə alma mətn sətri ilə ümumi sıra nömrələrini əldə edəcəyik.

➤ F5 düyməsini basın.

Sonra mətn sətirlərini ehtiva edən Məhsul sütununun ümumi sayı sətirləri kimi 2 olacaqsınız Apple və Ananas mesaj qutusunda.

Daha ətraflı: Excel-də mətnlə sətirləri necə saymaq olar (Ən asan8 Yol)

Təcrübə Bölməsi

Özünüz məşq etmək üçün biz Təcrübə adlı vərəqdə aşağıdakı kimi bir Təcrübə bölməsini təqdim etdik. . Zəhmət olmasa özünüz edin.

Nəticə

Bu məqalədə Excel <1 istifadə edərək sütundakı verilənlərlə sətirlərin sayılması yollarını əhatə etməyə çalışdıq>VBA asanlıqla. Ümid edirəm ki, faydalı tapacaqsınız. Hər hansı təklif və ya sualınız varsa, şərh bölməsində paylaşın.