StevaoCal

Caramba cara, é isso ai! Ajudou totalmente! Muito Obrigado!

Não, houve algum erro na hora que eu editei a tabela, o padrão é o inicial. Estou anexando o item correto agora. amostra-inventario (1).xlsx

Como foi pedido, segue uma pequena amostra. Ao lado existe uma planilha colorida, que é o modelo final, como eu gostaria que estivesse formatado. As linhas que precisam ser apagadas são: 2,3,5,6,8,9 e assim por diante. As que permanecem são: 1,4,7,10 e assim sucessivamente. Sempre de 3 em 3. Obrigado! amostra-inventario (1).xlsx

Oi, sou novo no fórum e no mundo do Excel. Meu sistema gera uma planilha com muitas linhas inúteis e que dificultam meu trabalho de organizar o inventário de estoque. Eu criei um pequeno macro para copiar as informações e coloca-las lado a lado, mas não sei como repetir isso até o final da planilha. Eis aqui um exemplo: Sub Macro1() Range("A2:C2").Select Selection.Cut Range("C1").Select ActiveSheet.Paste End Sub O próximo intervalo seria "A5:C5" para "C4"; Depois "A8:C8" para "C7". 'sempre acrescentando 3. Mas como eu faria isso de forma automática, até o final da minha planilha? E depois de recortado e colado, como posso apagar as linhas em branco que restaram? Aguardo resposta, obrigado desde já.