Hoppa till huvudinnehåll

Hur förhindrar man automatisk numrering vid duplicerad kolumnrubrik i Excel-tabellen?

I Excel, när du skriver den dubbla kolumnrubriken i tabellen, kommer det att automatiskt läggas till ett nummer precis som namn, namn1, namn2 och numret kan inte tas bort som skärmbilden nedan visar. För att förhindra automatisk numrering vid dubblett av kolumnrubriken i tabellen, kan du lägga till efterföljande utrymme till dubbletthuvudet. Här är en VBA-kod som kan hjälpa dig att upprepa rubriken och automatiskt lägga till efterföljande utrymmen för att låta dem skilja sig men ser likadana ut.
automatisk komplett från en annan lista

Lägg automatiskt till efterföljande mellanslag i sidhuvudet

Obs: metoderna som tillhandahålls i denna handledning testas i Excel 2021, det kan finnas några olika i olika Excel-versioner.


Lägg automatiskt till efterföljande mellanslag i sidhuvudet

1. Skriv de rubriker du vill upprepa i en kolumn och tryck sedan på andra + F11 för att aktivera Microsoft Visual Basic för applikationer fönster.

2. klick Insert > Modulerna för att skapa en ny modul i Microsoft Visual Basic för applikationer fönstret, kopiera och klistra sedan in koden nedan i det.

VBA: Upprepa och lägg till efterföljande mellanslag

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

 automatisk komplett från en annan lista

3. klick Körning automatisk komplett från en annan lista knappen i bandet eller tryck F5 för att aktivera koden, välj de rubriker som du vill upprepa i den första poppade dialogrutan. Klick OK.
automatisk komplett från en annan lista

4. I den andra poppade dialogrutan skriver du in de upprepade gånger du vill ha. Klick OK.
automatisk komplett från en annan lista

5. Välj en cell som du vill ska mata ut de upprepade rubrikerna. Klick OK.
automatisk komplett från en annan lista

Nu har rubrikerna upprepats och lagts till med efterföljande mellanslag.
automatisk komplett från en annan lista

6. Välj rubrikerna och kopiera dem genom att trycka på ctrl + C, och klistra tillbaka dem till bordet du behöver genom att trycka på ctrl + V.

Nu kan du se att tabellen har dubbla kolumnrubriker utan numrering.
automatisk komplett från en annan lista


Annan verksamhet (artiklar)

Hur man hittar högsta eller lägsta absoluta värde och fortsätter att logga in i Excel
Ibland kanske du vill hitta maximala eller lägsta värden för deras absoluta värden men behålla deras tecken när du returnerar resultatet som skärmbilden nedan visar.

Hur man fortsätter att leda apostrof när man skriver i Excel?
Som vi vet, när du vill ändra ett nummer till en text, kan du ange en apostrofsymbol längst fram så här: '123, och numret kommer att konverteras till en text och dölja apostrof.

Hur tvingar man att öppna som skrivskyddad i Excel?
Ibland vill du att andra användare som öppnar dina delade arbetsböcker ska vara försiktiga när de ska redigera de delade arbetsböckerna, du kan göra en skrivskyddad uppmaning för att varna dem...

Hur stoppar jag Excel från automatisk formatering av datum i CSV?
Här är en csv-fil som innehåller datumet som textformat 12-maj-20 men när du öppnar genom excel kommer att automatiskt lagras som datumformat...


  • Super Formula Bar (enkelt redigera flera rader med text och formel); Läslayout (enkelt läsa och redigera ett stort antal celler); Klistra in i filtrerat intervall...
  • Sammanfoga celler / rader / kolumner och förvaring av data; Delat cellinnehåll; Kombinera duplicerade rader och summa / genomsnitt... Förhindra duplicerade celler; Jämför intervall...
  • Välj Duplicera eller Unikt Rader; Välj tomma rader (alla celler är tomma); Super Find och Fuzzy Find i många arbetsböcker; Slumpmässigt val ...
  • Exakt kopia Flera celler utan att ändra formelreferens; Skapa referenser automatiskt till flera ark; Sätt in kulor, Kryssrutor och mer ...
  • Favorit och sätt snabbt in formler, Intervall, diagram och bilder; Kryptera celler med lösenord; Skapa e-postlista och skicka e-post ...
  • Extrahera text, Lägg till text, ta bort efter position, Ta bort mellanslag; Skapa och skriva ut personsökningstalsatser; Konvertera mellan celler innehåll och kommentarer...
  • Superfilter (spara och tillämpa filterscheman på andra ark); Avancerad sortering efter månad / vecka / dag, frekvens och mer; Specialfilter av fet, kursiv ...
  • Kombinera arbetsböcker och arbetsblad; Sammanfoga tabeller baserat på nyckelkolumner; Dela data i flera ark; Batchkonvertera xls, xlsx och PDF...
  • Gruppering av pivottabell efter veckonummer, veckodagen och mer ... Visa olåsta, låsta celler av olika färger; Markera celler som har formel / namn...
kte-flik 201905
  • Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
  • Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
  • Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!
officetab botten
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations