Агуулгын хүснэгт
Хэрэв та Excel VBA ашиглан багана дахь өгөгдөл бүхий мөрийг тоолох хамгийн хялбар аргуудыг хайж байгаа бол та зөв газартаа байна. Тиймээс баганад байгаа өгөгдөл бүхий мөрийг хялбархан тоолох талаар илүү ихийг мэдэхийн тулд үндсэн нийтлэлээсээ эхэлцгээе.
Дасгалын номыг татаж авах
Мөрүүдийг өгөгдөл.xlsm-ээр тоолох
Excel VBA-г ашиглан багана дахь өгөгдөл бүхий мөрийг тоолох 9 арга
Энд бид компанийн борлуулалтын бүртгэлийг агуулсан дараах өгөгдлийн багцтай байна. Бид баганын өгөгдөлд тулгуурлан мөр тоолох янз бүрийн аргуудыг тайлбарлахын тулд энэ өгөгдлийн багцын өгөгдөлтэй өөр багана ашиглах болно.
Бид Microsoft Excel 365 хувилбарыг эндээс өөр хувилбарыг ашиглах боломжтой.
Арга-1: Excel програмын баганад байгаа өгөгдлүүдтэй мөрийг тоолохын тулд VBA Rows.Count шинж чанарыг ашиглах
Энд бид Борлуулалтын баганын мөрүүдийг Мөрүүдийг ашиглан бүтээгдэхүүний борлуулалтын утгыг тоолох болно. VBA -с өмчийг тоол.
Алхам-01 :
➤ <1 рүү очих>Developer Tab >> Visual Basic Сонголт.
Дараа нь Visual Basic Editor нээгдэнэ. .
➤ Insert Tab >> Модуль Сонголт руу очно уу.
Үүний дараа a Модуль үүсгэгдэнэ.
Алхам-02 :
➤ Дараах кодыг бичнэ үү
2391
Энд бид X -г Бүхэл тоо гэж зарласан, “D4:D11” нь дараах үндсэн дээр байгаа муж юм.Бид аль баганад мөр тоолж байгаа бөгөөд эцэст нь X -д мөрийн дугаарыг өгсөн.
Мессежийн хайрцаг ( MsgBox ) бидэнд үр дүнг нийт тоо болгон өгөх болно. мөрийн тоо.
➤ F5 товчийг дарна уу.
Дараа нь гэсэн өгөгдөлтэй мөрийн нийт тоог авах болно. Мессежийн хайрцагт байгаа Борлуулалтын баганаас 8 .
Дэлгэрэнгүй унших: Excel VBA өгөгдөл бүхий мөрийг тоолох (4 жишээ)
Арга-2: Төгсгөлийн шинж чанарыг ашиглан баганын өгөгдөлтэй мөрийг тоолох
Энэ хэсэгт бид VBA Борлуулалтын баганын борлуулалтын утга бүхий мөрүүдийг тоолохын тулд VBA -н төгсгөлийн өмч .
Алхам :
➤ Арга-1 -ийн Алхам-01 -ыг дагаж мөрдөөрэй.
➤ Дараах кодыг бичнэ үү
9399
Энд бид X -г Бүхэл тоо гэж зарласан, “D4” нь аль баганыг үндэслэн мөр тоолж байгаа мужын эхлэлийн утга юм. эцэст нь бид X -д мөрийн дугаар өгсөн. X нь энэ баганын нийт ашигласан мөрүүдийг бус хамгийн сүүлд ашигласан мөрийн дугаарыг өгнө. Тиймээс, нийт мөрийн дугаарыг авахын тулд бид X -ээс 3 ( Эхлэх мөрийн дугаар-1 = 4-1 = 3 ) -ийг хассан.
Нийт мөрийн тоо бүхий мессежийн хайрцаг ( MsgBox ) гарч ирнэ.
➤ F5 товчийг дарна уу.
Үүний дараа та мессежийн хайрцагт байгаа Борлуулалтын баганын нийт мөрийн тоо 8 байх болно.
Дэлгэрэнгүй унших: Хэрхэн тоолох вэExcel програмын өгөгдөлтэй мөрүүд (4 томьёо)
Арга-3: Rows.Count Property болон End Property-ийн хослолыг ашиглах
Энд бид хоёр шинж чанарын хослолыг ашиглана. Мөрүүд шиг VBA . Борлуулалтын баганын нийт мөрийг тоолохын тулд хөрөнгө, Төгсгөлийн өмчийг хамтдаа тоол.
Алхам :
➤ Арга-1 -ийн Алхам-01 -ыг дагаж мөрдөөрэй.
➤ Дараах кодыг бичнэ үү
1366
Энд бид X -г Бүхэл тоо , 4 д (Мөр. Тоо, 4) нь Борлуулалтад зориулагдсан гэж зарласан. баганыг аль баганын үндсэн дээр мөр тоолж байгаа бөгөөд эцэст нь X -д мөрийн дугаарыг өгсөн.
X хамгийн сүүлд ашигласан мөрийг буцаана. энэ баганын нийт ашигласан мөрүүдийг дугаарлахгүй. Тиймээс, нийт мөрийн дугаарыг авахын тулд бид X -ээс 3 ( Эхлэх мөрийн дугаар-1 = 4-1 = 3 ) -ийг хассан.
Нийт мөрийн тоо бүхий мессежийн хайрцаг ( MsgBox ) гарч ирнэ.
➤ F5 товчийг дарна уу.
Дараа нь бид мессежийн хайрцагт байгаа Борлуулалтын баганын нийт мөрийн тоо болох 8 г авна.
Холбогдох агуулга: Excel-ийн олон шалгуур бүхий мөрийг хэрхэн тоолох вэ (6 арга)
Арга-4: Excel-ийн багана дахь өгөгдөл бүхий мөрийг тоолоход VBA сонгох шинж чанарыг ашиглах
Та Сонголтын шинж чанарыг мөн Борлуулалтын өгөгдөл дээр үндэслэн нийт мөрүүдийг тоолох боломжтой. багана.
Алхам :
➤ Аргын Алхам-01 -ыг дагах -1 .
➤ Дараах кодыг бичнэ үү
7170
Энд бид X г Бүхэл тоо гэж зарласан. мужийг энд тоолох бөгөөд эцэст нь бид X -д мөрийн дугаарыг өгсөн.
Мессежийн хайрцаг ( MsgBox ) бидэнд үр дүнг нийт дүнгээр өгөх болно. мөрийн тоо.
Дараа нь бид үндсэн хуудас руу буцах хэрэгтэй.
➤ Борлуулалтын баганын мужийг сонгоно уу. , дараа нь Хөгжүүлэгч Таб >> Макрос Сонголт руу очно уу.
Үүний дараа Макро харилцах цонх гарч ирнэ.
➤ Макро нэр тооцоог4 сонгоод Ажиллуулах товчийг дарна уу. сонголт.
Эцэст нь бид дараах мессежийн цонхыг авах болно “Ашигласан мөрийн тоо 8” .
Дэлгэрэнгүй унших: Excel дээр VBA ашиглан мөрийг хэрхэн тоолох вэ (5 хандлага)
Арга-5: FIND функцийг ашиглан багана дахь өгөгдөл бүхий мөрүүдийг тоолох
Энд бид ашиглах болно Бүсийн багананд байгаа текст мөр бүхий мөрүүдийг тоолох FIND функц .
Алхам :
➤ Арга-1 -ийн Алхам-01 -ыг дагаж мөрдөөрэй.
➤ Дараах кодыг бичнэ үү
2878
Энд бид зарлалаа. X Бүхэл тоо , rng Муж , “C4:C11” нь Бид аль баганад мөр тоолж, эцэст нь бид үүнийг оноож байна rng .
Бид rng гэх мэт объектын нэрийг давтахаас зайлсхийхийн тулд WITH мэдэгдлийг ашигласан.
FIND функц -г ашигласнаар X энэ баганын нийт ашигласан мөрүүдийг бус хамгийн сүүлд ашигласан мөрийн дугаарыг өгнө. Тиймээс, нийт мөрийн дугаарыг авахын тулд бид X -ээс 3 ( Эхлэх мөрийн дугаар-1 = 4-1 = 3 ) -ийг хассан.
Нийт мөрийн тоо бүхий мессежийн хайрцаг ( MsgBox ) гарч ирнэ.
➤ F5 товчийг дарна уу.
Эцэст нь та мессежийн хайрцагт байгаа Борлуулалтын баганын нийт мөрийн тоо 8 байх болно.
Холбогдох контент: Excel-ийн харагдах мөрүүдийг тоолох (Томъёо ба VBA код)
Ижил төстэй уншилтууд:
- Мөрүүдийг тоолох Excel дэх пивот хүснэгттэй бүлэгт (Алхам алхмаар зааварчилгаа)
- Excel VBA: Хүснэгт дэх мөрүүдийг тоолох (5 жишээ)
Арга-6: Багана дахь өгөгдөл бүхий хоосон мөрүүдийг VBA ашиглан тоолох
Энд, Борлуулалтын багананд хоосон нүднүүд байна (бид энэ аргын зарим утгыг хассан) ба VBA код ашиглан бид зөвхөн утга бүхий нийт мөрийн тоог тоолох болно.
Алхам :
➤ Арга-1 -ийн Алхам-01 -ыг дагаж мөрдөөрэй.
➤ Дараах кодыг бичнэ үү
5535
Энд бид <зарлалаа. 1>X Урт , Y , мөн rng нь Муж , “D4:D11” нь аль баганын үндсэн дээр мөр тоолж байгаа муж бөгөөд эцэст нь бидэнд байгаа болно rng -д оноосон.
FOR гогцоо нь COUNTA функц болон энэ мужийн нүд бүрд ямар нэгэн утга агуулагдаж байгаа эсэхийг шалгана. Утгатай нүднүүдийн хувьд X нь 1 -ээр нэмэгдэх болно.
Эцэст нь бид хоосон нүднүүдийн нийт мөрийн тоог мессежээр авна. хайрцаг.
➤ F5 товчийг дарна уу.
Эцэст нь та нийт тоо 5 болно. Мессежийн хайрцагт байгаа Борлуулалтын баганын хоосон бус мөрүүд.
Дэлгэрэнгүй унших: Excel дээр шүүсэн мөрүүдийг VBA ашиглан хэрхэн тоолох вэ ( Алхам алхмаар зааварчилгаа)
Арга-7: Тодорхой утгатай мөрүүдийг тоолох
Энд бид борлуулалтын утгатай нийт мөрүүдийг тоолно. $2,522.00 Борлуулалтын баганаас.
Алхам :
➤ Алхамыг дагах -01 -ын Арга-1 .
➤ Дараах кодыг бичнэ үү
4205
Энд бид 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 -ыг дагаж мөрдөөрэй.
➤ Дараах кодыг бичнэ үү
7526
Энд бид X -г Урт , Y , rng -г Муж гэж зарласан. 1>“D4:D11” нь аль баганын үндсэн дээр мөр тоолж байгаа муж бөгөөд эцэст нь бид үүнийг rng -д өгсөн.
FOR гогцоо нь энэ хүрээний аль нэг нүд нь COUNTIF функц -г ашиглан 3000 -с их борлуулалтын үнэ цэнийг агуулж байгаа эсэхийг шалгах болно (эсвэл та өөр дурын ч оролдлого хийж болно) -аас бага, их, тэнцүү гэх мэт нөхцөлүүд) мөн энэ утгатай нүднүүдийн хувьд X -ыг 1 тухайд нэмэгдүүлнэ.
Эцэст нь бид 3000 -ээс их утгатай нийт мөрийн дугаарыг мессежийн нүдээр авах болно.
➤ F5 товчийг дарна уу.
Дараа нь та борлуулалтыг агуулсан Борлуулалтын баганын нийт тооны мөр болох 3 байх болно.Мессежийн хайрцагт 3,000.00$ -с их утгууд байна.
Дэлгэрэнгүй унших: Excel мөрийг утгаараа хэрхэн тоолох вэ (8). Арга)
Арга-9: Тодорхой текстийн мөр бүхий мөрүүдийг тоолох
Бид эндээс алим -г агуулсан мөрийн тоог авна. яг эсвэл хэсэгчлэн Бүтээгдэхүүний багананд.
Алхам :
➤ Алхам- 01 -ын Арга-1 .
➤ Дараах кодыг бичнэ үү
4369
Энд бид X -г Урт гэж зарлалаа. , Y ба rng нь Муж , “B4:B11” нь бид аль багананд суурилсан муж юм. мөр тоолж байгаа бөгөөд эцэст нь бид үүнийг rng -д өгсөн.
FOR гогцоо нь энэ мужийн аль нэг нүдэнд текстийн мөр агуулж байгаа эсэхийг шалгах болно. COUNTIF функцийг ашиглан "хэрэглэх" (энд мөрийн өмнө болон хойно Одны тэмдэгтийг ашиглан яг таарч байгаа болон хэсэгчилсэн тохирлын аль алинд нь тооцно), мөн Энэ утгатай нүднүүдийн хувьд X нь 1 тим бүрээр нэмэгдэнэ. д.
Эцэст нь бид алим текстийн мөр бүхий нийт мөрийн тоог мессежийн хайрцагаар авах болно.
➤ F5 товчийг дарна уу.
Дараа нь Бүтээгдэхүүний багананд текстийн мөрүүдийг агуулсан нийт тооны мөр болох 2 байх болно. Apple болон Pineapple мессежийн хайрцагт.
Дэлгэрэнгүй: Excel дээр тексттэй мөрийг хэрхэн тоолох вэ (Хамгийн хялбар8 арга зам)
Дасгалын хэсэг
Бие даан дадлага хийхийн тулд бид доорх Дасгал нэртэй хуудсанд Дадлага хэсгийг өгсөн. . Үүнийг өөрөө хийнэ үү.
Дүгнэлт
Энэ нийтлэлд бид Excel програмыг ашиглан баганад өгөгдөлтэй мөр тоолох аргуудыг авч үзэхийг оролдсон болно VBA амархан. Энэ нь танд хэрэг болно гэж найдаж байна. Хэрэв танд ямар нэгэн санал, асуулт байвал коммент хэсэгт хуваалцаарай.
