Olá, alguém tem uma macro para deletar as células que estiverem em branco e movimenta as demais para a direita até o fim da seleção?
... alguém tem uma macro para deletar as células que estiverem em branco e movimenta as demais para a direita até o fim da seleção?
Tenho uma aqui que, por acaso, me parece que serve para o seu caso.
Sub InsereVazias() Dim c As Long, a As Long, k As Long a = [A1].CurrentRegion.Columns.Count For c = 1 To Cells(Rows.Count, 1).End(3).Row On Error Resume Next k = 0: k = Range(Cells(c, 1), Cells(c, a)).SpecialCells(xlBlanks).Cells.Count Cells(c, 1).Resize(, k).Insert Shift:=xlToRight Next c End Sub
Osvaldo
Olá Osvaldo, para usar o seu macro é só copiar e coloca o código e então já vai funcionar? por que quando coloco para executar nada se altera, ps sei pouco sobre macros, ate hoje só usei uns dois ou três xd
Instale o código em um módulo comum, assim:
1. copie o código daqui
2. a partir da planilha em que estão os dados tecle 'Alt+F11' para acessar o editor de VBA
3. no menu do editor >> Inserir >> Módulo
4. cole o código na janela em branco que vai se abrir
5. feito! 'Alt+Q' para retornar para a planilha e testar
para rodar o código:
6. tecle 'Alt+F8' >> selecione a macro correspondente >> Executar, ou insira um botão na planilha e vincule-o à macro ou vincule-a a um atalho de teclado (Alt+F8 > Opções).
Se após rodar o código o resultado não for o esperado, então disponibilize uma amostra do seu arquivo (arquivo Excel, não print da planilha) com alguns dados e com o resultado desejado.
Osvaldo
Osvaldomp
Não estava funcionando porque eu estava usando o botão para selecionar todas as células de uma vez, quando fiz a seleção usando ctrl e shift para pegar só as células com dados deu certo, muito grato pela ajuda! abraços
... não estava funcionando porque eu estava usando o botão para selecionar todas as células de uma vez,
Que botão é esse![]()
![]()
![]()
quando fiz a seleção usando ctrl e shift para pegar só as células com dados deu certo, ...
Não há qualquer relação entre a seleção de células e o funcionamento do código.O código não trata células selecionadas, e funciona independente de quantas e quais células estejam selecionadas, me parece que você tá meio perdido aí
![]()
Osvaldo
Boa tarde sevlla00
Bem-vindo ao fórum!
Como você é novato, para facilitar a tua participação, sugiro tomar conhecimento do conteúdo dos links abaixo:
viewtopic.php?f=7&t=203
viewtopic.php?f=7&t=7903
viewtopic.php?f=7&t=3841
viewtopic.php?f=7&t=16757
viewtopic.php?f=7&t=12600
viewtopic.php?f=7&t=3371
Acesse os links acima, assim você irá aprender a usar a ferramenta para agradecer aos colaboradores, regras do fórum e outras instruções.
[]s
Patropi _ Moderador
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel