Ta metoda przeprowadzi Cię przez zastosowanie kilku funkcji programu Excel do generowania liczb loterii. Możesz wykonać następujące czynności:

1. W pustym arkuszu wpisz nagłówki kolumn w zakresie A1: C1, jak pokazano na poniższym zrzucie ekranu:

2. Wprowadź formuły w kolumnie A, kolumnie B i kolumnie C:

(1) W komórce A2 wprowadź formułę = LOS (), a następnie przeciągnij uchwyt Wypełnij do zakresu A2: A50.
(2) W komórce B2 wprowadź formułę =RANK($A2,$A$2:$A$50)+COUNTIF(B$1:B1,B1)-1, a następnie przeciągnij uchwyt wypełnienia do zakresu B2: B50. (W formule A2 to liczba losowa pozostała do bieżącej komórki, $ A $ 2: $ A $ 50 to wszystkie liczby losowe, które otrzymaliśmy z pierwszą formułą, B $ 1 to pierwsza komórka w kolumnie B, a B1 to komórka powyżej bieżącej komórka).
(3) W zakresie C2: C50 wprowadź numery sekwencyjne od 1 do 49.

Następnie otrzymasz tabelę, jak pokazano na lewym ekranie:

 

Formuła jest zbyt skomplikowana, by ją zapamiętać? Zapisz formułę jako wpis Auto Text do ponownego użycia za pomocą jednego kliknięcia w przyszłości! Czytaj więcej ...     Przetestuj za darmo

3. Znajdź pusty zakres, wpisz numery sekwencyjne poziomo w rzędzie, jak pokazano poniżej:

4. Pod pierwszą liczbą sekwencyjną 1 wprowadź wzór = WYSZUKAJ.PIONOWO (G1, $ B 1 $: $ C $ 50,2, FALSE) do niego i przeciągnij uchwyt wypełnienia do wymaganego zakresu.

Uwagi: W tej formule G1 to komórka z pierwszą liczbą sekwencyjną 1, $ B $ 1: $ C $ 50 to kolumna Unique Rank i kolumna Ball Number, 2 oznacza znalezienie wartości w drugiej kolumnie zakresu $ B $ 1: $ C $ 50 .

Następnie otrzymasz numery loterii, jak pokazano poniżej:

5. To jest opcjonalne. Aby zapobiec automatycznej zmianie numerów loterii po odświeżeniu bieżącego arkusza roboczego, możesz kliknąć ikonę Formuła > Opcje obliczeniowe > Instrukcja obsługi.

Z łatwością wymień wszystkie kombinacje kilku serii danych w programie Excel

Kutools dla Excela Wyświetl wszystkie kombinacje Narzędzie jest przeznaczone do generowania wszystkich możliwych kombinacji z kilku podanych serii danych i umieszczania tych kombinacji w kolumnie, jak pokazano poniżej.

Ta metoda poprowadzi Cię do zastosowania makra VBA do generowania liczb loterii w programie Excel. Wykonaj następujące czynności:

1. naciśnij inny + F11 klawisze, aby otworzyć okno Microsoft Visual Basic for Applications.

2, Kliknij wstawka > Moduł aby otworzyć nowe okno modułu i wklej do niego następujący kod VBA:

VBA: Generator liczb loterii w programie 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, wciśnij F5 lub kliknij run przycisk, aby uruchomić to makro VBA.

4. Teraz w wyskakującym oknie dialogowym określ komórkę, w której mają być wyświetlane numery loterii, i kliknij OK przycisk.

Następnie zobaczysz 6 unikalnych numerów loterii jest generowanych i wyświetlanych w określonych komórkach.

Jeśli masz zainstalowany Kutools dla programu Excel, jego plik Wstaw losowe dane narzędzie może pomóc w natychmiastowym generowaniu liczb loterii w programie Excel.

1. Wybierz 6 sąsiednich komórek, na przykład A1: F1, a następnie kliknij Kutools > wstawka > Wstaw losowe dane.

2. Teraz pojawia się okno dialogowe Wstaw losowe dane. Przejdź do Liczba całkowita tab, wpisz 1 in Od pole, wpisz 49 in Do zaznacz pole Unikalne wartości opcję i kliknij przycisk OK przycisk. Teraz zobaczysz 6 unikalnych numerów loterii, które są generowane i natychmiast wyświetlane w wybranych komórkach.

Losowo wybierz komórki na podstawie kryteriów w programie Excel

Losowo dodaj kolor tła / wypełnienia dla komórek w programie Excel