Excel VBA Planilha Instrução Loop For Next insere Aleatórios
Este Macro do Aplicativo Microsoft Excel VBA(Visual Basic Application), vos GERAR NUMEROS ALEATÓRIOS E SOMAR
Usando uma instrução For Next e Função Rnd() vamos gerar números aleatórios e somar os valores, e retomar 2(duas) linhas abaixo.
Sub sbx_aleatorio_for_next()
Dim i As Integer
Dim soma As Double
For i = 2 To Cells(Rows.Count, “b”).End(xlUp).Row
Cells(i, “d”).Value = CDbl((Rnd * 1000))
tSoma = tSoma + Cells(i, “d”)
Next i
Cells(i + 1, “d”).Value = tSoma
End Sub
Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Escola SaberExcel VBA Estudos® – Treinamentos com Macros, Fórmulas e Funções.
Compre pelo PagSeguro | Compre pelo PayPal | |
Material Didático: Curso Excel VBA Expert |
Download do exemplo de planilha contendo os macros acima: |
SBL Excel VBA – Instrução For Next insere Aleatórios |
<< Verifique sua caixa Email, se não estiver Caixa Entrada, verifique Caixa de Itens Excluídos >> |