Przejdź do głównej zawartości

Jak generować numery loterii w programie Excel?

Czy kiedykolwiek myślałeś o generowaniu liczb loterii w Excelu lub samodzielnym tworzeniu generatora liczb loterii w Excelu? W tym artykule przedstawiam trzy metody łatwego wykonania tego zadania.


Generuj numery loterii za pomocą funkcji programu Excel

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:

 

uwaga wstążka 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.

Note: 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.


jako lista wszystkich kombinacji 1

Kutools dla programu Excel - Doładuj program Excel za pomocą ponad 300 niezbędnych narzędzi. Ciesz się w pełni funkcjonalnym 30-dniowym DARMOWYM okresem próbnym bez karty kredytowej! Zdobądź To Teraz

Wygeneruj numery loterii za pomocą VBA Macro

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.


Generuj numery loterii za pomocą Kutools for Excel

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.

Kutools dla programu Excel - Zawiera ponad 300 niezbędnych narzędzi dla programu Excel. Ciesz się w pełni funkcjonalnym 30-dniowym DARMOWYM okresem próbnym bez karty kredytowej! Pobierz teraz!

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 Cena 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.

Kutools dla programu Excel - Doładuj program Excel za pomocą ponad 300 niezbędnych narzędzi. Ciesz się w pełni funkcjonalnym 30-dniowym DARMOWYM okresem próbnym bez karty kredytowej! Zdobądź To Teraz


Demo: generuj numery loterii za pomocą Kutools for Excel


Kutools dla programu Excel: Ponad 300 przydatnych narzędzi na wyciągnięcie ręki! Już dziś rozpocznij 30-dniowy bezpłatny okres próbny bez ograniczeń funkcji. Pobierz teraz!

Podobne artykuły:

Najlepsze narzędzia biurowe

🤖 Pomocnik AI Kutools: Zrewolucjonizuj analizę danych w oparciu o: Inteligentne wykonanie   |  Wygeneruj kod  |  Twórz niestandardowe formuły  |  Analizuj dane i generuj wykresy  |  Wywołaj funkcje Kutools...
Popularne funkcje: Znajdź, wyróżnij lub zidentyfikuj duplikaty   |  Usuń puste wiersze   |  Łącz kolumny lub komórki bez utraty danych   |   Okrągły bez wzoru ...
Super wyszukiwanie: Wiele kryteriów VLookup    Wiele wartości VLookup  |   Przeglądanie pionowe na wielu arkuszach   |   Wyszukiwanie rozmyte ....
Zaawansowana lista rozwijana: Szybko twórz listę rozwijaną   |  Zależna lista rozwijana   |  Lista rozwijana wielokrotnego wyboru ....
Menedżer kolumn: Dodaj określoną liczbę kolumn  |  Przesuń kolumny  |  Przełącz stan widoczności ukrytych kolumn  |  Porównaj zakresy i kolumny ...
Polecane funkcje: Fokus siatki   |  Widok projektu   |   Duży pasek formuły    Menedżer skoroszytów i arkuszy   |  Biblioteka zasobów (Automatyczny tekst)   |  Selektor dat   |  Połącz arkusze   |  Szyfruj/odszyfruj komórki    Wysyłaj e-maile według listy   |  Super filtr   |   Specjalny filtr (filtruj pogrubienie/kursywa/przekreślenie...) ...
15 najlepszych zestawów narzędzi12 Tekst Tools (Dodaj tekst, Usuń znaki, ...)   |   50 + Wykres rodzaje (Wykres Gantta, ...)   |   40+ Praktyczne Wzory (Oblicz wiek na podstawie urodzin, ...)   |   19 Wprowadzenie Tools (Wstaw kod QR, Wstaw obraz ze ścieżki, ...)   |   12 Konwersja Tools (Liczby na słowa, Przeliczanie walut, ...)   |   7 Połącz i podziel Tools (Zaawansowane wiersze łączenia, Podział komórki, ...)   |   ... i więcej

Zwiększ swoje umiejętności Excela dzięki Kutools for Excel i doświadcz wydajności jak nigdy dotąd. Kutools dla programu Excel oferuje ponad 300 zaawansowanych funkcji zwiększających produktywność i oszczędzających czas.  Kliknij tutaj, aby uzyskać funkcję, której najbardziej potrzebujesz...

Opis


Karta Office wprowadza interfejs z zakładkami do pakietu Office i znacznie ułatwia pracę

  • Włącz edycję i czytanie na kartach w programach Word, Excel, PowerPoint, Publisher, Access, Visio i Project.
  • Otwieraj i twórz wiele dokumentów w nowych kartach tego samego okna, a nie w nowych oknach.
  • Zwiększa produktywność o 50% i redukuje setki kliknięć myszką każdego dnia!
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