Funções utilizadas nesta planilha =ALEATÓRIOENTRE(1;F5) =ALEATÓRIOENTRE(1;F7) =ÍNDICE(C:C;CORRESP(J5;B:B;0)) =ÍNDICE(D:D;CORRESP(J12;B:B;0))   Função para fazer o laço de repetição Sub REPETIR() Dim v_ciclo As Integer v_ciclo1 = ThisWorkbook.Worksheets(“SORTEADOR”).Range(“F11”) For I = 1 To v_ciclo1 ThisWorkbook.Worksheets(“SORTEADOR”).Range(“H4”) = I Next End Sub       …

DICAS NO EXCEL Read more »