Note: The other languages of the website are Google-translated. Back to English

Jak zabránit automatickému číslování v duplicitním záhlaví sloupce v tabulce Excel?

Když v Excelu napíšete duplicitní záhlaví sloupce do tabulky, bude automaticky přidáno číslo stejně jako jméno, jméno1, jméno2 a číslo nelze odstranit, jak ukazuje níže uvedený snímek obrazovky. Chcete-li zabránit automatickému číslování v duplicitním záhlaví sloupce v tabulce, můžete do duplicitního záhlaví přidat koncovou mezeru. Zde je kód VBA, který vám může pomoci zopakovat záhlaví a automaticky přidat koncové mezery, aby byly odlišné, ale vypadaly stejně.
automatické dokončení z jiného seznamu

Automatické přidávání koncových mezer do záhlaví

Poznámka: Metody uvedené v tomto kurzu jsou testovány v Excelu 2021, v různých verzích Excelu se mohou lišit.


Automatické přidávání koncových mezer do záhlaví

1. Zadejte záhlaví, která chcete ve sloupci opakovat, a stiskněte Další + F11 klíče k povolení Microsoft Visual Basic pro aplikace okno.

2. cvaknutí Vložit > Modul vytvořit nový modul v Microsoft Visual Basic pro aplikace okno, poté do něj zkopírujte a vložte níže uvedený kód.

VBA: Opakujte a přidejte koncové mezery

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

 automatické dokončení z jiného seznamu

3. cvaknutí Běh automatické dokončení z jiného seznamu tlačítko na pásu karet nebo stiskněte F5 aktivujte kód, v prvním vyskakovacím dialogu vyberte záhlaví, která chcete opakovat. Klikněte OK.
automatické dokončení z jiného seznamu

4. V druhém vyskakovacím dialogu zadejte požadovaný počet opakování. Klikněte OK.
automatické dokončení z jiného seznamu

5. Vyberte buňku, ze které chcete vytisknout opakovaná záhlaví. Klikněte OK.
automatické dokončení z jiného seznamu

Nyní byla záhlaví opakována a doplněna o koncové mezery.
automatické dokončení z jiného seznamu

6. Vyberte záhlaví a zkopírujte je stisknutím Ctrl + Ca stisknutím tlačítka je vložte zpět na požadovaný stůl Ctrl + V.

Nyní můžete vidět, že tabulka má duplicitní záhlaví sloupců bez číslování.
automatické dokončení z jiného seznamu


Další operace (články)

Jak najít maximální nebo minimální absolutní hodnotu a udržet přihlášení v aplikaci Excel
Někdy možná budete chtít najít maximální nebo minimální hodnoty jejich absolutních hodnot, ale ponechte jejich znaménko při vrácení výsledku, jak ukazuje níže uvedený snímek obrazovky.

Jak udržet hlavní apostrof při psaní v Excelu?
Jak víme, když chcete změnit číslo na text, můžete vpředu zadat symbol apostrofu takto: '123 a číslo se převede na text a skryje apostrof.

Jak vynutit otevření pouze pro čtení v aplikaci Excel?
Někdy chcete, aby ostatní uživatelé, kteří otevírají vaše sdílené sešity, byli opatrní, když se chystají upravovat sdílené sešity, můžete vytvořit výzvu pouze pro čtení a upozornit je...

Jak zabránit Excelu v automatickém formátování dat v CSV?
Zde je soubor csv, který obsahuje datum jako textový formát 12-květen-20, ale při otevření přes Excel se automaticky uloží jako formát data...



  • Super Formula Bar (snadno upravit více řádků textu a vzorce); Rozložení pro čtení (snadno číst a upravovat velké množství buněk); Vložit do filtrovaného rozsahu...
  • Sloučit buňky / řádky / sloupce a uchovávání údajů; Rozdělit obsah buněk; Zkombinujte duplicitní řádky a součet / průměr... Zabraňte duplicitním buňkám; Porovnat rozsahy...
  • Vyberte možnost Duplikovat nebo Jedinečný Řádky; Vyberte prázdné řádky (všechny buňky jsou prázdné); Super hledání a fuzzy hledání v mnoha sešitech; Náhodný výběr ...
  • Přesná kopie Více buněk beze změny odkazu na vzorec; Automaticky vytvářet reference do více listů; Vložte odrážky, Zaškrtávací políčka a další ...
  • Oblíbené a rychlé vkládání vzorců„Rozsahy, grafy a obrázky; Šifrovat buňky s heslem; Vytvořte seznam adresátů a posílat e-maily ...
  • Extrahujte text, Přidat text, Odebrat podle pozice, Odebrat mezeru; Vytváření a tisk mezisoučtů stránkování; Převod mezi obsahem buněk a komentáři...
  • Super filtr (uložit a použít schémata filtrů na jiné listy); Rozšířené řazení podle měsíce / týdne / dne, frekvence a dalších; Speciální filtr tučnou kurzívou ...
  • Kombinujte sešity a pracovní listy; Sloučit tabulky na základě klíčových sloupců; Rozdělte data do více listů; Dávkový převod xls, xlsx a PDF...
  • Seskupování kontingenčních tabulek podle číslo týdne, den v týdnu a další ... Zobrazit odemčené, zamčené buňky různými barvami; Zvýrazněte buňky, které mají vzorec / název...
karta kte 201905
  • Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
  • Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
  • Zvyšuje vaši produktivitu o 50% a omezuje stovky kliknutí myší každý den!
officetab dno
Komentáře (0)
Zatím žádné hodnocení. Buďte první, kdo ohodnotí!
Zatím zde nejsou žádné komentáře
Zanechat své připomínky
Odesílání jako host
×
Ohodnoťte tento příspěvek:
0   Postavy
Doporučená umístění