ایکسل VBA: د تصادفي شمیرې جنریټر پرته له نقلونو (4 مثالونه)

  • دا شریک کړه
Hugh West

دا مقاله د تصادفي شمیره جنریټر 4 مثالونه په Excel کې د VBA په کارولو سره هیڅ نقل نه وړاندې کوي. دلته به موږ د خپل کوډ تنظیم کولو لپاره د Excel جوړ شوی Rnd فنکشن وکاروو. راځئ چې د ځانګړو تصادفي شمیرو رامینځته کولو تخنیکونو زده کولو لپاره مثالونو ته لاړ شو.

د تمرین کاري کتاب ډاونلوډ کړئ

د تمرین کولو لپاره دا د تمرین کاري کتاب ډاونلوډ کړئ کله چې تاسو دا مقاله لوستلئ.

د تصادفي شمیرې جنریټر پرته د نقل سره 0> په Visual Basic Editor کې کوډ ولیکئ

د دې لپاره چې بې ترتیبه ​​شمیرې پیدا کړئ پرته له نقل ، موږ اړتیا لرو چې پرانستل او VBA ولیکئ کوډ په بصری بنسټیز مدیر کې. د بصری بنسټیز مدیر د پرانستل د مرمو تعقیب وکړئ او هلته یو څه کوډ ولیکئ.

  • <1 ته لاړ شئ>Developer
tab د Excel Ribbonڅخه.
  • کلیک وکړئ د Visual Basic اختیار.
    • په د غوښتنلیکونو لپاره Visual Basic کړکۍ کې، کلیک وکړئ ډراپ ډاون داخل کړئ تر غوره کړئ د نوي ماډل اختیار.

    اوس خپل کوډ د بصری کوډ مدیر دننه کېږدئ او F5 فشار ورکړئ ته چلول دا.

    1. د VBA Rnd فنکشن څخه کار اخستل د تصادفي شمیرې تولید لپاره پرته له نقلونو

    د Rnd فنکشن په ایکسیل VBA تر <1 کې کارول کیږي تصادفي شمیرې پیدا کړئ چې د د 0 ترمنځ وي او 1 ځانګړې.

    ټاسک : د 0 او 1 ترمنځ 10 تصادفي شمیرې پیدا کړئ په حجرو A1:A10 کې.

    کوډ : لاندې کوډ په بصري بنسټیز ایډیټر کې دننه کړئ او F5 فشار ورکړئ د چلولو دا.

    6736

    آؤټ پټ : پورته سکرین شاټ 10 بې ترتیبه ​​شمیرې ښیې په د 0 او 1 رینج کې.

    د کوډ تشریح:

    په دې کوډ کې، موږ د Rnd فنکشن <2 کارولی دی. د د تصادفي شمیرې داخلولو لپاره په د حجرې سلسله A1:A10 کې. مخکې له دې چې د یو نوی شمیره داخل کړو، موږ د د شمیرې لپاره د لیدو لپاره Do while Loop کاروو. 1> د مخکینۍ ټاکل شوې حجرې سلسله (A1:A10) ایا دا دمخه شتون لري یا نه . د موجودیت د حجم د حجرې سلسلې کې د هر ځل چک کولو لپاره، موږ کوډ د COUNTIF فنکشن سره تنظیم کړ، دا فنکشن چک ​​کوي یوه نوی تصادفي شمیره په لست کې د له موجودو شمیرو څخه مخکې له دې چې دا دننه کړي.

    نور ولولئ : د تصادفي شمیرې رامینځته کولو لپاره د ایکسل فارمول (5 مثالونه)

    14> 2. د تصادفي شمیرې جنریټر د تعریف شوي ټیټ باؤنډ او اپر باونډ لپاره پرته له نقلونو

    د تصادفي شمیرې رامینځته کولو لپاره په تعریف شوي حد کې ، موږ اړتیا لرو زموږ په VBA کوډ کې ښکته خوا او پورتنۍ خوا تنظیم کړئ. د معلوماتو لپاره، ښکته خوا د ټیټ شمیره او پورتنۍ برخه ده د تصادفي شمیرې جنریټر لپاره تر ټولو لوړه شمیره په رینج کې ده. موږ کولی شو لاندې فارمول زموږ په کوډ کې وکاروو.

    (پورته باؤنډ – ښکته باونډ + 1) * Rnd + ښکته برخه

    2.1 تصادفي د شمېر پیدا کونکی- لسیزې

    کار : د 10 او 20 ترمنځ <1 تصادفي شمیرې پیدا کړئ> حجرې A1:A10.

    کوډ : د لاندې کوډ په بصری بنسټیز مدیر کې دننه کړئ او F5 فشار ورکړئ د چلولو دا.

    9179

    آؤټ پټ : پورته سکرین شاټ 10 بې ترتیبه ​​شمیرې ښیې د 1 او 10 په سلسله کې.

    2.2 د تصادفي شمیرې جنریټر- انټیجر

    په دې انځور کې، موږ به د <1 څخه کار واخلو> د VBA انټ فنکشن تر د د فرقې برخې له تصادفي شمیرو څخه لرې کړئ.

    د کار : په حجرو A1:B10 کې د 20 تصادفي عددي عددونه د 1 او 20 ترمنځ تولید کړئ.

    کوډ : د لاندې کوډ په بصری بنسټیز مدیر کې دننه کړئ او F5 فشار ورکړئ د چلولو دا.

    4253

    آؤټپټ : پورتنۍ سکرین شاټ 20 بې ترتیبه ​​انټیجر شمیرې ښیې په د 1 او 20 رینج کې.

    نور ولولئ: په Excel کې د تصادفي شمیرې جنریټر پرته له تکرار سره (9 میتودونه)

    ورته لوستل

    • په Excel کې د ډیټا تحلیلي وسیلې او دندو سره د تصادفي شمیرې جنریټر
    • څنګه په Excel کې تصادفي ډاټا تولید کړئ (9اسانه طریقه)
    • په Excel کې د تصادفي 5 ډیجیټ شمیرې جنریټر (7 مثالونه)
    • په Excel کې د تصادفي 4 ډیجیټ شمیرې جنریټر (8 مثالونه)
    • په Excel کې د لیست څخه تصادفي شمیره رامینځته کړئ (4 لارې) 10>11>

      3. په Excel VBA کې د بې ترتیبه ​​شمیرې جنریټر لپاره لسیزې ځایونه مشخص کړئ

      موږ کولی شو زموږ په کوډ کې د ګول فعالیت وکاروو ترڅو مشخص د د د د لسیزو ځایونو په په تصادفي ډول تولید شوي ځانګړي شمیرې کې. د فنکشن نحو دا دی-

      ګراونډ(اظهار، [numdecimalplaces])

      موږ اړتیا لرو مشخص کړو دوهم دلیل زموږ د اړتیا سره سم.

      ټاسک : د 2 لسیزو ځایونو سره 20 تصادفي شمیرې رامینځته کړئ د <1 ترمینځ>1 او 20 په حجرو A1:B10 کې.

      کوډ : د لاندې کوډ په بصری بنسټیز مدیر کې دننه کړئ او F5 فشار ورکړئ د چلولو دا.

      2830

      آؤټپټ : پورتنۍ سکرین شاټ د 20 بې ترتیبه ​​انټیجر شمیرې ښیې 2 لسیزې ځایونه په د 1 او 20 رینج کې.

      نور ولولئ: په ایکسل کې د لسیزو سره تصادفي شمیره رامینځته کړئ (3 میتودونه)

      4. په Excel VBA کې د نقلونو پرته د تصادفي شمیرې جنریټر لپاره یو کارن فارم رامینځته کړئ

      پدې مثال کې ، موږ به وښیو چې څنګه د یوزرفارم په <1 کې وکاروو د ایکسل VBA تر څو تصادفي شمیرې پیدا کړي بې له بې نقلونو سره.

      د کار: جوړول20 تصادفي شمیرې د حجرې په سلسله کې A1:B10 د د کاروونکي فارم په کارولو سره د د ان پټ ارزښتونو سره (i) ښکته خوا (ii) پورته خوا (iii) د لسیزو ځایونو شمیر.

      یوزر فارم جوړ کړئ:

      لاندې مرحلې تعقیب کړئ د یو کارن فارم زموږ د غوښتل شوي ان پټ ساحو سره جوړ کړئ .

      • د Excel ربن څخه Developer tab ته لاړ شئ.
      • کلیک وکړئ د لید اساسی انتخاب.

      • په د غوښتنلیکونو لپاره Visual Basic کړکۍ کې، د ډراپ ډاون داخل کړئ <2 کلیک وکړئ د استعمال کولو لپاره د UserForm اختیار.

      • په UserForm اضافه a لیبل .
      • په ملکیتونو کې د لیبل د لویر باونډ په توګه.

      • اضافه دوه نور لیبل نوم پورته بند او دسیمال ځایونه .

      • اوس درې متن بکسونه په کارن فارم کې اضافه کړئ.

      • په دې مرحله کې، اضافه کړئ یو کمانډ بټن او نوم یې ورکړئ پیدا کړئ .

      • اوس، دوه ځله کلیک وکړئ د کمانډ بټن او لاندې کوډ په کوډ ایډیټر کې واچوئ.
      8605

      • د چلولو لپاره F5 کیس د کوډ <2 او د کارن فارم د ښکاره شو .
      • لوست باونډ ، پورته خوا، او نمبر د د لسیزو ځایونو په UserForm کې او په Generate باندې ټک وکړئتڼۍ .

      آوت : په حجرو A1:B10 کې، دلته 20 تصادفي دي شمیرې سره 2 لسیزې ځایونه په د 1 څخه تر 30 پورې رینج کې.

      29>

      نور ولولئ: په Excel کې د نقلونو پرته تصادفي شمیرې څنګه رامینځته کړئ (7 لارې)

      د یادولو لپاره شیان

      8> موږ کولی شو دا هم وکاروو د Int فنکشن پرځای فکشن فکس کړئ د دې لپاره چې د ځانګړي عدد شمیرې رامینځته کړي . فنکشن د فرقې برخه د نمبر لرې کوي لکه د Int فنکشن .

    پایله

    اوس، موږ پوهیږو چې څنګه د مناسبو مثالونو په مرسته په Excel کې د VBA په کارولو سره ځانګړي تصادفي شمیرې رامینځته کړو. په امید سره، دا به تاسو سره مرسته وکړي چې فعالیت په ډیر ډاډ سره وکاروئ. کومې پوښتنې یا وړاندیزونه مه هیروئ چې لاندې د تبصرې په بکس کې یې ولیکئ.

    هیګ ویسټ په صنعت کې د 10 کلونو تجربې سره خورا تجربه لرونکي ایکسل روزونکی او شنونکی دی. هغه د محاسبې او مالیې په برخه کې د لیسانس سند او د سوداګرۍ اداره کې د ماسټرۍ سند لري. هیګ د تدریس لپاره لیوالتیا لري او د تدریس یوه ځانګړې طریقه یې رامینځته کړې چې تعقیب او پوهیدل یې اسانه دي. د ایکسل په اړه د هغه ماهر پوهه د نړۍ په زرګونو زده کونکو او مسلکيانو سره مرسته کړې چې خپل مهارتونه ښه کړي او د دوی په مسلک کې غوره شي. د خپل بلاګ له لارې، هیګ خپله پوهه له نړۍ سره شریکوي، د وړیا Excel ټیوټوریلونه او آنلاین روزنه وړاندې کوي ترڅو د افرادو او سوداګرۍ سره مرسته وکړي چې خپل بشپړ ظرفیت ته ورسیږي.