Tha an artaigil seo a’ sealltainn 4 eisimpleirean de gineadair àireamh air thuaiream gun dùblaidhean a’ cleachdadh VBA ann an Excel. An seo cleachdaidh sinn gnìomh Rnd togte Excel gus ar còd a rèiteachadh. Dàibheadh ​​​​sinn a-steach do na h-eisimpleirean gus dòighean ionnsachadh gus àireamhan air thuaiream sònraichte a ghineadh.

Luchdaich sìos Leabhar-obrach Cleachdaidh

Luchdaich sìos an leabhar-obrach cleachdaidh seo gu eacarsaich fhad ‘s a tha thu a’ leughadh an artaigil seo.

4 Eisimpleirean de ghineadair àireamh air thuaiream gun dùblaidhean ann an Excel VBA

Sgrìobh Còd ann an Deasaiche Lèirsinneach Bunasach

Gus àireamhan air thuaiream a chruthachadh gun dùblaidhean , feumaidh sinn fosgladh agus VBA a sgrìobhadh còd anns an deasaiche bunaiteach lèirsinneach. Lean na ceumannan gus fhosgladh an deasaiche bunaiteach lèirsinneach agus sgrìobh còd an sin.

• Rach gu >Leasaiche taba on Excel Ribbon .
• Briog air an roghainn Visual Basic.

• Anns an uinneag Visual Basic For Applications , cliog air an Cuir a-steach tuiteam-sìos gus tagh am Modal Ùr roghainn.

A-nis cuir do còd am broinn deasaiche còd lèirsinneach agus brùth F5 gu ruith it.

1. Cleachd gnìomh VBA Rnd gus àireamh air thuaiream a ghineadh gun dùblaidhean

Tha an gnìomh Rnd air a chleachdadh ann an Excel VBA gu gineadh àireamhan air thuaiream a tha eadar 0 agus 1 gun samhail.

Tasg : Cruthaich 10 àireamhan air thuaiream eadar 0 agus 1 ann an cealla A1:A10.

Còd : Cuir a-steach an còd a leanas anns an deasaiche bunaiteach lèirsinneach agus brùth F5 gu ruith it.

3025

Toradh : Tha an dealbh-sgrìn gu h-àrd a' sealltainn 10 àireamhan air thuaiream gun samhail anns an raon de 0 agus 1.

Còd Mìneachadh:

Sa chòd seo, chleachd sinn an gnìomh Rnd gus cuir a-steach àireamhan air thuaiream anns an raon cealla A1:A10 . Mus do chuir sinn a-steach a àireamh ùr , chleachd sinn Do While Loop gu look airson an àireamh anns an raon cealla ro-mhìnichte (A1:A10) a bheil e ann mu thràth no nach eil . Gus dearbhadh gu bheil an àireamh anns an raon cealla gach turas, shuidhich sinn an còd leis a' ghnìomh COUNTIF , An gnìomh seo seic a àireamh air thuaiream ùr air an liosta dhe àireamhan a tha ann mu thràth mus cuir thu a-steach e.

Leugh Tuilleadh : Formula Excel gus Àireamh air thuaiream a ghineadh (5 eisimpleirean)

2. Gineadair Àireamh air thuaiream airson Sònraichte Ìosal agus Uachdrach gun Dhùblaidhean

Gus àireamhan air thuaiream a ghineadh taobh a-staigh raon ainmichte , feumaidh sinn suidhich an ìosal agus gu h-àrd anns a’ chòd VBA againn. Airson fiosrachaidh, is e an ìosal an àireamh as ìsle agus an gu h-àrd'S e an àireamh as àirde san raon airson gineadair nan àireamhan air thuaiream. 'S urrainn dhuinn na leanas a chleachdadh foirmle anns a' chòd againn.

(gu h-àrd – gu h-ìseal + 1) * Rnd + nas ìsle

2.1 Random Gineadair Àireamh- Deicheach

Tasg : Cruthaich 10 àireamhan air thuaiream eadar 10 agus 20 ann an ceallan A1: A10.

Còd : Cuir a-steach an còd a leanas anns an deasaiche bunaiteach lèirsinneach agus brùth F5 gu ruith it.

1584

Cur a-mach : Tha an dealbh-sgrìn gu h-àrd a' sealltainn 10 àireamhan air thuaiream gun samhail anns an raon de 1 agus 10.

2.2 Gineadair Àireamh air thuaiream- Slànaighear

Anns an dealbh seo, cleachdaidh sinn an Gnìomh VBA Int gu thoir air falbh am pàirt bloighteach bho na àireamhan air thuaiream .

Tasg : Cruthaich 20 àireamh shlànaighear air thuaiream eadar 1 agus 20 ann an cealla A1:B10.

Còd : Cuir a-steach an còd a leanas anns an deasaiche bunaiteach lèirsinneach agus brùth F5 gu ruith it.

9428

Cur a-mach : Tha an dealbh-sgrìn gu h-àrd a' sealltainn 20 àireamh shlànaighear air thuaiream gun samhail anns an raon de 1 agus 20.

Leugh More: Gineadair Àireamh air thuaiream ann an Excel gun ath-aithris (9 dòighean)

Leughaidhean coltach ris

• Gineadair Àireamh air thuaiream le Inneal Mion-sgrùdadh Dàta agus Gnìomhan ann an Excel
• Mar a nì thu Cruthaich dàta air thuaiream ann an Excel (9Dòighean furasta)
• Gineadair Àireamh air thuaiream 5 Didseatach ann an Excel (7 eisimpleirean)
• Gineadair Àireamh 4 Didseatach air thuaiream ann an Excel (8 eisimpleirean)
• Gin àireamh air thuaiream bhon Liosta ann an Excel (4 dòighean)

3. Sònraich Àiteachan Deicheach airson Gineadair Àireamh air thuaiream Sònraichte ann an Excel VBA

Is urrainn dhuinn an gnìomh Cruinn a chleachdadh nar còd gus a shònrachadh àireamh de àitean deicheach anns na àireamhan sònraichte a chaidh a chruthachadh air thuaiream . Is e co-chàradh na gnìomh-

Round(expression, [numdecimalplaces])

Feumaidh sinn a shònrachadh 2na argamaid a rèir ar riatanas .

Tasg : Cruthaich 20 àireamh air thuaiream le 2 ionad deicheach eadar 1 agus 20 ann an cealla A1:B10.

Còd : Cuir a-steach an còd a leanas anns an deasaiche bunaiteach lèirsinneach agus brùth F5 gu ruith it.

5244

Toradh : Tha an dealbh-sgrìn gu h-àrd a' sealltainn 20 àireamh shlànaighear air thuaiream sònraichte le 2 ionad deicheach anns an raon de 1 agus 20.

Leugh More: Gin àireamh air thuaiream ann an Excel le deicheamhan (3 dòighean)

4. Leasaich foirm-cleachdaidh airson gineadair àireamh air thuaiream gun dùblaidhean ann an Excel VBA

Anns an dealbh seo, seallaidh sinn mar a chleachdas tu UserForm ann an Excel VBA gu àireamhan air thuaiream a ghineadh le gun dùblaidhean .

Tasg: Gin20 àireamh air thuaiream ann an raon cealla A1:B10 a’ cleachdadh Foirm-cleachdaidh leis na luachan cuir a-steach (i) ìosal (ii) gu h-àrd (iii) àireamh de dh'àiteachan deicheach.

Cruthaich Foirm-cleachdaidh:

Lean na ceumannan gu h-ìosal gus Foirm-chleachdaiche a chruthachadh leis na raointean ion-mhiannaichte againn .

• Rach gu taba Developr on Ribbon Excel .
• Briog air an Lèirsinneach Roghainn bunaiteach.

• San uinneag Visual Basic For Applications , cliog air an Insert dropdown gus tagh an roghainn Foirm-chleachdaiche .

• Anns an Foirm-chleachdaiche cuir a leubail .
• Cuir a-steach an leubail mar LowerBound anns na feartan.

<3

• Cuir dhà a bharrachd leubail leis an ainm Upperbund agus DecimalPlaces ris.

• A-nis cuir trì bogsaichean teacsa anns an Foirm-chleachdaiche .

9>Aig an ìre seo, cuir a Button Command agus ainmich e Gin .

• A-nis, briogadh dùbailte air a' Putan-àithne agus cuir an còd a leanas ann an deasaiche a' chòd .

4164

• Brùth F5 gu ruith an còd agus tha Foirm-chleachdaiche air nochdadh .
• Cuir an gu h-ìosal , gu h-àrd, agus an àireamh de àitean deicheach anns an Foirm-chleachdaiche agus buail air an GeneratePutan .

Toradh : Ann an cealla A1:B10 , tha 20 air thuaiream àireamhan le 2 ionad deicheach anns an raon de 1 gu 30.

Leugh Tuilleadh: Mar a ghineas tu àireamhan air thuaiream gun dùblaidhean ann an Excel (7 dòighean)

Rudan ri cuimhneachadh

• Dh’fhaodamaid cuideachd an Ceartaich gnìomh an àite an gnìomh Int gus àireamhan slàn-àireamh sònraichte a ghineadh . Bheir an gnìomh air falbh am pàirt bloighteach de àireamh dìreach mar an gnìomh Int .

Co-dhùnadh

A-nis, tha fios againn mar a ghineas sinn àireamhan air thuaiream sònraichte a’ cleachdadh VBA ann an Excel le cuideachadh bho eisimpleirean iomchaidh. Tha sinn an dòchas gun cuidicheadh ​​e thu gus an comas-gnìomh a chleachdadh nas misneachaile. Ceistean no molaidhean sam bith na dìochuimhnich an cur sa bhogsa bheachdan gu h-ìosal.