Come generare numeri della lotteria in Excel?

Questo metodo ti guiderà nell'applicazione di diverse funzioni di Excel per generare numeri della lotteria. Ecco come puoi procedere:

1. In un foglio di lavoro vuoto, inserisci le intestazioni delle colonne nell'Intervallo A1:C1 come mostrato nello screenshot sottostante:

2. Inserisci le formule nella Colonna A, Colonna B e Colonna C:

(1) Nella Cella A2, inserisci la formula =CASUALE(), e poi trascina la maniglia di riempimento fino all'intervallo A2:A50.
(2) Nella Cella B2, inserisci la formula =CLASSIFICA($A2;$A$2:$A$50)+CONTA.SE(B$1:B1;B1)-1, e poi trascina la Maniglia di Riempimento fino all'Intervallo B2:B50. (Nella formula, A2 è il numero casuale a sinistra della cella corrente, $A$2:$A$50 sono tutti i numeri casuali ottenuti con la prima formula, B$1 è la prima cella nella Colonna B, e B1 è la cella sopra la cella corrente).
(3) Nell'Intervallo C2:C50, inserisci i numeri di sequenza da 1 a 49.

Otterrai quindi una tabella come mostrato nello screenshot a sinistra:

 

La formula è troppo complicata da ricordare? Salva la formula come voce di AutoTesto per riutilizzarla con un solo clic in futuro! Leggi di più…     Prova gratuita

3. Trova un intervallo vuoto, digita i numeri di sequenza orizzontalmente in una riga come mostrato nello screenshot sottostante:

4. Sotto il primo numero di sequenza pari a 1, inserisci la formula =CERCA.VERT(G1;$B$1:$C$50;2;FALSO) e poi trascina la Maniglia di Riempimento fino all'Intervallo di cui hai bisogno.

Nota: In questa formula, G1 è la cella con il primo numero di sequenza pari a 1, $B$1:$C$50 sono la colonna del Rango Unico e la colonna del Numero della Pallina, 2 significa trovare i valori nella seconda colonna dell'Intervallo $B$1:$C$50.

Otterrai quindi i numeri della lotteria come mostrato nello screenshot sottostante:

5. È opzionale. Per impedire che i numeri della lotteria cambino automaticamente quando il foglio di lavoro corrente si aggiorna, puoi cliccare su Formula > Opzioni di Calcolo > Manuale.

Se hai installato Kutools per Excel, il suo strumento Inserisci Dati Casuali può aiutarti a generare numeri della lotteria in Excel immediatamente.

1. Seleziona 6 celle adiacenti, come A1:F1, e poi clicca su Kutools > Inserisci > Inserisci Dati Casuali.

2. Ora appare la finestra di dialogo Inserisci Dati Casuali. Vai alla scheda Numero intero inserisci 1 nel Da casella, inserisci 49 nel A casella, seleziona l'opzione Genera valori unici e clicca sul pulsante OK . Ora vedrai che 6 numeri della lotteria unici vengono generati e visualizzati immediatamente nelle celle selezionate.

Questo metodo ti guiderà nell'applicazione di una macro VBA per generare numeri della lotteria in Excel. Procedi come segue:

1. Premi i tasti Alt + F11 per aprire la finestra Microsoft Visual Basic per Applicazioni.

2. Clicca su Inserisci > Modulo per aprire una nuova finestra di modulo e incolla il seguente codice VBA al suo interno:

VBA: Generatore di Numeri della Lotteria in 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. Premi il tasto F5 o clicca sul pulsante Esegui per eseguire questa macro VBA.

4. Ora, nella finestra di dialogo che appare, specifica una cella in cui inserire i numeri della lotteria e clicca sul pulsante OK pulsante.

Vedrai quindi che 6 numeri della lotteria unici vengono generati e visualizzati nelle celle specificate.

Selezione casuale di celle basata su criteri in Excel

Aggiungi casualmente colore di sfondo/riempimento alle celle in Excel