LAJITTELE TIEDOT SATUNNAISESTI EXCEL VBA: SSA - EASY EXCEL -MAKROT

Alla tarkastelemme ohjelmaa Excel VBA että lajittelee tiedot satunnaisesti (tässä esimerkissä lajittelee nimet satunnaisesti).

Tilanne:

Lajittele tiedot satunnaisesti Excel VBA: ssa

1. Ilmoitamme ensin neljä muuttujaa. Yksi muuttuja tyyppi String kutsumme TempString, yksi muuttuja tyyppi Integer kutsumme TempInteger, yksi muuttuja tyyppi Integer kutsumme i, ja yksi muuttuja tyyppi Integer kutsumme j.

Ei mitääntempStringKuten Jousisoitin, tempIntegerKuten Kokonaisluku, iKuten Kokonaisluku, jKuten Kokonaisluku

2. Kirjoitamme sarakkeeseen B 5 satunnaislukua (yksi kullekin nimelle). Käytämme tähän laskentataulukkofunktiota RandBetween.

Varteni = 1Vastaanottaja5
Solut (i, 2). Arvo = WorksheetFunction.RandBetween (0, 1000)
Seuraavai

Tulos tähän mennessä:

sovita vasemmanpuoleisen edun tyyppi oikeanpuoleiseen esimerkkiin.

Tulos tähän mennessä

Käytämme nimien lajittelussa kunkin nimen vieressä olevia numeroita. Nimi, jolla on ensin pienin numero, toiseksi pienin numero, toinen jne.

3. Aloitamme a Kaksinkertainen silmukka .

miten binomdistia käytetään Excelissä

Varteni = 1Vastaanottaja5
Vartenj = i + 1Vastaanottaja5

4. Lisää seuraava koodirivi:

JosSolut (j, 2) ArvoSitten

Esimerkki: kun i = 1 ja j = 2, Wendyä ja Richardia verrataan. Koska Richardilla on pienempi numero, vaihdamme Wendyn ja Richardin. Richard on nyt ensimmäisellä sijalla. Jos i = 1 ja j = 3, Richardia ja Joostia verrataan. Joostilla on suurempi luku, joten mitään ei tapahdu. Tällä tavalla Excel VBA saa nimen, jolla on pienin numero ensimmäisessä paikassa. Jos i = 2, Excel VBA saa nimen, jolla on toiseksi pienin numero toisessa paikassa jne.

5. Jos totta, me vaihtaa nimet.

tempString = Solut (i, 1). Arvo
Solut (i, 1). Arvo = Solut (j, 1). Arvo
Solut (j, 1). Arvo = tempString

6. Ja vaihdamme numerot.

tempInteger = Solut (i, 2). Arvo
Solut (i, 2). Arvo = Solut (j, 2). Arvo
Solut (j, 2). Arvo = tempInteger

7. Muista sulkea If -lause.

Loppu Jos

8. Älä unohda sulkea kahta silmukkaa.

Seuraavaj
Seuraavai

9. Testaa ohjelma.

mitä tapahtuu likimääräisessä ottelun vlookupissa

Tulos:

Lajittele datatulos satunnaisesti

Huomautus: voit lisätä rivin, joka poistaa sarakkeen B numerot. On vielä hienompaa sijoittaa jokaisen nimen numerot taulukkoon, joten laskentataulukkoon ei lisätä numeroita. Havainnollistamiseksi olemme kuitenkin päättäneet sijoittaa arvot taulukkoon.

8/11 valmis! Lue lisää silmukoista>
Siirry seuraavaan lukuun: Makrovirheet