Excel бағдарламасындағы VBA көмегімен бағандағы деректермен жолдарды қалай санауға болады (9 әдіс)

  • Мұны Бөлісіңіз
Hugh West

Егер Excel VBA көмегімен бағандағы деректері бар жолдарды санаудың ең оңай жолдарын іздесеңіз, сіз дұрыс жердесіз. Сонымен, бағандағы деректері бар жолдарды оңай санау туралы көбірек білу үшін негізгі мақаламыздан бастайық.

Жұмыс кітабын жүктеп алу

Деректермен қатарларды санау.xlsm

Excel VBA көмегімен бағандағы деректері бар жолдарды санаудың 9 жолы

Мұнда бізде компанияның сату жазбалары бар келесі деректер жинағы бар. Баған деректеріне негізделген жолдарды санаудың әртүрлі жолдарын түсіндіру үшін біз осы деректер жиынындағы деректері бар әртүрлі бағандарды қолданамыз.

Біз Microsoft Excel 365 нұсқасы осы жерде, сіз өзіңізге ыңғайлы кез келген басқа нұсқаларды пайдалана аласыз.

1-әдіс: Excel бағдарламасындағы бағандағы деректері бар жолдарды санау үшін VBA Rows.Count сипатын пайдалану

Осы жерде біз Сатулар бағанының жолдарын Жолдарды қолданатын өнімдер үшін сату мәндерімен санайтын болады. VBA сипатының саны.

01-қадам :

➤ <1-ге өту>Әзірлеуші ​​ қойындысы >> Visual Basic Опция.

Содан кейін Visual Basic өңдегіші ашылады. .

Кірістіру Қойынды >> Модуль Опцияға өтіңіз.

Осыдан кейін, Модуль жасалады.

02-қадам :

➤ Келесі кодты жазыңыз

4572

Мұнда біз X Бүтін ретінде жарияладық, “D4:D11” негізіндегі ауқым.біз қай бағандағы жолдарды санап жатырмыз және соңында біз X жол нөмірін тағайындадық.

Хабарлар терезесі ( MsgBox ) бізге нәтижені жалпы сан ретінде береді. жолдардың саны.

F5 пернесін басыңыз.

Содан кейін деректері бар жолдардың жалпы санын аласыз. Хабарлама жолағындағы Сату бағанының 8 .

Толығырақ оқу: Excel VBA  деректері бар жолдарды санау үшін (4 мысал)

2-әдіс: Бағандағы деректері бар жолдарды санау үшін соңғы қасиетті пайдалану

Бұл бөлімде біз VBA Сату бағанының сату мәндері бар жолдарды санау үшін VBA соңы сипаты.

Қадамдар :

1-әдіс ішіндегі 01-қадам қадамын орындаңыз.

➤ Келесі кодты жазыңыз

3671

Мұнда біз X Бүтін ретінде жарияладық, “D4” – жолдарды санайтын бағанның негізінде диапазонның бастапқы мәні және соңында біз X жол нөмірін тағайындадық. X бізге осы бағанның жалпы пайдаланылған жолдарын емес, соңғы пайдаланылған жол нөмірін береді. Сонымен, жалпы жол нөмірін алу үшін X -ден 3 ( Бастапқы жол нөмірі-1 = 4-1 = 3 ) шегереміз.

Жолдардың жалпы саны бар хабарлама терезесі ( MsgBox ) пайда болады.

F5 пернесін басыңыз.

Осыдан кейін хабар жолағындағы Сату бағанының жалпы саны ретінде 8 боласыз.

Толығырақ: Санау әдісіExcel бағдарламасындағы деректері бар жолдар (4 формула)

3-әдіс: Rows.Count сипаты мен End қасиетінің комбинациясын пайдалану

Мұнда біз екі сипатты біріктіреміз. VBA Жолдар сияқты. Сату бағанының жалпы жолдарын санау үшін сипатты және Соңғы сипатын бірге санаңыз.

Қадамдар :

1-әдіс дегі 01-қадам қадамын орындаңыз.

➤ Келесі кодты жазыңыз

3549

Мұнда біз X Бүтін , 4 (Жолдар. Санау, 4) ретінде Сатуларға арналған деп жарияладық. бағанның негізінде біз жолдарды санаймыз және соңында X жол нөмірін тағайындадық.

X соңғы пайдаланылған жолды қайтарады осы бағанның жалпы пайдаланылған жолдарының саны емес. Сонымен, жалпы жол нөмірін алу үшін X -ден 3 ( Бастапқы жол нөмірі-1 = 4-1 = 3 ) шегереміз.

Жолдардың жалпы саны бар хабарлама терезесі ( MsgBox ) пайда болады.

F5 пернесін басыңыз.

Кейін хабар жолағындағы Сату бағанының жалпы саны ретінде 8 боламыз.

Қатысты мазмұн: Excel бағдарламасында бірнеше критерийі бар жолдарды қалай санау керек (6 әдіс)

4-әдіс: Excel бағдарламасындағы бағандағы деректері бар жолдарды санау үшін VBA таңдау сипатын пайдалану

Сондай-ақ Таңдау сипатын Сату деректеріне негізделген жалпы жолдарды санау үшін пайдалануға болады. баған.

Қадамдар :

Әдістің 01-қадам қадамын орындаңыз -1 .

➤ Келесі кодты жазыңыз

6401

Мұнда біз X Бүтін деп жарияладық, таңдалған жолдар диапазон осы жерде есептеледі және ең соңында біз X жол нөмірін тағайындадық.

Хабар терезесі ( MsgBox ) бізге нәтижені жалпы мән ретінде береді жолдар саны.

Одан кейін біз негізгі параққа оралуымыз керек.

Сату бағанының ауқымын таңдаңыз. , содан кейін Әзірлеуші ​​ қойындысы >> Макростар Опцияға өтіңіз.

Одан кейін Макростың диалогтық терезесі ашылады.

Макрос атауы санақ4 таңдаңыз, содан кейін Орындау түймесін басыңыз. опция.

Соңында, біз «Пайдаланылған жолдар саны – 8» деген келесі хабарлама терезесін аламыз.

Толығырақ оқу: Excel бағдарламасында VBA көмегімен жолдарды қалай санау керек (5 тәсіл)

5-әдіс: FIND функциясын пайдаланып бағандағы деректері бар жолдарды санау

Бұл жерде біз қолданамыз Аймақ бағанындағы мәтін жолдары бар жолдарды санау үшін FIND функциясы .

Қадамдар :

1-әдіс -дің 01-қадам сын орындаңыз.

➤ Келесі кодты жазыңыз

7611

Осы жерде біз мәлім еттік X Бүтін ретінде, rng Диапазон ретінде, “C4:C11” бұл диапазон біз жолдарды қай бағанға санап жатырмыз және соңында оны тағайындадық rng .

Біз rng сияқты нысан атауын пайдаланудың қайталануын болдырмау үшін WITH мәлімдемесін қолдандық.

ФИНД функциясын пайдалану, X бұл бағанның жалпы пайдаланылған жолдарын емес, соңғы пайдаланылған жол нөмірін береді. Сонымен, жалпы жол нөмірін алу үшін X -ден 3 ( Бастапқы жол нөмірі-1 = 4-1 = 3 ) шегереміз.

Жолдардың жалпы саны бар хабарлама терезесі ( MsgBox ) пайда болады.

F5 пернесін басыңыз.

Соңында хабар жолағындағы Сату бағанының жалпы саны ретінде 8 боласыз.

Қатысты мазмұн: Excel көрінетін жолдар саны (Формула және VBA коды)

Ұқсас оқулар:

  • Жолдарды санау Excel бағдарламасындағы жиынтық кестемен топта (қадамдық нұсқаулық)
  • Excel VBA: Парақтағы жолдарды санау (5 мысал)

6-әдіс: VBA көмегімен бағандағы деректері бар бос емес жолдарды санау

Мұнда бізде Сату бағанында бос ұяшықтар бар (бұл әдіс үшін кейбір мәндерді алып тастадық) және VBA кодын пайдалана отырып, біз мәндері бар жолдардың жалпы санын ғана санаймыз.

Қадамдар :

1-әдіс дегі 01-қадам орындаңыз.

➤ Келесі кодты жазыңыз

3829

Мұнда біз <жарияладық. 1>X Ұзын , Y және rng ретінде Ауқым , “D4:D11” бұл қандай баған негізінде жолдарды санап жатқан диапазон және соңында бізде бароны rng -ге тағайындады.

FOR циклі осы ауқымдағы ұяшықтардың әрқайсысы COUNTA функциясы және көмегімен қандай да бір мәнді қамтитынын тексереді. мәндері бар ұяшықтар үшін X әр сайын 1 көбейтіледі.

Соңында хабар арқылы бос емес ұяшықтары бар жолдардың жалпы сандарын аламыз. қорап.

F5 пернесін басыңыз.

Ақырында, сізде жалпы саны ретінде 5 болады. хабар жолағындағы Сату бағанының бос емес жолдары.

Толығырақ оқу: Excel бағдарламасында VBA көмегімен сүзілген жолдарды санау жолы ( Қадамдық нұсқаулық)

7-әдіс: Арнайы мәні бар жолдарды санау

Мұнда біз сатылым мәні болатын жолдардың жалпы санын есептейміз. $2 522,00 Сату бағанынан.

Қадамдар :

Қадамды орындаңыз -01 Әдіс-1 .

➤ Келесі кодты жазыңыз

7061

Мұнда біз X деп жарияладық. Ұзын , Y және rng Ауқым ретінде, “D4:D11” оның негізіндегі ауқым. бағанды ​​біз жолдарды санап жатырмыз және соңында оны rng -ге тағайындадық.

FOR цикл осы ауқымдағы ұяшықтардың кез келгенінде сату мәні бар-жоғын тексереді 2522 COUNTIF функциясы арқылы және осы мәнге ие ұяшықтар үшін X әр жолы 1 көбейтіледі.

Соңында, біз хабарлама арқылы 2522 мәні бар жалпы жол нөмірлерін аламыз.өріс.

F5 пернесін басыңыз.

Соңында сізде жалпы жолдар саны ретінде 3 болады. хабар жолағындағы $2,522,00 сату құнын қамтитын Сату бағанының.

Толығырақ оқу: Excel VBA: Арнайы деректері бар жолдарды санау (8 мысал)

8-әдіс: Мәндері белгілі бір мәннен үлкенірек жолдарды санау

Бұл бөлімде біз Сату бағанында $3000,00 мәндері бар жолдардың жалпы санын есептеңіз.

Қадамдар :

Әдіс-1 дегі 01-қадам қадамды орындаңыз.

➤ Келесі кодты жазыңыз

3567

Мұнда біз X Ұзын , Y және rng Диапазон , “D4:D11” бұл қай баған негізінде жолдарды санайтын диапазон және соңында біз оны rng -ге тағайындадық.

FOR цикл осы ауқымдағы ұяшықтардың кез келгенінде COUNTIF функциясы арқылы 3000 -ден асатын сату мәні бар-жоғын тексереді (немесе кез келген басқа параметрді қолданып көруге болады). аз, үлкен немесе тең, т.б. сияқты шарттар) және осы мәнге ие ұяшықтар үшін X әр сайын 1 көбейтіледі.

Соңында, біз 3000 -ден үлкен мәндері бар жалпы жол нөмірлерін хабар терезесі арқылы аламыз.

F5 пернесін басыңыз.

Кейін сізде сатылымдарды қамтитын Сату бағанының жалпы саны жолдар ретінде 3 болады.хабар жолағындағы $3,000,00 мәнінен үлкен мәндер.

Толығырақ оқу: Excel мәндері бар жолдарды қалай санайды (8) Жолдар)

9-әдіс: Арнайы мәтін жолы бар жолдарды санау

Бұл жерде алма бар жолдар санын аламыз. дәл немесе ішінара Өнім бағанында.

Қадамдар :

Қадам- 01 Әдіс-1 .

➤ Келесі кодты жазыңыз

1451

Мұнда біз X Ұзын деп жарияладық. , Y және rng Диапазон ретінде, “B4:B11” бұл біз қай баған негізіндегі ауқым жолдарды санап жатыр және ақырында біз оны rng -ге тағайындадық.

FOR циклі осы ауқымдағы ұяшықтардың кез келгенінде мәтіндік жолының бар-жоғын тексереді. «қолдану» COUNTIF функциясын пайдалана отырып (мұнда ол дәл сәйкестіктердің екеуі үшін де, жолдың алдында және кейінгі Жұлдызша таңбасын пайдалану арқылы жартылай сәйкестіктер үшін де есептеледі) және осы мәнге ие ұяшықтар үшін X әрбір уақыт үшін 1 көбейтіледі e.

Соңында біз алма мәтіндік жолы бар жолдардың жалпы сандарын хабар терезесі арқылы аламыз.

F5 пернесін басыңыз.

Содан кейін мәтін жолдарын қамтитын Өнім бағанының жалпы сандық жолдары ретінде сізде 2 болады. Apple және Ананас хабарлар жолағында.

Толығырақ: Excel бағдарламасында мәтінмен жолдарды қалай санауға болады (ең оңай8 жол)

Жаттығу бөлімі

Жаттығуды өз бетіңізше орындау үшін біз төменде Тәжірибе деп аталатын парақта Тәжірибе бөлімін ұсындық. . Мұны өзіңіз жасаңыз.

Қорытынды

Бұл мақалада Excel <1 көмегімен бағандағы деректермен жолдарды санау жолдарын қарастыруға тырыстық>VBA оңай. Сізге пайдалы болады деп үміттенемін. Егер сізде қандай да бір ұсыныстарыңыз немесе сұрақтарыңыз болса, оларды түсініктеме бөлімінде бөлісіңіз.

Хью Уэст – салада 10 жылдан астам тәжірибесі бар жоғары тәжірибелі Excel тренері және талдаушысы. «Бухгалтерлік есеп және қаржы» мамандығы бойынша бакалавр дәрежесі және іскерлік әкімшілендіру магистрі дәрежесі бар. Хью оқытуға құмар және ұстануға және түсінуге оңай бірегей оқыту әдісін әзірледі. Оның Excel бағдарламасындағы сараптамалық білімі бүкіл әлем бойынша мыңдаған студенттер мен мамандарға біліктіліктерін арттыруға және мансаптық жетістіктерге жетуге көмектесті. Блогы арқылы Хью өз білімін әлеммен бөліседі, жеке адамдар мен бизнеске толық әлеуетін ашуға көмектесу үшін тегін Excel оқулықтары мен онлайн тренингтерін ұсынады.