Note: The other languages of the website are Google-translated. Back to English
English English

Como evitar a numeração automática no cabeçalho da coluna duplicada na tabela do Excel?

No Excel, quando você digita o cabeçalho de coluna duplicado na tabela, um número será adicionado automaticamente, assim como nome, nome1, nome2, e o número não pode ser removido como mostra a captura de tela abaixo. Para evitar a numeração automática no cabeçalho de coluna duplicado na tabela, você pode adicionar espaço à direita ao cabeçalho duplicado. Aqui está um código VBA que pode ajudá-lo a repetir o cabeçalho e adicionar automaticamente espaços à direita para deixá-los diferentes, mas com a mesma aparência.
auto completar de outra lista

Adicionar automaticamente espaços à direita ao cabeçalho

Nota: os métodos fornecidos neste tutorial são testados no Excel 2021, pode haver alguns diferentes em diferentes versões do Excel.


Adicionar automaticamente espaços à direita ao cabeçalho

1. Digite os cabeçalhos que deseja repetir em uma coluna e pressione outro + F11 chaves para habilitar Microsoft Visual Basic para Aplicações janela.

2. Clique inserção > Módulo para criar um novo módulo no Microsoft Visual Basic para Aplicações janela e, em seguida, copie e cole o código abaixo para ele.

VBA: Repetir e adicionar espaços à direita

Sub repeat()
'UpdatebyExtendoffice20220927
    Dim xRg As Range
    Dim saveRg As Range
    Dim xIndex As Integer
    Dim xCount As Integer
    Dim k As Integer
    Dim xStr As String
    Set xRg = Application.InputBox("Select the cells that you want to repeat", "kte", , , , , , 8)
    xIndex = Application.InputBox("Enter the repeat times", "kte")
    Set saveRg = Application.InputBox("Select a cell to output", "kte", , , , , , 8)
    xStr = ""
    xCount = xRg.Cells.Count * xIndex
    Set saveRg = saveRg.Range("a1").Resize(1, xCount)
    k = 0
    For i = 1 To xIndex
        For j = 1 To xRg.Cells.Count
            k = k + 1
            saveRg.Cells(k).Value = xRg.Cells(j).Value + xStr
        Next
        xStr = xStr + " "
    Next
End Sub

 auto completar de outra lista

3. Clique Corrida auto completar de outra lista botão na faixa de opções ou pressione F5 para ativar o código, na primeira caixa de diálogo, selecione os cabeçalhos que deseja repetir. Clique OK.
auto completar de outra lista

4. Na segunda caixa de diálogo pop-up, digite os tempos de repetição desejados. Clique OK.
auto completar de outra lista

5. Selecione uma célula para a qual você deseja gerar os cabeçalhos repetidos. Clique OK.
auto completar de outra lista

Agora os cabeçalhos foram repetidos e adicionados com espaços à direita.
auto completar de outra lista

6. Selecione os cabeçalhos e copie-os pressionando Ctrl + C, e cole-os de volta na tabela que você precisa pressionando Ctrl + V.

Agora você pode ver que a tabela tem cabeçalhos de coluna duplicados sem numeração.
auto completar de outra lista


Outras operações (artigos)

Como encontrar o valor absoluto máximo ou mínimo e manter o login no Excel
Às vezes, você pode querer encontrar os valores máximos ou mínimos de seus valores absolutos, mas mantenha o sinal ao retornar o resultado, como mostra a captura de tela abaixo.

Como manter o apóstrofo principal ao digitar no Excel?
Como sabemos, quando você deseja alterar um número para um texto, você pode inserir um símbolo de apóstrofo na frente como este: '123, e o número será convertido em texto e ocultará o apóstrofo.

Como forçar a abertura como somente leitura no Excel?
Às vezes, você deseja que outros usuários que abrem suas pastas de trabalho compartilhadas sejam cautelosos ao editar as pastas de trabalho compartilhadas, você pode fazer um prompt somente leitura para avisá-los...

Como parar o Excel de datas de formatação automática em CSV?
Aqui está um arquivo csv que contém a data como formato de texto 12-maio-20, mas quando você abrir através do Excel será armazenado automaticamente como formato de data ...



  • Barra Super Fórmula (edite facilmente várias linhas de texto e fórmula); Layout de leitura (ler e editar facilmente um grande número de células); Colar na faixa filtrada...
  • Mesclar células / linhas / colunas e manutenção de dados; Dividir o conteúdo das células; Combine Linhas Duplicadas e Soma / Média... Evite células duplicadas; Comparar intervalos...
  • Selecione Duplicado ou Único Linhas; Selecione linhas em branco (todas as células estão vazias); Super Find e Fuzzy Find em muitos livros; Seleção aleatória ...
  • Cópia exata Várias células sem alterar a referência da fórmula; Criação automática de referências para várias folhas; Inserir marcadores, Caixas de seleção e mais ...
  • Fórmulas favoritas e de inserção rápida, Intervalos, gráficos e imagens; Criptografar células com senha; Criar lista de discussão e enviar emails ...
  • Extrair Texto, Adicionar texto, remover por posição, Remover Espaço; Criar e imprimir subtotais de paginação; Converter entre conteúdo de células e comentários...
  • Super Filtro (salvar e aplicar esquemas de filtro a outras planilhas); Classificação Avançada por mês / semana / dia, frequência e mais; Filtro Especial por negrito, itálico ...
  • Combine pastas de trabalho e planilhas; Mesclar tabelas com base em colunas-chave; Divida os dados em várias folhas; Conversão em lote de xls, xlsx e PDF...
  • Agrupamento de tabela dinâmica por número da semana, dia da semana e mais ... Mostrar células desbloqueadas, bloqueadas por cores diferentes; Destacar células que possuem fórmula / nome...
guia kte 201905
  • Habilite a edição e leitura com guias em Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
  • Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!
parte inferior da aba do escritório
Comentários (0)
Ainda não há classificações. Seja o primeiro a avaliar!
Não há comentários postados aqui ainda
Deixe o seu comentário
Postando como convidado
×
Avalie esta postagem:
0   Personagens
Locais sugeridos