ايڪسل ۾ VBA استعمال ڪندي ڪالمن ۾ ڊيٽا سان قطارون ڪيئن ڳڻجن (9 طريقا)

  • هن کي شيئر ڪريو
Hugh West

جيڪڏهن توهان ڳولي رهيا آهيو ڪجهه آسان طريقا ڳولهي رهيا آهيو قطارن کي ڳڻڻ لاءِ ڊيٽا سان گڏ هڪ ڪالمن ۾ استعمال ڪندي Excel VBA ، ته پوءِ توهان صحيح جاءِ تي آهيو. تنهن ڪري، اچو ته اسان جي مکيه مضمون سان شروع ڪريون وڌيڪ ڄاڻڻ لاءِ وڌيڪ ڄاڻڻ لاءِ قطارون ڳڻڻ بابت ڊيٽا سان گڏ هڪ ڪالم ۾ آساني سان.

ڊائون لوڊ ورڪ بڪ

Data.xlsm سان قطارون ڳڻڻ

Excel VBA استعمال ڪندي ڪالمن ۾ ڊيٽا سان قطارون ڳڻڻ جا 9 طريقا

هتي، اسان وٽ هيٺيون ڊيٽا سيٽ آهي جنهن ۾ ڪمپني جا سيلز رڪارڊ شامل آهن. اسان مختلف ڪالمن استعمال ڪنداسين هن ڊيٽا سيٽ جي ڊيٽا سان مختلف طريقن کي بيان ڪرڻ لاءِ قطارن کي ڳڻڻ جا مختلف طريقا ڪالمن جي ڊيٽا جي بنياد تي.

اسان استعمال ڪيو آهي Microsoft Excel 365 ورجن هتي، توهان پنهنجي سهولت مطابق ڪو به ٻيو نسخو استعمال ڪري سگهو ٿا.

طريقو-1: VBA قطار استعمال ڪرڻ.Count Property to Count Rows with data in Column in Excel

هتي، اسان سيلز ڪالمن جي قطارن جي ڳڻپ ڪئي ويندي پراڊڪٽس لاءِ سيلز ويلز سان قطار استعمال ڪندي. ڳڻپ جائداد جو VBA .

Step-01 :

➤ ڏانھن وڃو ڊولپر Tab >> Visual Basic Option.

پوءِ، Visual Basic Editor کلندو. .

➤ ڏانھن وڃو داخل ڪريو Tab >> ماڊيول اختيار.

15>

ان کان پوء، a ماڊيول ٺھيو ويندو.

16>

Step-02 :

➤ ھيٺ ڏنل ڪوڊ لکو

9388

هتي، اسان اعلان ڪيو آهي X جيئن Integer ، “D4:D11” جي بنياد تي حد آهي.ڪھڙي ڪالم ۾ اسان قطارون ڳڻائي رھيا آھيون ۽ آخر ۾ اسان قطار جو نمبر مقرر ڪيو آھي X .

ھڪ ميسيج باڪس ( MsgBox ) اسان کي نتيجو ڏيندو ڪل نمبر. قطارن جو.

➤ دٻايو F5 .

پوءِ، توھان حاصل ڪندا قطارن جو ڪل تعداد ڊيٽا سان جيئن 8 جي سيلز ڪالمن ميسيج باڪس ۾.

18>

وڌيڪ پڙهو: 1> Excel VBA  ڊيٽا سان قطارون ڳڻڻ لاءِ (4 مثال)

طريقو-2: ڪالمن ۾ ڊيٽا سان قطارون ڳڻڻ لاءِ End Property استعمال ڪندي

هن حصي ۾، اسان استعمال ڪنداسين آخر ملڪيت جي VBA سيلز جي قيمتن سان قطارون ڳڻڻ لاءِ سيلز ڪالمن.

Steps :

➤ فالو ڪريو Step-01 of Method-1 .

➤ ھيٺ ڏنل ڪوڊ لکو

8014

هتي، اسان اعلان ڪيو آهي X جيئن Integer ، “D4” رينج جي شروعاتي قيمت آهي جنهن جي بنياد تي اسان قطارون ڳڻائي رهيا آهيون. ۽ آخر ۾ اسان قطار جو نمبر مقرر ڪيو آهي X . X اسان کي آخري استعمال ٿيل قطار نمبر ڏيندو نه ھن ڪالمن جي ڪل استعمال ٿيل قطارون. سو، ڪُل قطار نمبر حاصل ڪرڻ لاءِ اسان X مان 3 ( شروعاتي قطار نمبر-1 = 4-1 = 3 ) گھٽايو آهي.

هڪ ميسيج باڪس ( MsgBox ) قطارن جي ڪل تعداد سان ظاهر ٿيندو.

➤ پريس F5 .

ان کان پوءِ، توهان وٽ هوندو 8 جيئن ڪل قطارن جو تعداد سيلز ڪالمن جي ميسيج باڪس ۾.

وڌيڪ پڙهو: ڪيئن ڳڻجيExcel ۾ ڊيٽا سان قطارون (4 فارمولن)

طريقو-3: Rows.Count Property ۽ End Property جي ميلاپ کي استعمال ڪندي

هتي، اسان ٻن ملڪيتن جي ميلاپ کي استعمال ڪنداسين. جي VBA جيئن قطار. ملڪيت کي ڳڻيو ۽ آخر ملڪيت گڏجي سيلز ڪالمن جي ڪل قطارن کي ڳڻڻ لاءِ.

22>

مرحلا :

➤ فالو ڪريو Step-01 of Method-1 .

➤ ھيٺ ڏنل ڪوڊ لکو

6430
<0 هتي، اسان اعلان ڪيو آهي X جيئن Integer ، 4 in (قطار. ڳڻپ، 4) آهي سيلز لاءِ کالم جنهن ڪالمن جي بنياد تي اسان قطارون ڳڻائي رهيا آهيون ۽ آخر ۾ اسان قطار جو نمبر مقرر ڪيو آهي X .

X آخري استعمال ٿيل قطار واپس ڪندو. نمبر هن ڪالمن جي ڪل استعمال ٿيل قطارون نه آهن. سو، ڪُل قطار نمبر حاصل ڪرڻ لاءِ اسان X مان 3 ( شروعاتي قطار نمبر-1 = 4-1 = 3 ) گھٽايو آهي.

هڪ ميسيج باڪس ( MsgBox ) قطارن جي ڪل تعداد سان ظاهر ٿيندو.

➤ پريس F5 .

بعد ۾، اسان کي حاصل ڪنداسين 8 جيئن ڪل قطارن جو تعداد سيلز ڪالمن جي ميسيج باڪس ۾.

24>

لاڳاپيل مواد: ايڪسل ۾ ڪيترن ئي معيارن سان قطارون ڪيئن ڳڻجن (6 طريقا)

طريقو-4: VBA سليڪشن پراپرٽي استعمال ڪندي قطارن کي ڳڻڻ لاءِ ڊيٽا سان گڏ ڪالمن ۾ ايڪسل ۾

توهان استعمال ڪري سگهو ٿا منتخب ملڪيت پڻ ڊيٽا جي بنياد تي ڪل قطارون ڳڻڻ لاءِ سيلز کالم.

Steps :

➤ فالو Step-01 of طريقه -1 .

➤ هيٺ ڏنل ڪوڊ لکو

7722

هتي، اسان X کي Integer قرار ڏنو آهي، چونڊيل قطارن کي. رينج هتي ڳڻيو ويندو، ۽ آخر ۾، اسان قطار نمبر کي مقرر ڪيو آهي X .

هڪ ميسيج باڪس ( MsgBox ) اسان کي مجموعي طور نتيجو ڏيندو. قطارن جو تعداد.

پوءِ، اسان کي اصلي شيٽ ڏانھن موٽڻو پوندو.

➤ حد منتخب ڪريو سيلز ڪالمن ، ۽ پوءِ، وڃو Dveloper Tab >> Macros آپشن.

ان کان پوءِ، ميڪرو ڊائيلاگ باڪس پاپ اپ ٿيندو.

➤ منتخب ڪريو Macro جو نالو countrows4 ، ۽ پوءِ دٻايو رن اختيار.

آخر ۾، اسان کي هيٺ ڏنل ميسيج باڪس ملندو ”استعمال ٿيل قطارن جو تعداد 8 آهي“ .

وڌيڪ پڙهو: ايڪسل ۾ VBA سان قطارون ڪيئن ڳڻجن (5 اپروچز)

طريقو-5: ڪالمن ۾ ڊيٽا سان قطارون ڳڻيو FIND فنڪشن استعمال ڪندي

هتي، اسان استعمال ڪنداسين علائقي ڪالمن ۾ ٽيڪسٽ اسٽرنگ سان قطارون ڳڻڻ لاءِ FIND function

Steps :

➤ فالو ڪريو Step-01 of Method-1 .

➤ هيٺ ڏنل ڪوڊ لکو

1914

هتي، اسان اعلان ڪيو آهي. X جيئن Integer ، rng as Range ، “C4:C11” جي بنياد تي رينج آهي جنهن ڪالم ۾ اسان قطارون ڳڻائي رهيا آهيون ۽ آخر ۾ اسان ان کي مقرر ڪيو آهي rng .

اسان استعمال ڪيو آهي WITH statement استعمال ڪرڻ جي ورجائي کان بچڻ لاءِ اعتراض جو نالو استعمال ڪرڻ جهڙوڪ rng .

استعمال ڪندي FIND فنڪشن ، X اسان کي آخري استعمال ٿيل قطار نمبر ڏيندو نه هن ڪالمن جي ڪل استعمال ٿيل قطارون. سو، ڪُل قطار نمبر حاصل ڪرڻ لاءِ اسان X مان 3 ( شروعاتي قطار نمبر-1 = 4-1 = 3 ) گھٽايو آهي.

هڪ ميسيج باڪس ( MsgBox ) قطارن جي ڪل تعداد سان ظاهر ٿيندو.

➤ پريس F5 .

آخرڪار، توهان وٽ هوندو 8 جيئن ڪل قطارن جو تعداد سيلز ڪالمن جي ميسيج باڪس ۾.

لاڳاپيل مواد: ايڪسل ڳڻپ ڏيکاريندڙ قطارون (فارمولا ۽ وي بي اي ڪوڊ)

0> ملندڙ پڙھڻ:33>34> ايڪسل ۾ Pivot Table سان گڏ گروپ ۾ (قدم طرف گائيڊ لائين)
  • Excel VBA: هڪ شيٽ ۾ قطارون ڳڻيو (5 مثال)
  • طريقو-6: VBA استعمال ڪندي ڪالمن ۾ ڊيٽا سان گڏ غير خالي قطارون ڳڻيو

    هتي، اسان وٽ سيلز ڪالمن ۾ ڪجهه خالي سيل آهن (اسان هن طريقي لاءِ ڪجهه قدر ختم ڪيا آهن) ۽ هڪ VBA ڪوڊ استعمال ڪندي اسان صرف قطارن جي ڪل تعداد کي قدر سان ڳڻينداسين>➤ فالو ڪريو Step-01 of Method-1 .

    ➤ هيٺ ڏنل ڪوڊ لکو

    3740

    هتي، اسان اعلان ڪيو آهي X جيئن ڊگهو ، Y ، ۽ rng جيئن رينج ، “D4:D11” اها حد آهي جنهن جي بنياد تي اسان قطارن کي ڳڻائي رهيا آهيون ۽ آخر ۾ اسان وٽ آهيان کي تفويض ڪيو rng .

    FOR لوپ چيڪ ڪندو ته ڇا هن رينج جي هر سيل ۾ ڪنهن به قيمت تي مشتمل آهي COUNTA فنڪشن ۽ قدرن واري سيلز لاءِ، X هر دفعي 1 بڑھائي ويندي.

    آخر ۾، اسان هڪ پيغام ذريعي غير خالي سيلن سان ڪل قطار نمبر حاصل ڪنداسين. باڪس.

    ➤ دٻايو F5 .

    آخرڪار، توهان وٽ هوندو 5 جيئن ڪل تعداد غير خالي قطارون سيلز ڪالمن جي ميسيج باڪس ۾.

    39>

    وڌيڪ پڙهو: VBA سان ايڪسل ۾ فلٽر ٿيل قطارن کي ڪيئن ڳڻجي ( قدم بہ قدم ھدايت وارو)

    طريقو-7: مخصوص قدر سان قطارون ڳڻيو

    هتي، اسان قطارن جي ڪل تعداد کي ڳڻنداسين جنهن جي سيلز ويليو سان $2,522.00 کان سيلز ڪالمن.

    40>

    قدم :

    ➤ فالو قدم -01 جي طريقي-1 .

    ➤ هيٺ ڏنل ڪوڊ لکو

    8177

    هتي، اسان X کي قرار ڏنو آهي. ڊگھو ، Y ، ۽ rng جيئن رينج ، “D4:D11” جي حد آهي جنهن جي بنياد تي ڪالم ۾ اسان قطارون ڳڻائي رهيا آهيون ۽ آخر ۾ اسان ان کي rng تي تفويض ڪيو آهي.

    FOR لوپ چيڪ ڪندو ته ڇا هن رينج جي سيلز مان ڪنهن به سيلز جي قيمت تي مشتمل آهي <. 1>2522 استعمال ڪندي COUNTIF فنڪشن ۽ سيلز لاءِ جن وٽ هي قدر آهي، X هر دفعي 1 جي واڌ ڪئي ويندي.

    آخر ۾، اسان هڪ پيغام ذريعي 2522 جي قيمت سان ڪل قطار نمبر حاصل ڪنداسين.باڪس.

    ➤ دٻايو F5 .

    آخرڪار، توهان وٽ هوندو 3 جيئن ڪل نمبر قطارون جي سيلز ڪالمن جنهن ۾ سيلز جي قيمت $2,522.00 ميسيج باڪس ۾ آهي.

    وڌيڪ پڙهو: Excel VBA: مخصوص ڊيٽا سان قطارون ڳڻيو (8 مثالن)

    طريقو-8: قطارن کي ڳڻيو جن جي قدر مخصوص قدر کان وڏي آهي

    هن حصي ۾، اسين ڪنداسين سيلز ڪالمن ۾ $3000.00 کان وڌيڪ قدرن سان قطارن جو ڪل تعداد ڳڻيو.

    Steps :

    ➤ فالو ڪريو Step-01 of Method-1 .

    ➤ ھيٺ ڏنل ڪوڊ لکو

    4760

    هتي، اسان X کي ڊگهو ، Y ، ۽ rng کي رينج ، <1 قرار ڏنو آهي. 1>“D4:D11” اها رينج آهي جنهن جي بنياد تي ڪالمن ۾ اسان قطارن کي ڳڻائي رهيا آهيون ۽ آخر ۾ اسان ان کي مقرر ڪيو آهي rng .

    The for لوپ چيڪ ڪندو ته ڇا هن رينج جي سيلز مان ڪنهن به سيلز ويليو تي مشتمل آهي 3000 استعمال ڪندي COUNTIF فنڪشن (يا توهان ڪوشش ڪري سگهو ٿا ڪنهن ٻئي لاءِ حالتون جھڙوڪ کان گھٽ، کان وڏو، يا برابر، وغيره) ۽ سيلز لاءِ ھي قدر آھي، X جي واڌ ڪئي ويندي 1 ھر وقت.

    آخر ۾، اسان هڪ ميسيج باڪس ذريعي 3000 کان وڌيڪ قدرن سان ڪل قطار نمبر حاصل ڪنداسين.

    ➤ دٻايو F5 .

    بعد ۾، توهان وٽ هوندو 3 جيئن ڪل نمبر قطارن جي قطارن ۾ سيلز ڪالمن جنهن ۾ سيلز شامل آهنقدرن کان وڌيڪ $3,000.00 هڪ ميسيج باڪس ۾.

    45>

    وڌيڪ پڙهو: ڪيئن Excel ڳڻپ قطارن سان قدر (8) طريقا)

    طريقو-9: مخصوص متن واري اسٽرنگ سان قطارون ڳڻيو

    اسان هتي قطارن جو تعداد حاصل ڪنداسين جنهن ۾ apple بلڪل يا جزوي طور تي پراڊڪٽ ڪالمن ۾.

    0> قدم:

    ➤ فالو قدم- 01 جو طريقي-1 .

    ➤ هيٺ ڏنل ڪوڊ لکو

    4895

    هتي، اسان X کي ڊگهو قرار ڏنو آهي. ، Y ، ۽ rng جيئن رينج ، “B4:B11” اها حد آهي جنهن جي بنياد تي اسان قطارن جي ڳڻپ ڪري رهيا آهيون ۽ آخر ۾ اسان ان کي مقرر ڪيو آهي rng .

    FOR لوپ چيڪ ڪندو ته ڇا هن رينج جي ڪنهن سيل ۾ ٽيڪسٽ اسٽرنگ آهي "لاڳو ڪريو" استعمال ڪندي COUNTIF فنڪشن (هتي، اهو استعمال ڪندي صحيح ميچز ۽ جزوي ميچ ٻنهي لاءِ ڳڻيو ويندو Asterisk اسٽرنگ کان اڳ ۽ پوءِ) ۽ سيلز لاءِ هي قدر آهي، X هر ٽِم 1 وڌائي ويندي e.

    آخر ۾، اسان کي ميسيج باڪس ذريعي ٽيڪسٽ اسٽرنگ apple سان ڪل قطار نمبر ملندا.

    ➤ دٻايو F5 .

    پوءِ، توهان وٽ هوندو 2 جيئن ڪل نمبر قطارون پراڊڪٽ کالم جنهن ۾ ٽيڪسٽ اسٽرنگ آهن Apple ۽ Pineapple ميسيج باڪس ۾.

    وڌيڪ پڙهو: ايڪسل ۾ ٽيڪسٽ سان قطارن کي ڪيئن ڳڻجي (آسان8 طريقا)

    مشق سيڪشن

    پنهنجو مشق ڪرڻ لاءِ اسان هڪ مشق سيڪشن ڏنو آهي جيئن هيٺ ڏنل شيٽ ۾ مشق . مهرباني ڪري اهو پنهنجو پاڻ ڪريو.

    نتيجو

    هن آرٽيڪل ۾، اسان ايڪسل <1 استعمال ڪندي ڪالمن ۾ ڊيٽا سان قطارون ڳڻڻ جي طريقن کي ڍڪڻ جي ڪوشش ڪئي> VBA آساني سان. اميد ته توھان کي مفيد ملندو. جيڪڏھن توھان وٽ ڪي تجويزون يا سوال آھن، انھن کي تبصرو سيڪشن ۾ حصيداري ڪرڻ لاء آزاد محسوس ڪريو.

    Hugh West هڪ انتهائي تجربيڪار ايڪسل ٽرينر ۽ تجزيه نگار آهي جنهن سان صنعت ۾ 10 سالن کان وڌيڪ تجربو آهي. هن وٽ اڪائونٽنگ ۽ فنانس ۾ بيچلر جي ڊگري ۽ بزنس ايڊمنسٽريشن ۾ ماسٽر جي ڊگري آهي. Hugh کي تدريس جو شوق آهي ۽ هڪ منفرد تدريس وارو طريقو ٺاهيو آهي جنهن جي پيروي ڪرڻ ۽ سمجهڻ آسان آهي. Excel جي هن جي ماهر ڄاڻ سڄي دنيا ۾ هزارين شاگردن ۽ پروفيسر جي مدد ڪئي آهي انهن جي صلاحيتن کي بهتر بنائڻ ۽ انهن جي ڪيريئر ۾ شاندار. هن جي بلاگ ذريعي، هگ پنهنجي ڄاڻ کي دنيا سان حصيداري ڪري ٿو، مفت ايڪسل سبق ۽ آن لائن ٽريننگ پيش ڪري ٿو ماڻهن ۽ ڪاروبار کي انهن جي مڪمل صلاحيت تائين پهچڻ ۾ مدد ڏيڻ.