Come impedire la numerazione automatica delle intestazioni di colonna duplicate in una tabella di Excel?

In Excel, quando si digita un'intestazione di colonna duplicata in una tabella, verrà aggiunto automaticamente un numero, come nome, nome1, nome2, e il numero non può essere rimosso, come mostra lo screenshot sottostante. Per evitare la numerazione automatica delle intestazioni di colonna duplicate nella tabella, è possibile aggiungere spazi finali all'intestazione duplicata. Ecco un codice VBA che può aiutarti a ripetere l'intestazione e aggiungere automaticamente spazi finali per renderle diverse ma farle apparire uguali.

Aggiunta automatica di spazi finali all'intestazione

Nota: i metodi forniti in questo tutorial sono stati testati in Excel 2021, potrebbero esserci alcune differenze nelle varie versioni di Excel.

1. Digita le intestazioni che desideri ripetere in una colonna, quindi premi i tasti Alt + F11 per abilitare la finestra Microsoft Visual Basic for Applications.

2. Clicca su Inserisci > Modulo per creare un nuovo modulo nella finestra Microsoft Visual Basic for Applications, quindi copia e incolla il codice sottostante.

VBA: Ripeti e aggiungi spazi finali

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

3. Clicca Esegui  pulsante nella barra multifunzione o premi F5 tasto per attivare il codice; nel primo dialogo che appare, seleziona le intestazioni che desideri ripetere. Clicca OK.

4. Nel secondo dialogo che appare, digita il numero di volte che vuoi ripetere. Clicca OK.

5. Seleziona una cella in cui desideri esportare le intestazioni ripetute. Clicca OK.

Ora le intestazioni sono state ripetute e sono stati aggiunti spazi finali.

6. Seleziona le intestazioni e copiale premendo Ctrl + C, quindi incollale nuovamente nella tabella che ti serve premendo Ctrl + V.

Ora puoi vedere che la tabella ha intestazioni di colonna duplicate senza numerazione.

Sblocca la Magia di Excel con Kutools AI

• Esecuzione Intelligente: Esegui operazioni sulle celle, analizza i dati e crea grafici — tutto guidato da semplici comandi.
• Formule Personalizzate: Genera formule su misura per ottimizzare i tuoi flussi di lavoro.
• Codifica VBA: Scrivi e implementa codice VBA senza sforzo.
• Interpretazione delle Formule: Comprendi facilmente formule complesse.
• Traduzione del Testo: Superare le barriere linguistiche all'interno dei tuoi fogli di calcolo.

Potenzia le tue capacità di Excel con strumenti alimentati dall'IA. Scarica Ora ed esperisci un'efficienza mai vista prima!

---

I migliori strumenti per la produttività di Office

Kutools per Excel risolve la maggior parte dei tuoi problemi e aumenta la tua produttività dell'80%

• Barra delle formule super (modifica facilmente più righe di testo e formule); Layout di lettura (leggi ed edita facilmente un gran numero di celle); Incolla in un intervallo filtrato...
• Unisci celle/righe/colonne mantenendo i dati; Dividi il contenuto delle celle; Combina righe duplicate e somma/media... Prevenire celle duplicate; Confronta intervalli...
• Seleziona righe duplicate o uniche; Seleziona righe vuote (tutte le celle sono vuote); Super Trova e Trova approssimativa in molte cartelle di lavoro; Selezione casuale...
• Copia esatta di più celle senza cambiare il riferimento della formula; Crea automaticamente riferimenti a più fogli; Inserisci punti elenco, caselle di controllo e altro...
• Preferiti e inserimento rapido di formule, intervalli, grafici e immagini; Crittografa celle con password; Crea elenco di invio e invia email...
• Estrai testo, aggiungi testo, rimuovi caratteri in una posizione specifica, rimuovi spazio; Crea e stampa statistiche pagina dati; Converti tra contenuto delle celle e commenti...
• Super Filtri (salva e applica schemi di filtro ad altri fogli); Ordinamento avanzato per mese/settimana/giorno, frequenza e altro; Filtro speciale per grassetto, corsivo...
• Unisci cartelle di lavoro e fogli di lavoro; Unisci tabelle basandoti su colonne chiave; Suddividi dati in più fogli; Conversione batch di xls, xlsx e PDF...
• Raggruppamento tabella pivot per numero di settimana, giorno della settimana e altro... Mostra celle sbloccate, celle bloccate con colori diversi; Evidenziazione celle che hanno formula/nome...

Leggi di più... Prova gratuita completa di 30 giorni... Acquista... 

---

Office Tab - porta l'interfaccia a schede in Office e rende il tuo lavoro molto più facile

• Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
• Apri e crea documenti multipli in nuove schede della stessa finestra, anziché in nuove finestre.
• Aumenta la tua produttività del 50%, e riduce centinaia di clic del mouse ogni giorno!

Leggi di più... Prova gratuita completa di 30 giorni... Acquista...