Office 2013 Excel - Como gerar um numero aleatório apenas uma vez?

Question

Ao utilizar o comando ALEATÓRIOENTRE, sempre que a tabela é recarregada, o valor muda. Como fazer esse calculo ser realizado apenas uma vez?

Answer 1

Olá Birrumba,

Diante da sua pergunta, visualizo três alternativas:

1º) É a que você já citou, de gerar os números e copiar e colar como valores.

2º) Trabalhar com a planilha no modo de cálculo manual. Porém, não recomendo, pois vai implicar no processamento de outras fórmulas na planilha.

3º) Criar a sua própria função de forma não volátil. Para isso, é preciso um conhecimento básico de VBA. O procedimento não é complicado. Pressione ALT+F11 para abrir o Visual Basic, na estrutura de módulos à esquerda, localize o seu arquivo e clique com o botão direito do mouse e selecione "Inserir -> Módulo". Na tela de edição de código, copie o seguinte código:

Function UDF_ALEATÓRIOENTRE(lng1 As Long, lng2 As Long)

Randomize

UDF_ALEATÓRIOENTRE = Int(Rnd * (lng2 + 1 - lng1)) + lng1

End Function

Pode fechar o VBA e teste na sua planilha a função que agora vai aparecer chamada UDF_ALEATÓRIOENTRE, que funciona exatamente como a função ALEATÓRIOENTRE, só que só será reprocessada se você atualizar a fórmula na célula.

Uma observação é que você terá que salvar seu arquivo como xlsm (pasta habilitada para macro do Excel) para que funcione corretamente ao abrir posteriormente o arquivo.

Espero que assim te ajude melhor.

Abraços!

Answer 2

Olá Birrumba, tudo bem? 

Obrigada por entrar em contato com a Comunidade Microsoft.

Em relação a sua questão sugiro que acesse os links a seguir e verifique se algum procedimento poderá ajuda-lo:

https://support.office.com/pt-br/article/ALEAT%C3%93RIOENTRE-Fun%C3%A7%C3%A3o-ALEAT%C3%93RIOENTRE-4cc7f0d1-87dc-4eb7-987f-a469ab381685?ui=pt-BR&rs=pt-BR&ad=BR.

https://social.msdn.microsoft.com/Forums/pt-BR/f8a8878e-67e3-4c59-87d1-7921140dc098/gerar-nmeros-aleatrios-apenas-de-uma-lista?forum=vbapt.

Caso não, peço a gentileza que publique novamente na página do MSDN que é um fórum especialmente destinado para desenvolvedores e profissionais em TI.

:: MSDN ::

Se houver outras dúvidas relacionadas aos produtos Microsoft, por favor, volte a postar. Estamos à disposição.

Caso essa informação tenha sido útil, marque-a como resposta.

Até mais!

Answer 3

Olá Valeria GainoCampos,

Na verdade a informação não ajudou muito, não era exatamente o que eu queria, mas mesmo assim obrigado pela atenção e preocupação.

Além de agradecer, estou respondendo para informar a outros como solucionei.

Criei uma macro que seleciona e copia o campo que gera os valores aleatórios e que depois selecionava o campo que queria que o valor fosse inserido e fizesse o comando "colar valores", após programei um botão com essa macro e está tudo funcionando perfeitamente.

Infelizmente não sei como marcar essa solução como resposta, logo apenas a colocarei como resposta ao comentário de Valeria GainoCampos.

Mais um vez agradeço pela atenção e até a próxima duvida (haha),

Birrumba.