Escola SaberExcel VBA Estudos® - Treinamentos com Macros, Fórmulas e Funções 
Este macro do aplicativo Microsoft Excel VBA, gera uma letra aleatória de (A-Z), na célula ativa ou
na Região Selecionada.
'- - - - - - - - - - - - - - - - -
Sub sbx_letras_aleatorias()
Dim vCelulas As Range
Dim Maximo_Letras As Long
Randomize ' iniciar o gerador de aleatórios.
Maximo_Letras = 26 'aqui voce poderá escolher de 1 a 26 letras.
For Each vCelulas In Selection 'veja que é na seleção area ou célula ativa
' gerando letras aleatórias de 1 a até o número escolhido em Maximo_letras
vCelulas.Value = Chr(Int((Maximo_Letras * Rnd) + 1) + 64)
Next vCelulas
End Sub
Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel
Baixe o Exemplo de Planilha contendo o macro acima
Excel vba gerando letras aleatorias selecao (35 KB)
