Este fórum está sendo desativado

[leonardoggiovanelli]

Como faço para alterar uma coluna ou linha alternada? Para ficar mais claro, se tenho as seguintes células:
a | a | a | a |... gostaria que ficasse a | | a | | a | | a | | a | | a ...

[alexandrevba]

Bom dia!!

Eu não entendi muito bem.

Código: Selecionar todos

Sub AleVBA_InsereLinhas()

   'Seleciona ultima linha com dados.
   Selection.End(xlDown).Select

   Do Until ActiveCell.Row = 1
      'Insere uma linha em branco.
      ActiveCell.EntireRow.Insert shift:=xlDown
      'Move para cima.
      ActiveCell.Offset(-1, 0).Select
   Loop

End Sub

Veja mais em:
http://www.extendoffice.com/documents/e ... olumn.html

Att