Como gerar números de loteria no excel?
Você já pensou em gerar números de loteria no Excel ou fazer você mesmo um gerador de números de loteria no Excel? Neste artigo, apresento três métodos para você fazer isso facilmente.
- Gere números de loteria com funções do Excel (5 etapas)
- Gere números de loteria com VBA Macro
- Gere números de loteria com Kutools para Excel (2 etapas)
Gere números de loteria com funções do Excel
Este método o orientará na aplicação de várias funções do Excel para gerar números de loteria. E você pode fazer o seguinte:
1. Em uma planilha em branco, digite os cabeçalhos das colunas no intervalo A1: C1 conforme a captura de tela mostrada abaixo:
2. Insira as fórmulas na Coluna A, Coluna B e Coluna C:
(1) Na célula A2, insira a fórmula = RAND ()e arraste a alça de preenchimento para o intervalo A2: A50.
(2) Na célula B2, insira a fórmula =RANK($A2,$A$2:$A$50)+COUNTIF(B$1:B1,B1)-1e arraste a alça de preenchimento para o intervalo B2: B50. (Na fórmula, A2 é o número aleatório deixado para a célula atual, $ A $ 2: $ A $ 50 são todos os números aleatórios que obtivemos com a primeira fórmula, B $ 1 é a primeira célula na coluna B e B1 é a célula acima da atual célula).
(3) No intervalo C2: C50, insira os números de sequência de 1 a 49.
Então você obterá uma tabela conforme a captura de tela à esquerda mostrada:
A fórmula é muito complicada para lembrar? Salve a fórmula como uma entrada de texto automático para reutilizá-la com apenas um clique no futuro! Leia mais ... Teste Grátis |
3. Encontre um intervalo em branco, digite os números de sequência horizontalmente em uma linha como mostrado abaixo na captura de tela:
4. Abaixo do primeiro número de sequência de 1, insira a fórmula = PROCV (G1, $ B $ 1: $ C $ 50,2, FALSO) nele, e arraste a alça de preenchimento para o intervalo que você precisa.
Note: Nesta fórmula, G1 é a célula com o primeiro número de sequência de 1, $ B $ 1: $ C $ 50 são a coluna de Classificação Única e a coluna de Número da Bola, 2 significa encontrar valores na segunda coluna do Intervalo $ B $ 1: $ C $ 50 .
Em seguida, você obterá os números da loteria conforme a captura de tela abaixo:
5. É opcional. Para evitar que os números da loteria mudem automaticamente quando a planilha atual for atualizada, você pode clicar no Fórmula > Opções de Cálculo > manual.
Liste facilmente todas as combinações de várias séries de dados no Excel
Kutools para Excel Listar todas as combinações O utilitário é projetado para generalizar todas as combinações possíveis de várias séries de dados fornecidas e listar essas combinações em uma coluna como a imagem abaixo mostrada.
Kutools for Excel - Turbine o Excel com mais de 300 ferramentas essenciais. Desfrute de um teste GRATUITO de 30 dias com todos os recursos, sem necessidade de cartão de crédito! Get It Now
Gere números de loteria com VBA Macro
Este método o orientará na aplicação de uma macro VBA para gerar números de loteria no Excel. Faça o seguinte:
1. pressione outro + F11 para abrir a janela Microsoft Visual Basic for Applications.
2. Clique inserção > Módulo para abrir uma nova janela de módulo e colar o seguinte código VBA nela:
VBA: gerador de números de loteria no 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. aperte o F5 ou clique no Execute botão para executar esta macro VBA.
4. Agora, na caixa de diálogo que aparece, especifique uma célula para a saída dos números da loteria e clique no botão OK botão.
Em seguida, você verá que 6 números de loteria exclusivos são gerados e exibidos nas células especificadas.
Gere números de loteria com Kutools para Excel
Se você tiver o Kutools para Excel instalado, é Inserir dados aleatórios utilitário pode ajudá-lo a gerar números de loteria no Excel de uma vez.
Kutools for Excel - Embalado com mais de 300 ferramentas essenciais para Excel. Desfrute de um teste GRATUITO de 30 dias com todos os recursos, sem necessidade de cartão de crédito! Baixe Agora!
1. Selecione 6 células adjacentes, como A1: F1, e clique no Kutools > inserção > Inserir dados aleatórios.
2. Agora a caixa de diálogo Inserir dados aleatórios é exibida. Vou ao Número inteiro guia, tipo 1 in De caixa, tipo 49 in Para caixa, marque a Valores únicos opção, e clique no botão OK botão. Agora você verá 6 números de loteria exclusivos sendo gerados e exibidos nas células selecionadas imediatamente.
Kutools for Excel - Turbine o Excel com mais de 300 ferramentas essenciais. Desfrute de um teste GRATUITO de 30 dias com todos os recursos, sem necessidade de cartão de crédito! Get It Now
Demonstração: gere números de loteria com Kutools para Excel
Artigos relacionados:
Selecione células aleatoriamente com base em critérios no Excel
Adicionar aleatoriamente cor de fundo / preenchimento para células no Excel
Melhores ferramentas de produtividade de escritório
Aprimore suas habilidades de Excel com o Kutools para Excel e experimente uma eficiência como nunca antes. Kutools para Excel oferece mais de 300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para obter o recurso que você mais precisa...
Office Tab traz interface com guias para o Office e torna seu trabalho muito mais fácil
- Habilite a edição e leitura com guias em Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
- Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!