Amigo, segue um código mais simples. Veja se atende. Sub hiperlink_arquivos() Dim Pasta1, Pasta2 As String Dim Arq, Arq1 As String Dim i As Long i =...

Valeu, Leonardo. Nem sei como te agradecer, cara... Vc salvou algumas horas do meu dia...rsrs. Obrigado mesmo. Abs.

Era exatamente isso o que eu procurava. Muito obrigado, Leonardo!

Medeiros65, Não entendi. Vc quer que na linha em que está a quantidade de vezes os, p.e, 15 mais sorteados tenha uma formatação diferenciada, é isso...