Hopp til hovedinnhold

Hvordan forhindre automatisk nummerering ved duplisert kolonneoverskrift i Excel-tabellen?

Forfatter: Sun Sist endret: 2024-11-11

I Excel, når du skriver inn den dupliserte kolonneoverskriften i tabellen, vil den automatisk legges til et nummer akkurat som navn, navn1, navn2, og nummeret kan ikke fjernes som skjermbildet nedenfor viser. For å forhindre automatisk nummerering ved duplisert kolonneoverskrift i tabellen, kan du legge til etterfølgende plass til den dupliserte overskriften. Her er en VBA-kode som kan hjelpe deg å gjenta overskriften og automatisk legge til etterfølgende mellomrom for å la dem være forskjellige, men ser like ut.
forhindre automatisk nummerering ved duplisert kolonneoverskrift

Legg automatisk til etterfølgende mellomrom i overskriften

Merk: Metodene i denne opplæringen er testet i Excel 2021, det kan være noe forskjellig i forskjellige Excel-versjoner.


Legg automatisk til etterfølgende mellomrom i overskriften

1. Skriv inn overskriftene du vil gjenta i en kolonne, og trykk deretter andre + F11 tastene for å aktivere Microsoft Visual Basic for Applications vinduet.

2. klikk innfelt > Moduler for å lage en ny modul i Microsoft Visual Basic for Applications vindu, kopier og lim inn koden nedenfor til den.

VBA: Gjenta og legg til etterfølgende mellomrom

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

 kopier og lim inn koden i modulen

3. klikk Kjør kjør-knappen knappen i båndet eller trykk F5 tasten for å aktivere koden, i den første sprettdialogen, velg overskriftene du vil gjenta. Klikk OK.
velg overskriftene som skal gjentas

4. I den andre sprettdialogen skriver du inn gjentatte ganger du ønsker. Klikk OK.
skriv inn repetisjonstidene

5. Velg en celle du vil sende ut de gjentatte overskriftene. Klikk OK.
Velg en celle for å skrive ut de gjentatte overskriftene

Nå er overskriftene gjentatt og lagt til med etterfølgende mellomrom.
overskriftene gjentas og legges til med etterfølgende mellomrom

6. Velg overskriftene og kopier dem ved å trykke Ctrl + C, og lim dem tilbake til tabellen du trenger ved å trykke Ctrl + V.

Nå kan du se at tabellen har dupliserte kolonneoverskrifter uten nummerering.
tabellen har dupliserte kolonneoverskrifter uten nummerering

et skjermbilde av kutools for excel ai

Lås opp Excel Magic med Kutools AI

  • Smart utførelse: Utfør celleoperasjoner, analyser data og lag diagrammer – alt drevet av enkle kommandoer.
  • Egendefinerte formler: Generer skreddersydde formler for å strømlinjeforme arbeidsflytene dine.
  • VBA-koding: Skriv og implementer VBA-kode uten problemer.
  • Formeltolkning: Forstå komplekse formler med letthet.
  • Tekstoversettelse: Bryt språkbarrierer i regnearkene dine.
Forbedre Excel-funksjonene dine med AI-drevne verktøy. Last ned nå og opplev effektivitet som aldri før!

Andre operasjoner (artikler)

Hvordan finne maksimal eller minimum absolutt verdi og fortsette å logge på Excel
Noen ganger vil du kanskje finne maksimums- eller minimumsverdiene for deres absolutte verdier, men behold tegnet deres når du returnerer resultatet som skjermbildet nedenfor viser.

Hvordan beholde ledende apostrof når du skriver i Excel?
Som vi vet, når du vil endre et tall til en tekst, kan du skrive inn et apostrofsymbol foran slik: ‘123, og tallet vil bli konvertert til en tekst og skjule apostrof.

Hvordan tvinge til å åpne som skrivebeskyttet i Excel?
Noen ganger vil du at andre brukere som åpner de delte arbeidsbøkene dine skal være forsiktige når de skal redigere de delte arbeidsbøkene, du kan lage en skrivebeskyttet melding for å advare dem...

Hvordan stoppe Excel fra automatisk formatering av datoer i CSV?
Her er en csv-fil som inneholder datoen som tekstformat 12-mai-20, men når du åpner gjennom excel vil automatisk lagres som datoformat...


  • Super Formula Bar (enkelt redigere flere linjer med tekst og formel); Leseoppsett (lett å lese og redigere et stort antall celler); Lim inn til filtrert område...
  • Slå sammen celler/rader/kolonner og holde data; Del celleinnhold; Kombiner dupliserte rader og sum/gjennomsnitt... Forhindre dupliserte celler; Sammenlign områder...
  • Velg Dupliser eller Unik rader; Velg Blanke rader (alle celler er tomme); Super Finn og Fuzzy Find i mange arbeidsbøker; Tilfeldig valg...
  • Nøyaktig kopi Flere celler uten å endre formelreferanse; Opprett referanser automatisk til flere ark; Sett inn kuler, avmerkingsbokser og mer...
  • Favorittformler og hurtiginnsettingsformler, Områder, diagrammer og bilder; Krypter celler med passord; Lag e-postliste og send e-post...
  • Trekk ut tekst, Legg til tekst, Fjern etter posisjon, Fjern plass; Opprett og skriv ut sidetotaler; Konverter mellom cellers innhold og kommentarer...
  • Superfilter (lagre og bruk filterskjemaer på andre ark); Avansert sortering etter måned/uke/dag, frekvens og mer; Spesialfilter med fet, kursiv...
  • Kombiner arbeidsbøker og arbeidsark; Slå sammen tabeller basert på nøkkelkolonner; Del data i flere ark; Batch Konverter xls, xlsx og PDF...
  • Pivottabell gruppering etter ukenummer, ukedag og mer... Vis ulåste, låste celler av forskjellige farger; Uthev celler som har formel/navn...
kte tab 201905
  • Aktiver faneredigering og lesing i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
  • Åpne og opprett flere dokumenter i nye faner i samme vindu, i stedet for i nye vinduer.
  • Øker produktiviteten din med 50 %, og reduserer hundrevis av museklikk for deg hver dag!
officetab nederst