Página 1 de 1

Inserir linha vaziz com VBA

Enviado: 05 Ago 2016 às 07:43
por alexpaulo
BOM DIA:

Preciso de uma macro que inclua uma nova linha vazia, a cada dez linhas.
Criei uma Macro para inserir uma linha sempre a partir da A12, por exemplo. Acontece que muitas vezes a tabela está com filtro e a última linha da página não é necessariamente a A12, por exemplo. Preciso que a nova linha fique sempre a cada dez linhas digitadas.


Desde já, grato pela atenção e parabéns por compartilharem o conhecimento.



***********************************************
ALEX PAULO

Re: INSERIR LINHA VAZIA COM VBA

Enviado: 05 Ago 2016 às 08:27
por alexandrevba
Bom dia!!!
Código: Selecionar todos
Sub TenteIsso()
Dim r As Long, lr As Long
lr = Range("A" & Rows.Count).End(xlUp).Row
    For r = 10 To lr Step 10
        Rows(r).Insert Shift:=xlDown
    Next r
End Sub
Att

Re: INSERIR LINHA VAZIA COM VBA

Enviado: 05 Ago 2016 às 10:15
por alexpaulo
Grato pela ajuda.
Mas estou com um pequeno problema: Uso filtro, que dependendo do critério de pesquisa, oculta algumas linhas. Acontece que a Macro está contando todas as linhas, inclusive as ocultas. Haveria a possibilidade de ela apenas contar as linhas que estão sendo exibidas ?
Na verdade, preciso inserir uma linha em branco na primeira linha de cada página, a partir da segunda página.

Grato pela atenção.