Denna metod leder dig genom att använda flera Excel-funktioner för att generera lotteri nummer. Och du kan göra enligt följande:

1. I ett tomt kalkylblad skriver du kolumnrubriker i intervall A1: C1 enligt nedanstående skärmdump:

2. Ange formler i kolumn A, kolumn B och kolumn C:

(1) Ange formeln i cell A2 = RAND ()och dra sedan handtaget Fyll till området A2: A50.
(2) Ange formeln i cell B2 =RANK($A2,$A$2:$A$50)+COUNTIF(B$1:B1,B1)-1och dra sedan påfyllningshandtaget till intervallet B2: B50. (I formeln är A2 slumpmässiga siffror kvar till nuvarande cell, $ A $ 2: $ A $ 50 är alla slumptal som vi fick med den första formeln, B $ 1 är den första cellen i kolumn B, och B1 är cellen ovanför nuvarande cell).
(3) I intervall C2: C50, ange sekvensnummer från 1 till 49.

Då får du ett bord som vänster skärmdump visas:

 

Formel är för komplicerad för att komma ihåg? Spara formeln som en automatisk textpost för återanvändning med bara ett klick i framtiden! Läs mer ...     fri rättegång

3. Hitta ett tomt intervall, skriv sekvensnummer horisontellt i rad enligt nedanstående skärmdump:

4. Ange formeln under det första sekvensnumret 1 = VLOOKUP (G1, $ B $ 1: $ C $ 50,2, FALSE) in det och dra Fill Handle till det intervall du behöver.

Anmärkningar: I den här formeln är G1 cellen med det första sekvensnumret på 1, $ B $ 1: $ C $ 50 är Unique Rank-kolumn och Ball Number-kolumn, 2 betyder att hitta värden i den andra kolumnen i Range $ B $ 1: $ C $ 50 .

Då får du lotternumren enligt skärmdumpen nedan:

5. Det är valfritt. För att förhindra att lotterinumren ändras automatiskt när det aktuella kalkylbladet uppdateras kan du klicka på Formel > Beräkningsalternativ > Manuell.

Lista enkelt upp alla kombinationer av flera serier av data i Excel

Kutools för Excel Lista alla kombinationer verktyget är utformat för att generellt alla möjliga kombinationer från flera givna dataserier och lista dessa kombinationer i en kolumn enligt nedanstående skärmdump.

Den här metoden hjälper dig att använda ett VBA-makro för att generera lotteri nummer i Excel. Gör så här:

1. Tryck andra + F11 för att öppna Microsoft Visual Basic for Applications-fönstret.

2. Klicka Insert > Modulerna för att öppna ett nytt modulfönster och klistra in följande VBA-kod i det:

VBA: Lottery Number Generator i Excel

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. tryck på F5 eller klicka på run för att köra detta VBA-makro.

4. Ange nu en cell för att mata ut lotterinumren i popup-dialogrutan och klicka på OK knapp.

Då ser du 6 unika lotterinummer genereras och visas i de angivna cellerna.

Om du har Kutools för Excel installerat är det Infoga slumpmässiga data verktyget kan hjälpa dig att generera lotteri nummer i Excel på en gång.

1. Välj 6 intilliggande celler, till exempel A1: F1, och klicka sedan på Kutools > Insert > Infoga slumpmässiga data.

2. Nu kommer dialogrutan Infoga slumpmässiga data ut. Gå till Heltal fliken, skriv 1 in Från box, typ 49 in Till kryssa i rutan Unika värden alternativet och klicka på OK knapp. Nu kommer du att se 6 unika lotteri nummer genereras och visas direkt i de valda cellerna.

Markera celler slumpmässigt baserat på kriterier i Excel

Lägg till slumpmässigt bakgrunds- / fyllningsfärg för celler i Excel