Olá, sou muito leigo no assunto, porem procurando bastante na internet, achei uma planinha em macro, que supre minhas necessidades, que no caso é: adicionar um número de linhas, baseado no valor que foi preenchido. Exemplo:
COLUNA (A)
1 (Adiciona uma linha abaixo)
2 (Adiciona duas linhas abaixo)
3 (Adiciona três linhas abaixo)
4 (Adiciona quatro linhas abaixo)
23 (Adiciona vinte e três linhas abaixo)
etc...
A planilha que encontrei, possui o código que está abaixo, funciona perfeitamente para minha necessidade, o único problema, é que ela só lê as primeiras ONZE linhas, o resto é ignorado, e para ser útil para mim eu preciso que fosse sem limites, onde eu pudesse
explorar do A1 ao A1000000 ... alguém me da uma luz, muitíssimo obrigado.
Sub Inserir_numero_linhas_valor_celula_anterior()
Dim I As Double, J As Integer
'[:] na frente do código significa - como se fosse linha debaixo (próxima linha).
If [a].Value = "" Then MsgBox "copie os números para teste botão copiar...", vbInformation, "Saberexcel": Exit Sub
For I = Range("A" & Rows.Count).End(xlUp).Row To 1 Step -1
For J = 1 To Range("A" & I)
Rows(I + 1).Insert shift:=xlDown
Next J
Next I
[C4].Value = "Observe que foi inserido o número de Linhas vazias correspondente ao valor que está na célula"
End Sub
Sub copiar_teste()
limpar_teste
[b].Copy [a]
[C4].Value = ""
End Sub
Sub limpar_teste()
[g,C4].Clear
End Sub
