Como inserir um número específico de colunas em intervalos fixos no Excel?
Na sua utilização diária do Excel, poderá deparar-se com situações em que precise de adicionar várias colunas entre colunas já existentes. É claro que pode inseri-las uma a uma através da função Inserir. Contudo, ao trabalhar com grandes volumes de dados e precisar de inserir, por exemplo, três colunas após cada segunda ou enésima coluna, essa abordagem torna-se claramente ineficaz. Então, como concluir esta tarefa rapidamente? Neste tutorial, apresentamos dois métodos simples para resolver este desafio.
Utilize código VBA para inserir um número específico de Colunas em Branco em Intervalo de Dados em intervalos fixos
Podemos utilizar o código VBA abaixo para inserir um número específico de colunas em branco após cada enésima coluna. Siga os passos a seguir.
1. Prima as teclas «Alt + F11» no Excel para abrir a janela do Microsoft Visual Basic for Applications.
2. Clique em «Inserir» > «Módulo» e cole a macro seguinte na janela do módulo.
Sub InsertColumnsAtIntervals()
'Updateby Extendoffice
Dim Rng As Range
Dim xInterval As Integer
Dim xColumns As Integer
Dim xColumnsCount As Integer
Dim xNum1 As Integer
Dim xNum2 As Integer
Dim WorkRng As Range
Dim xWs As Worksheet
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
xColumnsCount = WorkRng.Columns.Count
xInterval = Application.InputBox("Enter column interval. ", xTitleId, 1, Type:=1)
xColumns = Application.InputBox("How many columns to insert at each interval? ", xTitleId, 1, Type:=1)
xNum1 = WorkRng.Column + xInterval
xNum2 = xColumns + xInterval
Set xWs = WorkRng.Parent
For i = 1 To Int(xColumnsCount / xInterval)
xWs.Range(xWs.Cells(WorkRng.Row, xNum1), xWs.Cells(WorkRng.Row, xNum1 + xColumns - 1)).Select
Application.Selection.EntireColumn.Insert
xNum1 = xNum1 + xNum2
Next
End Sub
3. Prima a tecla "F5" para executar este código. Aparecerá uma caixa de aviso a solicitar que selecione o «Intervalo de Dados» em que pretende inserir colunas em branco.
4. Clique no botão «OK». Surge outra caixa de aviso; introduza o número de intervalos entre colunas na caixa «Introduzir intervalo de colunas».
5. Continue a clicar no botão «OK». Surge uma terceira caixa de aviso; indique na respetiva caixa o número de colunas que pretende inserir em cada intervalo.
6. Clique no botão «OK» para obter o seu resultado.
Utilize Kutools para Excel para inserir um número específico de Colunas em Branco em Intervalo de Dados em intervalos fixos
Se não pretender utilizar o método com código VBA, a funcionalidade «Inserir Linhas/Colunas em Branco» do Kutools para Excel é a solução ideal para si. Com ela, pode inserir o número exato de colunas no seu intervalo de dados, espaçadas em intervalos fixos, com apenas alguns cliques.
1. Selecione primeiro o intervalo de dados existente e, em seguida, clique em «Kutools» > «Inserir» > «Inserir Linhas/Colunas em Branco».
2. Aparece a caixa de diálogo «Inserir Linhas/Colunas em Branco». O intervalo de dados que selecionou no passo 1 é apresentado na caixa Intervalo. Escolha a opção «Colunas em Branco» na secção «Tipo de Inserção» e especifique o número de intervalos entre colunas e o número de colunas que pretende inserir em cada intervalo. Aqui, introduzi 1 e 3, respetivamente.
3. Clique no botão «OK» para finalizar a configuração e obter o resultado.
Kutools para Excel– Potencie o Excel com mais de 300 ferramentas essenciais, tornando o seu trabalho mais rápido e fácil, e aproveite as funcionalidades de IA para um processamento de dados mais inteligente e uma maior produtividade.Obtenha Já
Como Inserir Rapidamente uma Linha com Base na Data Atual no Excel?
Imagine que tem uma folha com uma linha de datas e pretende inserir uma nova linha imediatamente à direita da data atual — aquela que se atualiza automaticamente sempre que abre o livro. Será que existe um truque no Excel para resolver isto?
Como Inserir Sempre uma Linha em Branco Abaixo em vez de Acima no Excel
Como é do conhecimento geral, ao inserir uma linha em branco numa folha de cálculo, esta é sempre adicionada acima da linha ou célula selecionada. No entanto, por vezes, poderá precisar de inserir a linha abaixo da célula ou linha selecionada. Como resolver esta tarefa no Excel?
Como Inserir Automaticamente uma Nova Linha em Branco com um Botão de Comando no Excel?
Em muitas situações, pode precisar de inserir uma nova linha em branco numa posição específica da sua folha de cálculo. Neste artigo, mostramos-lhe como inserir automaticamente uma nova linha em branco ao clicar num botão de comando no Excel.
Como Inserir uma Linha em Branco Após um Texto Específico no Excel?
Se pretende inserir linhas em branco após um texto específico — tal como ilustrado na imagem seguinte —, como o fazer de forma rápida e fácil, sem ter de as inserir manualmente uma a uma?
As Melhores Ferramentas de Produtividade para o Office
Potencie as suas competências no Excel com Kutools para Excel e experimente uma eficiência como nunca antes.Kutools para Excel Oferece mais de 300 funcionalidades avançadas para impulsionar a produtividade e Economizar Tempo.Clique aqui para obter a funcionalidade de que mais precisa...
Office Tab Traz uma interface com separadores para o Office e torna o seu trabalho muito mais fácil
- Ative a edição e leitura com separadores no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novos separadores da mesma janela, em vez de em janelas separadas.
- Aumente a sua produtividade em 50 % e elimine centenas de cliques do rato todos os dias!
Todos os suplementos Kutools — num único instalador.
Kutools for Office reúne suplementos para Excel, Word, Outlook e PowerPoint, além do Office Tab Pro, sendo a solução ideal para equipas que trabalham em várias aplicações do Office.
- Pacote tudo-em-um— suplementos para Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Um instalador, uma licença— configuração em minutos (pronto para MSI)
- Funciona melhor em conjunto— produtividade simplificada em todas as aplicações do Office
- Teste gratuito de 30 dias com todas as funcionalidades— sem registo, sem cartão de crédito
- Melhor relação qualidade-preço— poupe face à compra individual dos suplementos