VBA Excluir coluna

Normalmente, na planilha do Excel, temos dois métodos diferentes para excluir colunas, um sendo o atalho do teclado e outro usando o método do botão direito do mouse e inserir, mas no VBA temos que usar o comando delete e instrução de coluna inteira para excluir qualquer coluna junto, o truque para isto é, se precisarmos deletar uma única coluna, fornecemos uma única referência de coluna, mas para as colunas múltiplas, fornecemos referências de colunas múltiplas.

Excel VBA Excluir coluna

Realizamos muitas ações no excel como cortar, copiar, colar, adicionar, excluir, inserir e muitas outras coisas que fazemos regularmente. Podemos usar todas essas ações usando a codificação VBA. Um dos conceitos importantes que precisamos aprender é que no VBA é a “coluna de exclusão”. Neste artigo, mostraremos como usar essa opção Excluir coluna no VBA.

O que Excluir Coluna Faz no Excel VBA?

Como o nome diz, ele excluirá a coluna especificada. Para realizar esta tarefa, precisamos primeiro identificar qual coluna precisamos excluir. A seleção de colunas a serem excluídas difere de um cenário para outro, portanto, abordaremos alguns dos cenários importantes e frequentemente enfrentados neste artigo.

Excluir as colunas é fácil. Primeiro, precisamos usar a propriedade COLUMNS para selecionar a coluna, portanto, abaixo está a sintaxe do método Delete Column no VBA.

Colunas (referência de coluna). Excluir

Portanto, podemos construir o código assim:

Colunas (2). Excluir ou Colunas (“B”). Excluir

Isso excluirá o número da coluna 2, ou seja, a coluna B.

Se quisermos excluir várias colunas, não podemos inserir colunas, precisamos fazer referência às colunas por cabeçalhos, ou seja, alfabetos.

Colunas (“A: D”). Excluir

Isso excluirá a coluna de A a D, ou seja, as primeiras 4 colunas.

Assim, podemos usar o método “Delete Column” no VBA para excluir as colunas particulares. Na seção abaixo, veremos mais exemplos para melhor entendê-lo. Leia.

Exemplos de método de exclusão de coluna do Excel VBA

Abaixo estão os exemplos para excluir colunas usando VBA.

Exemplo # 1 - Usando o método Delete

Suponha que você tenha a folha de dados parecida com a abaixo.

Se quisermos deletar a coluna mês “março”, primeiro selecione a propriedade das colunas.

Código:

 Sub Delete_Example1 () Colunas (End Sub 

Mencione o número da coluna ou alfabeto. Neste caso, é 3 ou C.

Código:

Sub Delete_Example1 () Colunas (3). End Sub

Use o método Delete.

Código:

 Sub Delete_Example1 () Columns (3) .Delete End Sub 

Ou você pode inserir o endereço da coluna assim.

Código:

 Sub Delete_Example1 () Colunas ("C"). Delete End Sub 

Execute este código usando a tecla F5 ou você pode executar manualmente e ver o resultado.

Ambos os códigos farão o mesmo trabalho de exclusão da coluna mencionada.

Se quisermos deletar várias colunas, precisamos mencioná-las em alfabetos, não podemos usar os números das colunas aqui.

Se quisermos deletar as colunas 2 a 4, podemos passar o código como o abaixo.

Código:

 Sub Delete_Example1 () Colunas ("C: D"). Delete End Sub 

Execute este código manualmente através da opção run ou pressione a tecla F5, isso irá deletar as colunas “Fev”, “Mar” e “Abr”.

Exemplo 2 - Excluir colunas com o nome da planilha

A descrição acima é uma visão geral de como excluir colunas usando o código VBA. No entanto, essa não é uma boa prática de exclusão de colunas, sem referir o nome da planilha, é perigoso excluir cegamente a coluna.

Se você não mencionou o nome da planilha, seja qual for a planilha ativa, as colunas serão excluídas.

Primeiro, precisamos selecionar a planilha pelo nome.

Código:

 Sub Delete_Example2 () Planilhas ("Folha de Vendas"). Selecione End Sub 

Depois de selecionar a folha, precisamos selecionar as colunas. Também podemos selecionar as colunas usando o objeto VBA RANGE.

Código:

 Sub Delete_Example2 () Worksheets ("Sales Sheet"). Selecione Range ("B: D"). Delete End Sub 

Isso excluirá as colunas B a D, da planilha “Folha de Vendas”. Para este código não importa qual está ativo, ainda assim, ele excluirá apenas as colunas mencionadas daquela planilha.

Também podemos construir o código VBA na própria linha.

Código:

 Sub Delete_Example2 () Worksheets ("Sales Sheet"). Range ("B: D"). Delete End Sub 

Isso também exclui as colunas “B a D” sem selecionar a planilha “Folha de Vendas”.

Exemplo # 3 - Excluir colunas em branco

Suponha que você tenha dados com colunas em branco alternativas, como a seguir.

Portanto, exclua todas as colunas alternativas que podemos usar no código abaixo.

Código:

 Sub Delete_Example3 () Dim k As Integer For k = 1 To 4 Columns (k + 1) .Delete Next k End Sub 

Execute este código usando a tecla F5 ou manualmente então, ele excluirá todas as colunas em branco alternativas e nossos dados ficarão assim.

Exemplo 4 - Excluir colunas de células em branco

Agora, veja este exemplo. Existem certas situações em que precisamos excluir a coluna inteira se alguma das células em branco for encontrada no intervalo de dados. Considere os dados abaixo como exemplo.

Todas as células amarelas estão em branco. Portanto, aqui meu requisito é excluir todas as colunas de células em branco. O código abaixo fará isso.

Código:

 Sub Delete_Example4 () Range ("A1: F9"). Selecione Selection.SpecialCells (xlCellTypeBlanks) .Select Selection.EntireColumn.Delete End Sub 

Deixe-me explicar esse código linha por linha para você.

Nossos dados estão lá de A1 a F9, então primeiro preciso selecionar esse intervalo, e o código abaixo vou fazer isso.

Intervalo ("A1: F9"). Selecione

Neste intervalo selecionado de células, preciso selecionar as células que estão em branco. Portanto, para selecionar a célula em branco, precisamos da propriedade de células especiais e nessa propriedade, usamos o tipo de célula como espaço em branco.

Selection.SpecialCells (xlCellTypeBlanks) .Select

A seguir, ele irá selecionar todas as células em branco e na seleção, estamos deletando toda a coluna da seleção.

Selection.EntireColumn.Delete

Portanto, nosso resultado final será semelhante a este.

Onde quer que tenha encontrado a célula em branco, ele deletou toda a coluna dessas células em branco.

Você pode baixar esta coluna de exclusão VBA do Excel aqui - modelo de coluna de exclusão VBA