Come evitare che Excel applichi automaticamente la numerazione nell’intestazione “Colonna duplicata” delle tabelle?

In Excel, quando si digita un’intestazione di colonna duplicata in una tabella, viene aggiunto automaticamente un numero (ad esempio: nome, nome1, nome2), e tale numero non può essere rimosso, come mostrato nello screenshot seguente. Per evitare la numerazione automatica nelle intestazioni di colonna duplicate, è sufficiente aggiungere uno spazio finale alle intestazioni ripetute. Di seguito è riportato un codice VBA che permette di replicare l’intestazione aggiungendo automaticamente spazi finali per distinguerle, mantenendo comunque un aspetto identico.

Aggiungi automaticamente Spazi finali all’intestazione

Nota: i metodi illustrati in questo tutorial sono stati testati su Excel 2021 e potrebbero presentare alcune differenze a seconda della versione di Excel utilizzata.

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

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

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. Fai clic sul pulsante Esegui nella Barra multifunzione oppure premi il tasto F5 per eseguire il codice. Nella prima finestra di dialogo visualizzata, seleziona le intestazioni da ripetere e fai clic su OK.

4. Nella seconda finestra di dialogo visualizzata, inserisci il numero di ripetizioni desiderato e fai clic su OK.

5. Seleziona la cella in cui desideri inserire le intestazioni ripetute e fai clic su OK.

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

6. Seleziona le intestazioni e copiale premendo Ctrl + C, quindi incollale nella tabella desiderata premendo Ctrl + V.

Ora puoi notare che la tabella presenta intestazioni di colonna duplicate, senza alcuna numerazione.

Sblocca la magia di Excel con KUTOOLS AI

• Esecuzione intelligente: Esegui operazioni sulle celle, analizza i dati e crea grafici, il tutto con comandi semplici e intuitivi.
• Formule personalizzate: crea formule su misura per ottimizzare i tuoi flussi di lavoro.
• Codifica VBA: Scrivi e implementa codice VBA in modo semplice e immediato.
• Interpretazione delle formule: Comprendi con facilità anche le formule più complesse.
• Traduzione del testo: Superate le barriere linguistiche direttamente nei vostri fogli di calcolo.

Potenzia le tue capacità in Excel con strumenti basati sull’intelligenza artificiale.Scarica orae scopri un’efficienza mai provata prima!

---

I migliori strumenti per la produttività in ufficio

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

• Super Barra delle formule (modifica facilmente più righe di testo e formule); Layout di lettura (leggi e modifica con facilità un gran numero di celle); Incolla in Intervallo di filtro...
• Unisci celle/righe/colonne e conserva i dati; dividi il contenuto delle celle; combina righe duplicate e calcola somma/media…; previeni voci duplicate; confronta intervalli…
• Seleziona duplicati o valori univoci nelle righe; Seleziona righe vuote (tutte le celle sono vuote); Super Trova e ricerca fuzzy in molte cartelle di lavoro; selezione casuale…
• Copia esatta di celle multiple senza modificare i riferimenti delle formule; creazione automatica di riferimenti a più fogli; inserisci punti elenco, caselle di controllo e molto altro...
• Formule preferite e inserimento rapido, intervalli, grafici e immagini; crittografa le celle con password; crea un elenco di invio e invia email...
• Estrai testo, aggiungi testo, rimuovi caratteri da una posizione specifica, elimina spazi; crea e stampa statistiche dei dati della pagina; converti il contenuto delle celle in commenti e viceversa...
• Super Filtri (salva e applica schemi di filtro ad altri fogli); Ordinamento avanzato per mese, settimana, giorno, frequenza e molto altro; Filtro speciale per grassetto, corsivo…
• Combina cartelle e fogli di lavoro; unisci tabelle in base a una colonna chiave; suddividi i dati in più fogli; converti in batch file xls, xlsx e PDF...
• Raggruppa la tabella pivot per numero di settimana, giorno della settimana e altro ancora...Mostra le celle sbloccate e blocca la selezione con colori diversi;Evidenzia le celle contenenti formule o nomi...

Scopri di più...Prova gratuita di 30 giorni con tutte le funzionalità...Acquista... 

---

Office Tab – aggiunge un’interfaccia a schede a Office e rende il tuo lavoro molto più semplice

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

Scopri di più...Prova gratuita di 30 giorni con tutte le funzionalità...Acquista...