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 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, a seguir 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á a coluna número 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 de coluna, 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, algo como a seguir.
Se quisermos excluir 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.
Observação: você não obterá a lista do IntelliSense para selecionar o método Delete. Basta digitar “Excluir,”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 excluir várias colunas, precisamos mencioná-las no alfabeto. Não podemos usar números de coluna 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 por meio da opção de execução ou pressione a tecla F5. Isso excluirá as colunas "fevereiro", "março" e "abril"
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 é a boa prática de excluir colunas. Sem referir o nome da planilha, é perigoso excluir a coluna às cegas.
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 dessa 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 o 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. Em seguida, 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 fará isso.
Intervalo ("A1: F9"). Selecione
Neste intervalo selecionado de células, preciso selecionar as células que estão em branco. Portanto, para selecionar uma 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
Em seguida, ele selecionará todas as células em branco e, na seleção, estamos excluindo toda a coluna da seleção.
Selection.EntireColumn.Delete
Portanto, nosso resultado final será assim.
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
