Jak přidat mezeru mezi znaky nebo každou číslici v aplikaci Excel?

Předpokládejme, že máte seznam textových řetězců nebo čísel, co můžete udělat pro přidání mezery mezi znaky nebo každou číslici? Následující metody vám mohou pomoci tento problém vyřešit.

Přidejte mezeru mezi znaky nebo každou číslici pomocí uživatelem definované funkce
Přidejte mezeru mezi znaky nebo každou číslici pomocí Kutools pro Excel

Přidejte mezeru mezi znaky nebo každou číslici pomocí uživatelem definované funkce

Následující uživatelsky definovanou funkci můžete použít k přidání mezery mezi znaky nebo každou číslici v aplikaci Excel.

1. lis Další + F11 současně otevřete Microsoft Visual Basic pro aplikace okno.

2. V Microsoft Visual Basic pro aplikaci okno, klepněte na tlačítko Vložit > Modul. Poté zkopírujte a vložte následující kód do okna modulu.

Kód VBA: Přidejte mezeru mezi znaky nebo každou číslici

Function AddSpace(Str As String) As String
    Dim i As Long
    For i = 1 To Len(Str)
        AddSpace = AddSpace & Mid(Str, i, 1) & " "
    Next i
    AddSpace = Trim(AddSpace)
End Function

3. lis Další + Q klávesy pro zavření Microsoft Visual Basic pro aplikace a vraťte se zpět do okna aplikace Excel.

4. Vyberte prázdnou buňku a zadejte vzorec = AddSpace (B2) do řádku vzorců a poté stiskněte vstoupit klíč.

V tomto případě můžete vidět, že mezi znaky buňky B2 jsou přidány mezery.

Poznámka: Chcete-li přidat mezeru mezi každou číslici, změňte prosím odkaz na buňku ve vzorci na buňku s čísly, jak potřebujete.

Přidejte mezeru mezi znaky nebo každou číslici pomocí Kutools pro Excel

Pokud je pro vás kód VBA komplikovaný, můžete vyzkoušet doplnit text užitečnost Kutools pro Excel. Postupujte prosím následovně.

1. Vyberte buňky, které potřebujete přidat mezeru mezi znaky nebo každou číslici, a klepněte na Kutools > text > doplnit text. Viz snímek obrazovky:

2. V doplnit text v dialogovém okně klikněte na text okénko a stiskněte space jednou zadejte mezeru do textového pole a poté vyberte ikonu Pouze přidat do volba.

Přidání mezery mezi znaky:

Vybrat 1. písmeno je velká / malá v rozevíracím seznamu a nakonec klikněte na OK .

Přidání mezery mezi každou číslici:

Vybrat 1. znak je číslo v rozevíracím seznamu a nakonec klikněte na OK .

Potom se mezi znaky nebo každou číslici zadaných buněk přidají mezery.

Přidejte mezeru mezi znaky nebo každou číslici pomocí Kutools pro Excel

Související články:

• Jak odstranit text před nebo za konkrétním znakem v aplikaci Excel?
• Jak počítat výskyty konkrétních znaků v buňce v aplikaci Excel?

---

Nejlepší kancelářské nástroje produktivity

Kutools pro Excel řeší většinu vašich problémů a zvyšuje vaši produktivitu o 80%

• Opakované použití: Rychle vložte složité vzorce, grafy a cokoli, co jste dříve používali; Šifrovat buňky s heslem; Vytvořte seznam adresátů a posílat e-maily ...
• 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 bez ztráty dat; Rozdělit obsah buněk; Zkombinujte duplicitní řádky / sloupce... 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ší ...
• 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...
• Více než 300 výkonných funkcí. Podporuje Office / Excel 2007-2021 a 365. Podporuje všechny jazyky. Snadné nasazení ve vašem podniku nebo organizaci. Plné funkce 30denní bezplatná zkušební verze. 60denní záruka vrácení peněz.

Čtěte více... Stažení zdarma... Nákup... 

---

Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci

• 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 snižuje stovky kliknutí myší každý den!

Čtěte více... Stažení zdarma... Nákup...