بۇ ماقالىدە Excel دا VBA نى ئىشلىتىپ كۆپەيتمىسى يوق ئىختىيارى سان ھاسىللىغۇچ نىڭ 4 مىسالى كۆرسىتىلدى. بۇ يەردە بىز Excel نىڭ ئىچىگە قاچىلانغان Rnd ئىقتىدارىنى ئىشلىتىپ كودىمىزنى تەڭشەيمىز. مىساللارغا شۇڭغۇپ ، ئۆزگىچە تاسادىپىي سان ھاسىل قىلىش تېخنىكىسىنى ئۆگىنىمىز.

ئەمەلىي مەشغۇلات دەپتىرىنى چۈشۈرۈڭ 3> كۆپەيتىلمىگەن ئىختىيارى سان گېنېراتورى. Xlsm 0> Visual Basic تەھرىرلىگۈچتە كود يېزىڭ كۆرۈنۈشلۈك ئاساسىي تەھرىرلىگۈچتىكى كود . باسقۇچلارغا ئەگىشىڭ دىن نى ئېچىڭ كۆرۈنۈشلۈك ئاساسىي تەھرىرلىگۈچ نى ئېچىڭ ۋە ئۇ يەرگە بىر قىسىم كودلارنى يېزىڭ> ئاچقۇچى بەتكۈچ Excel لېنتىسى .

كۆرۈنۈش ئاساسى تاللاشنى چېكىڭ.

• قوللىنىشچان پروگراممىلارنىڭ كۆرۈنۈش ئاساسى كۆزنىكىدە ، تامچە قىستۇرما نى نى چېكىپ ، يېڭى بۆلەكنى تاللاڭ. تاللانما.

دىن نى ئىجرا قىلىڭ .

1. كۆپەيتىلمىگەن ئىختىيارى سان ھاسىل قىلىش ئۈچۈن VBA Rnd فۇنكسىيەسىنى ئىشلىتىش

Rnd ئىقتىدارى Excel VBA دىن 0 ئارىسىدا بولغان ئىختىيارى سانلارنى ھاسىل قىلىڭ ۋە 1 مەخسۇس.

ۋەزىپە : كاتەكچىدىكى A1: A10.

كود : كۆرۈنمە ئاساسىي تەھرىرلىگۈچ گە تۆۋەندىكى كود نى كىرگۈزۈپ ، F5 نى بېسىڭ دىن ئىجرا قىلىش ئۇنى ئىجرا قىلىڭ.

2110

> 0 ۋە 1 نىڭ دائىرىسىدە.

كود ئىزاھاتى:> كاتەكچە دائىرىسى A1: A10 غا ئىختىيارى سانلارنى قىستۇرۇش. a يېڭى سان نى قىستۇرۇشتىن بۇرۇن ، بىز دەۋرىدىكى دىن گە كۆرۈنۈش نى ئىشلىتىپ نومۇرى نى ئىشلەتتۇق. 1> ئالدىن بېكىتىلگەن كاتەكچە دائىرىسى (A1: A10) مەيلى ئاللىبۇرۇن مەۋجۇت ياكى ئەمەس. ھەر قېتىم كاتەكچە دائىرىسىدىكى سان نىڭ مەۋجۇتلۇقى نى تەكشۈرۈش ئۈچۈن ، بىز بۇ كودنى COUNTIF ئىقتىدارى ، بۇ ئىقتىدار تىزىملىكتىكى تىزىملىكتىكى دىكى يېڭى ئىختىيارى سان نى تەكشۈرۈشتىن بۇرۇن بار بولغان سانلارنى تەكشۈرىدۇ.

تېخىمۇ كۆپ ئوقۇڭ : ئىختىيارى سان ھاسىل قىلىدىغان Excel فورمۇلا (5 مىسال)

2. كۆپەيتىلگەن كۆپەيتىلمىگەن تۆۋەنكى ۋە يۇقىرى ئېقىندىكى ئىختىيارى سان ھاسىللىغۇچ VBA كودىمىزدا تۆۋەن چەك ۋە يۇقىرى چەك نى تەڭشەڭ. ئۇچۇرغا ئېرىشىش ئۈچۈن ، تۆۋەن چەك بولسا ئەڭ تۆۋەن سان ۋە يۇقىرى چەك. تاسادىپىي سان ھاسىل قىلغۇچى ئۈچۈن دائىرە دىكى ئەڭ يۇقىرى سان . كودىمىزدا تۆۋەندىكى فورمۇلا نى ئىشلىتەلەيمىز.

سان ھاسىل قىلغۇچى- ئونلۇق

ۋەزىپە : 10 بىلەن 20 ئارىلىقىدا 10 ئىختىيارى سان ھاسىل قىلىڭ> A1: A10.

قاراڭ: Excel دىكى ئىككى ھۈجەيرىنى قانداق سېلىشتۇرۇش (10 ئاسان ئۇسۇل)

كود : كۆرۈنمە ئاساسىي تەھرىرلىگۈچ گە تۆۋەندىكى كود نى كىرگۈزۈپ ، F5 نى بېسىڭ دىن نى ئىجرا قىلىڭ .

6040

> 1 ۋە 10 ئارىلىقىدىكى دائىرىسىدە> VBA Int ئىقتىدارى دىن بۆلەك قىسمى نى ئىختىيارى سان دىن ئۆچۈرۈڭ.

ۋەزىپە : A1: B10 كاتەكچىلىرىدە 1 بىلەن 20 ئارىسىدا 20 ئىختىيارى پۈتۈن سان ھاسىل قىلىڭ.

كود : كۆرۈنمە ئاساسىي تەھرىرلىگۈچ گە تۆۋەندىكى كود نى كىرگۈزۈپ ، F5 نى بېسىڭ دىن نى ئىجرا قىلىڭ ئۇنى ئىجرا قىلىڭ.

3323

2> 1 ۋە 20 ئارىلىقىدىكى دائىرىسىدە.

تېخىمۇ كۆپ ئوقۇڭ: 3>

مۇشۇنىڭغا ئوخشاش ئوقۇشلۇقلار

• Excel دىكى سانلىق مەلۇمات ئانالىز قورالى ۋە ئىقتىدارلىرى بىلەن ئىختىيارى سان ھاسىللىغۇچ
• قانداق قىلىش Excel دا ئىختىيارى سانلىق مەلۇمات ھاسىل قىلىڭ (9ئاسان ئۇسۇللار)
• Excel دىكى ئىختىيارى 5 خانىلىق گېنېراتور (7 مىسال)
• 2>
• Excel دىكى تىزىملىكتىن ئىختىيارى سان ھاسىل قىلىڭ (4 خىل ئۇسۇل)

3. Excel VBA دىكى ئۆزگىچە ئىختىيارى نومۇر ھاسىل قىلغۇچىنىڭ ئونلۇق ئورنىنى بەلگىلەڭ ئونلۇق ئورۇندىكى سان تاسادىپىي ھاسىل قىلىنغان ئۆزگىچە سان . فۇنكىسىيەنىڭ گرامماتىكىسى بولسا-

يۇمىلاق (ئىپادىلەش ، [numdecimalplaces])

بىز نى بەلگىلىشىمىز كېرەك. تەلىپىمىز بويىچە 2-تالاش-تارتىش .

ۋەزىپە :> 1 ۋە 20 كاتەكچىدىكى A1: B10.

كود : كۆرۈنمە ئاساسىي تەھرىرلىگۈچ گە تۆۋەندىكى كود نى كىرگۈزۈپ ، F5 نى بېسىڭ دىن نى ئىجرا قىلىڭ.

6429

1 ۋە 20 ئارىلىقىدىكى 2 ئونلۇق ئورۇن

تېخىمۇ كۆپ ئوقۇڭ: 2>

4. Excel VBA دا كۆپەيتىلمىگەن ئىختىيارى نومۇر ھاسىللىغۇچنىڭ ئىشلەتكۈچى شەكلىنى تەرەققىي قىلدۇرۇش

بۇ رەسىمدە ، بىز <1 دىكى ئىشلەتكۈچى فورماتى نى قانداق ئىشلىتىشنى كۆرسىتىمىز> Excel VBA دىن غىچە كۆپەيتىلگەن بىلەن ئىختىيارى سان ھاسىل قىلىدۇ.

ۋەزىپە: كاتەكچە دائىرىسىدىكى 20 ئىختىيارى سان A1: B10 كىرگۈزۈش قىممىتى (i) تۆۋەن چەك (ii) بىلەن UserForm نى ئىشلىتىپ ئۈستۈنكى سىزىق (iii) ئونلۇق ئورۇن سانى. <2 .3 <<ئاساسىي تاللانما> دىن UserForm تاللاشنى تاللاڭ.

• بەلگىسى >
  • ئىككى تېخىمۇ كۆپ بەلگىسىنى قوشۇڭ 24>

• ھازىر UserForm غا ئۈچ TextBoxes نى قوشۇڭ.

• بۇ باسقۇچتا ، a بۇيرۇق كۇنۇپكىسى نى قوشۇڭ ۋە ئۇنىڭغا ھاسىل قىلىڭ .

• ھازىر ، بۇيرۇق كۇنۇپكىسى نى قوش چېكىڭ ۋە تۆۋەندىكى كود نى كود تەھرىرلىگۈچى گە قويۇڭ.

6034

• F5 نى بېسىڭ ، ئىجرا قىلىڭ كود ۋە UserForm پەيدا بولدى . 2> ئونلۇق ئورۇن دىكى UserForm دىكى ھاسىل قىلىش كۇنۇپكىسى.

سانلار بىلەن 1 دىن 30 گىچە بولغان 2 ​​ئونلۇق ئورۇن بىلەن

تېخىمۇ كۆپ ئوقۇڭ: Excel دا تەكرارلانمىغان ئىختىيارى سانلارنى قانداق ھاسىل قىلىش (7 خىل ئۇسۇل)

ئەستە تۇتۇشقا تېگىشلىك ئىشلار

• فۇنكسىيە نىڭ ئورنىغا Int فۇنكسىيەسى دىن نىڭ ئورنىغا پۈتۈن پۈتۈن سانلارنى ھاسىل قىلىدۇ . فۇنكسىيە سان فۇنكسىيەسى گە ئوخشاش سان نىڭ بۆلەك قىسمى نى چىقىرىپ تاشلايدۇ.

خۇلاسە

ھازىر ، مۇۋاپىق مىساللارنىڭ ياردىمىدە Excel دىكى VBA ئارقىلىق ئۆزگىچە ئىختىيارى سانلارنى قانداق ھاسىل قىلىشنى بىلىمىز. ئۈمىدۋار ، بۇ ئىقتىدارنى تېخىمۇ ئىشەنچلىك ئىشلىتىشىڭىزگە ياردەم بېرىدۇ. ھەر قانداق سوئال ياكى تەكلىپ ئۇلارنى تۆۋەندىكى باھا رامكىسىغا سېلىشنى ئۇنتۇپ قالماڭ.