Excel VBA: بي ترتيب نمبر جنريٽر بغير نقلن سان (4 مثال)

Hugh West

16-10-2023 Macros & Excel VBA
  • هن کي شيئر ڪريو
Hugh West

هي آرٽيڪل بيان ڪري ٿو 4 مثالن جا بي ترتيب نمبر جنريٽر ايڪسل ۾ VBA استعمال ڪندي نقل نه ڪرڻ سان. هتي اسان پنهنجي ڪوڊ کي ترتيب ڏيڻ لاءِ Excel جي بلٽ ان Rnd فنڪشن استعمال ڪنداسين. اچو ته مثالن ۾ ڇنڊڇاڻ ڪريون ٽيڪنڪون سکڻ لاءِ منفرد بي ترتيب نمبر ٺاهڻ لاءِ.

ڊائون لوڊ ڪريو مشق ورڪ بڪ

ڊاؤن لوڊ ڪريو مشق ڪرڻ لاءِ هي مشق ورڪ بڪ ڊائون لوڊ ڪريو جڏهن توهان هي مضمون پڙهي رهيا آهيو.

رينڊم نمبر جنريٽر بغير ڪنهن نقل سان 0> Visual Basic Editor ۾ ڪوڊ لکو

بي ترتيب نمبرن کي بغير نقل ڪرڻ لاءِ ، اسان کي اوپن ۽ VBA لکڻو پوندو. ڪوڊ ۾ بصري بنيادي ايڊيٽر. پيرو ڪريو قدم کولڻ لاءِ بصري بنيادي ايڊيٽر ۽ اتي ڪجهه ڪوڊ لکو.

    > ڏانهن وڃو ڊولپر ٽيب مان Excel ربن .
  • ڪلڪ ڪريو The Visual Basic آپشن.

  • Visual Basic For Applications ونڊو، ڪلڪ ڪريو Insert dropdown to منتخب the نئون ماڊل اختيار.

هاڻي پنهنجو ڪوڊ وجھو اندر بصري ڪوڊ ايڊيٽر ۽ دٻايو F5 ڪرڻ چلايو ان کي.

1. VBA Rnd فنڪشن جو استعمال بي ترتيب نمبر ٺاهڻ لاءِ بغير ڪنهن نقل سان

The Rnd فنڪشن استعمال ڪيو ويندو آهي Excel VBA to <1 ۾> بي ترتيب نمبر ٺاھيو

جيڪي آھن 0 جي وچ ۾۽ 1 خاص.

ٽاسڪ : 10 بي ترتيب نمبر ٺاھيو وچ ۾ 0 ۽ 1 ۾ سيلز A1:A10.

ڪوڊ : داخل ڪريو هيٺ ڏنل ڪوڊ بصري بنيادي ايڊيٽر ۾ ۽ دٻايو F5 ڪرڻ چلايو ان کي.

6379

آئوٽ پُٽ : مٿي ڏنل اسڪرين شاٽ ڏيکاري ٿو 10 منفرد بي ترتيب نمبر 0 ۽ 1 جي حد ۾.

ڪوڊ جي وضاحت:

هن ڪوڊ ۾، اسان استعمال ڪيو Rnd فنڪشن ڏانهن بي ترتيب نمبر داخل ڪريو ۾ سيل رينج A1:A10 . داخل ڪرڻ کان اڳ a نئون نمبر ، اسان استعمال ڪيو Do while Loop to look for number in اڳ بيان ڪيل سيل جي حد (A1:A10) ڇا اهو اڳ ۾ ئي موجود آهي يا نه . چيڪ ڪرڻ لاءِ وجود جي نمبر جي سيل رينج ۾ هر ڀيري، اسان ڪوڊ کي ترتيب ڏنو COUNTIF فنڪشن سان، هي فنڪشن چيڪ ڪريو a نئون بي ترتيب نمبر جي فهرست ۾ جي اڳ ۾ ئي موجود نمبر ان کي داخل ڪرڻ کان اڳ.

وڌيڪ پڙهو : Excel Formula to generate Random Number (5 مثال)

2. رنڊم نمبر جنريٽر لاءِ مقرر ٿيل لوئر بائونڊ ۽ اپر بائونڊ بغير ڪنهن نقل سان

جي بي ترتيب نمبر پيدا ڪرڻ هڪ تعريف ڪيل حد جي اندر، اسان کي ڪرڻو پوندو اسان جي VBA ڪوڊ ۾ لوئر بائونڊ ۽ اوپر بائونڊ سيٽ ڪريو. معلومات لاءِ، هيٺيون بائونڊ آهي گهٽ نمبر ۽ مٿيونبي ترتيب نمبر جنريٽر لاءِ رينج ۾ سڀ کان وڏو نمبر آهي. اسان هيٺ ڏنل فارمولا پنهنجي ڪوڊ ۾ استعمال ڪري سگهون ٿا.

(اوپر بائونڊ - لوئر بائونڊ + 1) * Rnd + Lowerbound

2.1 Random نمبر جنريٽر- ڊيسيمل

ٽاسڪ : 10 بي ترتيب نمبر ٺاھيو وچ ۾ 10 ۽ 20 <1 ۾ سيلز A1:A10.

ڪوڊ : داخل ڪريو هيٺ ڏنل ڪوڊ بصري بنيادي ايڊيٽر ۾ ۽ دٻايو F5 ڪرڻ چلايو ان کي.

9583

آئوٽ پٽ : مٿي ڏنل اسڪرين شاٽ ڏيکاري ٿو 10 منفرد بي ترتيب نمبر 1 ۽ 10 جي رينج ۾.

2.2 رينڊم نمبر جنريٽر- انٽيجر

هن مثال ۾، اسان استعمال ڪنداسين VBA انٽ فنڪشن ڪرڻ لاءِ هٽايو جي فرڪشنل حصو مان بي ترتيب نمبرن مان.

ٽاسڪ : 20 بي ترتيب انٽيجر نمبر ٺاھيو وچ ۾ 1 ۽ 20 سيلز A1:B10 ۾.

ڪوڊ : داخل ڪريو هيٺ ڏنل ڪوڊ بصري بنيادي ايڊيٽر ۾ ۽ دٻايو F5 ڪرڻ چلايو ان کي.

7485

آئوٽ پُٽ : مٿي ڏنل اسڪرين شاٽ ڏيکاري ٿو 20 منفرد بي ترتيب انٽيجر نمبر 1 ۽ 20 جي حد ۾.

وڌيڪ پڙهو: بي ترتيب نمبر جنريٽر Excel ۾ بغير ڪنهن ورجائي (9 طريقن)

ملندڙ پڙھڻ

  • بي ترتيب نمبر جنريٽر سان گڏ ڊيٽا اينالائسز ٽول ۽ افعال ۾ Excel
  • ڪيئن ڪجي ايڪسل ۾ بي ترتيب ڊيٽا ٺاهيو (9آسان طريقا)
  • بي ترتيب 5 عددي نمبر جنريٽر Excel ۾ (7 مثال)
  • بي ترتيب 4 عددي نمبر جنريٽر Excel ۾ (8 مثال) 10>9>1>بي ترتيب نمبر ٺاھيو لسٽ مان Excel ۾ (4 طريقا)

3. Disimal Places for Unique Random Number Generator in Excel VBA

اسان استعمال ڪري سگھون ٿا گول فنڪشن اسان جي ڪوڊ ۾ وضاحت جي نمبر جي ڊيسيمل جڳهن ان ۾ بي ترتيب سان ٺاهيل منفرد نمبر . فنڪشن جو نحو آهي-

گول (اظهار، [numdecimalplaces])

اسان کي ضرورت آهي وضاحت جي 2nd دليل اسان جي ضرورت جي مطابق.

ٽاسڪ : 20 بي ترتيب نمبر ٺاھيو 2 decimal جڳهن سان <1 جي وچ ۾>1 ۽ 20 ۾ سيلز A1:B10.

ڪوڊ : داخل ڪريو هيٺ ڏنل ڪوڊ بصري بنيادي ايڊيٽر ۾ ۽ دٻايو F5 ڪرڻ چلايو ان کي.

3078

آئوٽ پُٽ : مٿي ڏنل اسڪرين شاٽ ڏيکاري ٿو 20 منفرد بي ترتيب انٽيجر نمبرن سان 2 ڊيسيمل جايون رينج 1 ۽ 20 ۾.

وڌيڪ پڙهو: ڊسيملز سان ايڪسل ۾ رينڊم نمبر ٺاهيو (3 طريقا)<2

4. بي ترتيب نمبر جنريٽر لاءِ يوزر فارم ٺاهيو جنهن ۾ ايڪسل VBA ۾ نقل نه آهي

هن مثال ۾، اسان ڏيکارينداسين ته ڪيئن استعمال ڪجي UserForm in Excel VBA ڪرڻ بي ترتيب نمبر ٺاهي سان ڪنهن به نقل نه .

ٽاسڪ: پيدا ڪريو20 بي ترتيب نمبر سيل جي حد ۾ A1:B10 استعمال ڪندي هڪ UserForm سان انپٽ ويلز (i) لوئر بائونڊ (ii) 1 1 .

  • وڃو ڊولپر ٽيب مان Excel ربن .
  • ڪلڪ ڪريو The Visual بنيادي آپشن.

  • ۾ Visual Basic For Applications ونڊو، ڪلڪ ڪريو Insert dropdown ڪرڻ لاءِ منتخب ڪريو جي يوزر فارم اختيار.
    • 11>0>
    • ۾ يوزر فارم شامل ڪريو a ليبل .
    • ڪيپشن ليبل جيئن لوئر بائونڊ ملڪيتن ۾.

    • شامل ڪريو ٻه وڌيڪ ليبل نالي ڏنل اوپر بائونڊ ۽ ڊيسيمل جڳهيون .

    • هاڻي شامل ڪريو ٽي ٽيڪسٽ باڪسز يوزر فارم ۾.

    • هن اسٽيج تي، شامل ڪريو a CommandButton ۽ ان جو نالو Generate .

    • هاڻي، ڊبل ڪلڪ ڪريو The CommandButton ۽ هيٺ ڏنل code ڪوڊ ايڊيٽر ۾ رکو. 
    3661

    • دٻايو F5 دٻايو چلڻ جي ڪوڊ ۽ UserForm ظاهر ٿيو .
    • لوئر بائونڊ ، اوپر بائونڊ، ۽ نمبر مان ڊيسيمل جڳھون ۾ يوزر فارم ۽ دٻايو ٺاھيوبٽڻ .

    آئوٽ پُٽ : سيلز A1:B10 ۾، اتي آهن 20 بي ترتيب انگ سان 2 ڊيسيمل جايون 1 کان 30 جي حد ۾.

    0> وڌيڪ پڙهو: ڪيئن ٺاھيو بي ترتيب نمبرن بغير نقلن جي Excel ۾ فڪس فنڪشن بدران انٽ فنڪشن ڪرڻ لاءِ منفرد انٽيجر نمبر ٺاهي . فنڪشن هٽائي ٿو هڪ نمبر جو جزوي حصو جيئن انٽ فنڪشن .

نتيجو

هاڻي، اسان ڄاڻون ٿا ته مناسب مثالن جي مدد سان Excel ۾ VBA استعمال ڪندي منفرد بي ترتيب نمبر ڪيئن ٺاهيا وڃن. اميد آهي ته، اهو توهان جي ڪارڪردگي کي وڌيڪ اعتماد سان استعمال ڪرڻ ۾ مدد ڪندو. ڪي به سوال يا تجويزون انھن کي ھيٺ ڏنل تبصري خاني ۾ رکڻ نه وساريندا.

پويون پوسٽ ايڪسل ۾ 2 ڪالمن کي ڪيئن منجمد ڪجي (5 طريقا)
ايندڙ پوسٽ ايڪسل ۾ سيل مان ٽيڪسٽ ڪيئن ڪڍو (5 طريقا)

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