Boa tarde,
Tenho uma planilha com varios códigos distintos na coluna A que não se repetem. Acredito ter uma macro que replique cada linha 05 ou 10 vezes, para eu entrar com outros dados.
Desde já agradeço
tipo, tenho assim
1
5
3
e quero assim
1
3
5
1
3
5
1
3
5
1
3
5
1
3
5
Olá Thiago!
Você pode usar o seguinte código para realizar esse procedimento:
Sub repetir_valores()
'Seleciona o intervalo que deseja replicar
n = Range("A1:A3").Value
'indice da coluna onde serão colados os dados
colIdx = 1
'Quantidade de células selecionadas - 1
nLenght = UBound(n) - 1
For i = 1 To 10
'Verifica qual a primeira linha vazia de cima pra baixo
r = Cells(1000000, colIdx).End(xlUp).Offset(1, 0).Row
'Insere os dados nas células
Range(Cells(r, colIdx), Cells(r + nLenght, colIdx)) = n
Next i
End Sub