Ugrás a tartalomra

Hogyan generálható lottószám az excelben?

Gondolt már arra, hogy lottószámokat állítson elő Excel-ben, vagy készítsen lottószám-generátort Excelben egyedül? Ebben a cikkben három módszert közlök az Ön számára, hogy könnyen elvégezhesse.


Létrehozhat lottószámokat az Excel függvényekkel

Ez a módszer végigvezeti Önt több Excel-függvény alkalmazásán keresztül a lottószámok előállításához. És a következőket teheti:

1. Írjon be egy üres munkalapba oszlopfejléceket az A1: C1 tartományba, az alábbi képernyőképen:

2. Írja be a képleteket az A, B és C oszlopba:

(1) Az A2 cellába írja be a képletet = RAND (), majd húzza a Kitöltő fogantyút az A2: A50 tartományba.
(2) A B2 cellába írja be a képletet =RANK($A2,$A$2:$A$50)+COUNTIF(B$1:B1,B1)-1, majd húzza a Kitöltő fogantyút a B2: B50 tartományba. (A képletben A2 az aktuális cellára hagyott véletlenszám, $ A $ 2: $ A $ 50 mind olyan véletlenszám, amelyet az első képlettel kaptunk, B $ 1 az első cella a B oszlopban, és B1 az aktuális fölötti cella sejt).
(3) A C2: C50 tartományba írja be az 1 és 49 közötti sorszámokat.

Ezután kap egy táblázatot a bal oldali képernyőképen:

 

jegyzetszalag A képlet túl bonyolult ahhoz, hogy emlékezzen rá? Mentse el a képletet automatikus szöveges bejegyzésként, és a jövőben csak egy kattintással használhatja újra!
Olvass tovább…     Ingyenes próbaverzió

3. Keressen egy üres tartományt, írja be a sorszámokat vízszintesen egy sorba, az alábbi ábrán látható módon:

4. Az első 1-es sorszám alatt írja be a képletet = VLOOKUP (G1, $ B $ 1: $ C $ 50,2, HAMIS) és húzza a Fill Handle-t a kívánt tartományba.

Megjegyzések: Ebben a képletben a G1 az a cella, amelynek első sorszáma 1, $ B $ 1: $ C $ 50 Unique Rank oszlop és Ball Number oszlop, 2 azt jelenti, hogy értékeket talál a $ B $ 1 tartomány: $ C $ 50 második oszlopában .

Ezután megkapja a sorsolás számát az alábbi képernyőképen:

5. Nem kötelező. Kattintson a gombra, hogy megakadályozza a lottószámok automatikus változását az aktuális munkalap frissítésekor Képlet > Számítási lehetőségek > Kézikönyv.

Könnyen felsorolhatja az összes adatsor kombinációját az Excel programban

Kutools az Excelhez Sorolja fel az összes kombinációt A segédprogramot úgy tervezték, hogy általánosítsa az összes lehetséges kombinációt több megadott adatsorból, és felsorolja ezeket a kombinációkat egy oszlopban, az alábbi képernyőképen.


as felsorolja az összes kombinációt 1

Kutools az Excel számára - Töltse fel az Excelt több mint 300 alapvető eszközzel. Élvezze a teljes funkcionalitású 30 napos INGYENES próbaverziót hitelkártya nélkül! Szerezd meg most

Létrehozhat lottószámokat a VBA Macro segítségével

Ez a módszer arra készteti Önt, hogy VBA makrót alkalmazzon a lottószámok Excelben történő létrehozásához. Kérjük, tegye a következőket:

1. nyomja meg más + F11 gombokkal nyissa meg a Microsoft Visual Basic for Applications ablakot.

2. Kattints betétlap > Modulok új modulablak megnyitásához és illessze be a következő VBA kódot:

VBA: Lottószám-generátor az Excelben

Sub LotteyCode()
Dim Rng As Range
Dim WorkRng As Range
Dim xNumbers(49) As Integer
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Out put to (single cell):", xTitleId, WorkRng.Address, Type:=8)
Set WorkRng = WorkRng.Range("A1")
For xIndex = 1 To 49
xNumbers(xIndex) = xIndex
Next
For xIndex = 1 To 6
xNum = 1 + Application.Round(Rnd * (49 - xIndex), 0)
WorkRng.Offset(0, xIndex - 1).Value = xNumbers(xNum)
xNumbers(xNum) = xNumbers(50 - xIndex)
Next
End Sub

3. megnyomni a F5 vagy kattintson a gombra futás gombra a VBA makró futtatásához.

4. Most a felbukkanó párbeszédpanelen adjon meg egy cellát a lottószámok kiadásához, majd kattintson a gombra OK gombot.

Ezután látni fogja, hogy 6 egyedi lottószám jön létre és jelenik meg a megadott cellákban.


Hozzon létre lottószámokat a Kutools for Excel segítségével

Ha telepítve van a Kutools for Excel, az Véletlen adatok beillesztése segédprogram segítségével egyszerre generálhat lottószámokat az Excelben.

Kutools az Excel számára - Tele van több mint 300 alapvető Excel-eszközzel. Élvezze a teljes funkcionalitású 30 napos INGYENES próbaverziót hitelkártya nélkül! Letöltés most!

1. Jelöljön ki 6 szomszédos cellát, például A1: F1, majd kattintson a gombra Kutools > betétlap > Véletlen adatok beillesztése.

2. Most megjelenik a Véletlen adatok beszúrása párbeszédpanel. Menj a Egész szám fülre írja be 1 in Tól től doboz, írja be 49 in Nak nek jelölje be a négyzetet Egyedi értékek opciót, és kattintson a OK gomb. Most látni fogja, hogy 6 egyedi lottószám jön létre és jelenik meg azonnal a kiválasztott cellákban.

Kutools az Excel számára - Töltse fel az Excelt több mint 300 alapvető eszközzel. Élvezze a teljes funkcionalitású 30 napos INGYENES próbaverziót hitelkártya nélkül! Szerezd meg most


Demo: lottószámok generálása a Kutools for Excel segítségével


Kutools az Excel számára: Több mint 300 praktikus eszköz a keze ügyében! Kezdje el a 30 napos ingyenes próbaidőszakot funkciók korlátozása nélkül. Töltse le most!

Kapcsolódó cikkek:

A legjobb irodai hatékonyságnövelő eszközök

Népszerű szolgáltatások: Ismétlődések keresése, kiemelése vagy azonosítása   |  Üres sorok törlése   |  Oszlopok vagy cellák kombinálása adatvesztés nélkül   |   Kerek Formula nélkül ...
Szuper keresés: Több kritérium VLookup    Többértékű VLookup  |   VLookup több munkalapon   |   Fuzzy Lookup ....
Speciális legördülő lista: Gyors legördülő lista létrehozása   |  Függő legördülő lista   |  Többszörösen válassza ki a legördülő listát ....
Oszlopkezelő: Adjon meg egy adott számú oszlopot  |  Oszlopok mozgatása  |  Kapcsolja be a Rejtett oszlopok láthatósági állapotát  |  Tartományok és oszlopok összehasonlítása ...
Kiemelt funkciók: Rács fókusz   |  Design nézet   |   Nagy Formula bár    Munkafüzet és lapkezelő   |  Erőforrás-könyvtár (Auto szöveg)   |  Dátumválasztó   |  Kombinálja a munkalapokat   |  Cellák titkosítása/dekódolása    E-mailek küldése listánként   |  Szuper szűrő   |   Speciális szűrő (félkövér/dőlt/áthúzott szűrés...) ...
A 15 legjobb eszközkészlet12 szöveg Eszközök (Szöveg hozzáadása, Karakterek eltávolítása,...)   |   50 + Táblázatos Típusai (Gantt-diagram,...)   |   40+ Praktikus képletek (Számolja ki az életkort a születésnap alapján,...)   |   19 beszúrás Eszközök (Helyezze be a QR-kódot, Kép beszúrása az útvonalból,...)   |   12 Átalakítás Eszközök (Számok szavakig, Valuta átváltás,...)   |   7 Egyesítés és felosztás Eszközök (Haladó kombinált sorok, Hasított sejtek,...)   |   ... és több

Töltsd fel Excel-készségeidet a Kutools for Excel segítségével, és tapasztald meg a még soha nem látott hatékonyságot. A Kutools for Excel több mint 300 speciális funkciót kínál a termelékenység fokozásához és az időmegtakarításhoz.  Kattintson ide, hogy megszerezze a leginkább szükséges funkciót...

kte lap 201905


Az Office lap füles felületet hoz az Office-ba, és sokkal könnyebbé teszi a munkáját

  • Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
  • Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
  • 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!
Comments (15)
Rated 5 out of 5 · 1 ratings
This comment was minimized by the moderator on the site
the system dont work ,what is wrong i have inserted all the formular
This comment was minimized by the moderator on the site
The file does not work with the fromula ,what is wronG

please let me know

i copy the formular all is correct .
This comment was minimized by the moderator on the site
Hi there,

Could you please attach the file you are working?

Amanda
This comment was minimized by the moderator on the site
Thank you Amanda for your assistance.
This comment was minimized by the moderator on the site
Yes 25 numbers from 1 to 49.
I have tried using the same formula but once a number bigger than 25 is picked the next number in the sequence cannot be shown and error occurs.
Rated 5 out of 5
This comment was minimized by the moderator on the site
Hi I have tried the Vlookup way that you shown here it works great and it is easy to generate the numbers for the 1 to 49 range.

But I was thinking of eliminating some numbers in play like for example instead of running numbers I will have 25 numbers from 1 to 49. How will I need to adjust the Vlookup formula to make it work?
Rated 5 out of 5
This comment was minimized by the moderator on the site
Hi Yogi, sorry I don't quite understand your request. What do you mean by having 25 numbers from 1 to 49?
This comment was minimized by the moderator on the site
What is the purpose of COUNTIF(B$1:B1,B1)-1 in the formula in step B?
This comment was minimized by the moderator on the site
Hi hyungsup kim,
COUNTIF(B$1:B1,B1)-1 will prevent duplicates in the Column B. For example, if the B1 is a unique value, this part will return 0 which won’t affect the ranking result; if the B1 is duplicate, this part will adjust the ranking result slightly.
This comment was minimized by the moderator on the site
calculate the next day lottery number for kerala lottery - india
This comment was minimized by the moderator on the site
calculate the next day guess for kerala lottery
This comment was minimized by the moderator on the site
hay, Santhanam did you every win with this program?
This comment was minimized by the moderator on the site
: I would like to try your new programs see how the numbers predict
This comment was minimized by the moderator on the site
I will like to win some luck number
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations