Preskoči na glavno vsebino

Kako preprečiti samodejno številčenje pri podvojeni glavi stolpca v Excelovi tabeli?

Avtor: Sonce Zadnja sprememba: 2022-10-21

V Excelu, ko v tabelo vnesete podvojeno glavo stolpca, bo samodejno dodana številka kot ime, ime1, ime2 in številke ni mogoče odstraniti, kot prikazuje spodnji posnetek zaslona. Če želite preprečiti samodejno številčenje podvojene glave stolpca v tabeli, lahko podvojeni glavi dodate presledek. Tukaj je koda VBA, ki vam lahko pomaga ponoviti glavo in samodejno dodati končne presledke, da se razlikujejo, vendar izgledajo enako.
samodejno dokončanje z drugega seznama

Samodejno dodajte končne presledke v glavo

Opomba: metode, navedene v tej vadnici, so preizkušene v Excelu 2021, v različnih različicah Excela se lahko razlikujejo.


Samodejno dodajte končne presledke v glavo

1. V stolpec vnesite glave, ki jih želite ponoviti, in pritisnite druga + F11 tipke za omogočanje Microsoft Visual Basic za aplikacije okno.

2. klik Vstavi > Moduli ustvariti nov modul v Microsoft Visual Basic za aplikacije oknu, nato pa vanj kopirajte in prilepite spodnjo kodo.

VBA: ponovite in dodajte končne presledke

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

 samodejno dokončanje z drugega seznama

3. klik Run samodejno dokončanje z drugega seznama gumb na traku ali pritisnite F5 da aktivirate kodo, v prvem pojavnem pogovornem oknu izberite glave, ki jih želite ponoviti. Kliknite OK.
samodejno dokončanje z drugega seznama

4. V drugem pojavnem pogovornem oknu vnesite želene čase ponavljanja. Kliknite OK.
samodejno dokončanje z drugega seznama

5. Izberite celico, iz katere želite izpisati ponavljajoče se glave. Kliknite OK.
samodejno dokončanje z drugega seznama

Zdaj so glave ponovljene in dodane s presledki na koncu.
samodejno dokončanje z drugega seznama

6. Izberite glave in jih kopirajte s pritiskom na Ctrl + Cin jih s pritiskom prilepite nazaj v tabelo, ki jo potrebujete Ctrl + V.

Zdaj lahko vidite, da ima tabela podvojene glave stolpcev brez oštevilčenja.
samodejno dokončanje z drugega seznama


Druge operacije (članki)

Kako najti največjo ali najmanjšo absolutno vrednost in obdržati prijavo v Excelu
Včasih boste morda želeli poiskati najvišje ali najmanjše vrednosti njihovih absolutnih vrednosti, vendar ohraniti njihov predznak, ko vrnete rezultat, kot prikazuje spodnji posnetek zaslona.

Kako ohraniti začetni apostrof pri tipkanju v Excelu?
Kot vemo, ko želite številko spremeniti v besedilo, lahko spredaj vnesete simbol apostrofa, kot je ta: '123, in številka bo pretvorjena v besedilo in skrije apostrof.

Kako v Excelu prisiliti, da se odpre kot samo za branje?
Včasih želite, da so drugi uporabniki, ki odpirajo vaše delovne zvezke v skupni rabi, previdni, ko nameravajo urejati delovne zvezke v skupni rabi, lahko naredite poziv samo za branje, da jih opozorite ...

Kako Excelu preprečiti samodejno oblikovanje datumov v CSV?
Tukaj je datoteka csv, ki vsebuje datum kot besedilno obliko 12-may-20, vendar ko jo odprete prek excela, bo samodejno shranjena kot oblika datuma ...


  • Vrstica Super Formula (enostavno urejanje več vrstic besedila in formule); Bralna postavitev (enostavno branje in urejanje velikega števila celic); Prilepite v filtrirani obseg...
  • Združi celice / vrstice / stolpce in vodenje podatkov; Vsebina razdeljenih celic; Združite podvojene vrstice in vsoto / povprečje... prepreči podvojene celice; Primerjaj obsege...
  • Izberite Duplicate ali Unique Vrstice; Izberite prazne vrstice (vse celice so prazne); Super Find in Fuzzy Find v mnogih delovnih zvezkih; Naključna izbira ...
  • Natančna kopija Več celic brez spreminjanja sklica formule; Samodejno ustvarjanje referenc na več listov; Vstavi oznake, Potrditvena polja in še več ...
  • Priljubljene in hitro vstavite formule, Obsegi, grafikoni in slike; Šifriraj celice z geslom; Ustvari poštni seznam in pošiljanje e-pošte ...
  • Izvleček besedila, Dodaj besedilo, Odstrani po položaju, Odstrani presledek; Ustvari in natisni vmesne seštevke strani Pretvarjanje med vsebino celic in komentarji...
  • Super filter (shranite in uporabite sheme filtrov za druge liste); Napredno razvrščanje glede na mesec / teden / dan, pogostost in drugo; Poseben filter s krepko, ležeče ...
  • Združite delovne zvezke in delovne liste; Spoji tabele na podlagi ključnih stolpcev; Razdelite podatke na več listov; Paketna pretvorba xls, xlsx in PDF...
  • Razvrščanje vrtilne tabele po številka tedna, dan v tednu in še več ... Prikaži odklenjene, zaklenjene celice po različnih barvah; Označite celice s formulo / imenom...
zavihek kte 201905
  • Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
  • Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
  • Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!
dno pisarniške mize
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