Deletar range de acordo com critérios

Fórum para dúvidas sobre os fundamentos da linguagem de programação Visual Basic no contexto do VBA

Deletar range de acordo com critérios

Mensagempor Eduardo » Sex Ago 10, 2012 3:09 pm

Boa tarde pessoal!

Estou com uma dúvida aqui e ainda não achei nenhuma solução, até vi alguns tópicos falando deste tema mas não consegui adaptar para o que preciso.

Tenho uma planilha com com mais de 1000 linhas e preciso deletar parte da linha (não quero deletar a linha inteira porque no final tem colunas que não podem ser alteradas).

É mais ou menos assim, nesta planilha das colunas A até a G, estão as informações que serão deletadas, mas só serão deletadas se o valor da celula na coluna A for = a "X", então se A5 for igual a "X", então excluo o range de A5 até G5 e depois que a linha de baixo suba para cima.

Isso eu quero fazer via código de programação VBA.

Fico no aguardo e agradeço a atenção.

Att

Eduardo
Eduardo
 
Mensagens: 4
Registrado em: Qui Mai 17, 2012 5:20 pm
Agradecimentos dados: 0 vez
Agradecimentos recebidos: 0 vez

Re: Deletar range de acordo com critérios

Mensagempor webmaster » Sex Ago 10, 2012 5:12 pm

Eduardo,

A macro abaixo faz 80% do que quer:

http://www.tomasvasquez.com.br/blog/mic ... m-criterio

É só adaptar a linha de exclusão (.Rows(i).Delete) para excluir somente o conjunto de células que deseja.

Abraços
Tomás
http://www.tomasvasquez.com.br/blog
http://twitter.com/tomamais
Gostou da resposta? Clique no ícone Imagem da mensagem!
Se sua dúvida foi solucionada, acrescente [RESOLVIDO] ao título.
Avatar do usuário
webmaster
Administrador
 
Mensagens: 1722
Registrado em: Sex Jul 24, 2009 2:44 pm
Agradecimentos dados: 104 vezes
Agradecimentos recebidos: 77 vezes

Re: Deletar range de acordo com critérios

Mensagempor Eduardo » Seg Ago 13, 2012 10:25 am

Obrigado pela resposta!!!

Realmente está quase... Tentei mudar aqui o código para deletar apenas um trecho da linha (coluna A até a G) mas acaba entrando no loop e tenho que finalizar tarefa, sou iniciante ainda em VBA, se puder me ajudar com esta linha que preciso alterar agradeço.

Abs,

Eduardo
Eduardo
 
Mensagens: 4
Registrado em: Qui Mai 17, 2012 5:20 pm
Agradecimentos dados: 0 vez
Agradecimentos recebidos: 0 vez

Anúncios


Voltar para VBA Básico

Quem está online

Usuários navegando neste fórum: Nenhum usuário registrado e 1 visitante