Microsoft Excel je výkonný nástroj pro práci s daty, který se často používá ke zpracování a analýze číselných informací. Někdy se však v tabulkách Excelu mezi čísly objeví zbytečné mezery, které mohou ztěžovat další zpracování dat.
V tomto článku se podíváme na podrobný návod, jak odstranit mezery mezi čísly v Excelu. Ukážeme několik způsobů, včetně použití vestavěných vzorců a funkcí a použití speciálních nástrojů.
Než začnete, je důležité si uvědomit, že odstranění mezer mezi čísly může být užitečné v různých situacích. Pokud například potřebujete provést matematické operace s čísly v Excelu nebo vytvořit filtry a kontingenční tabulky založené na číselných hodnotách, odstranění mezer umožní tyto úkoly zjednodušit a urychlit.
Příprava na odstranění mezer
Před zahájením procesu odstraňování mezer mezi čísly v Excelu je třeba provést několik předběžných kroků:
- Otevřete dokument aplikace Excel, ve kterém chcete odstranit mezery.
- Zvýrazněte sloupec nebo rozsah buněk, které obsahují čísla s mezerami.
- Pokud potřebujete odstranit mezery pouze v určité oblasti, zvýrazněte příslušný sloupec nebo rozsah buněk.
- Vytvořte kopii sloupce nebo rozsahu buněk, abyste se mohli v případě chyby vrátit k původním datům.
- Chcete-li vytvořit kopii, vyberte sloupec nebo rozsah buněk, klikněte pravým tlačítkem myši a vyberte možnost Kopírovat. Poté klikněte pravým tlačítkem na jinou buňku a vyberte možnost Vložit.
Po dokončení těchto kroků jste připraveni přejít k odstranění mezer mezi čísly v Excelu.
Použití funkce podřazení
Funkce podřazení v Excelu se používá k extrahování úryvku textu z buňky. Může být užitečná při odstraňování mezer mezi čísly.
Chcete-li použít funkci podřetězce k odstranění mezer, budete potřebovat vědět, kolik znaků je třeba číst z buňky. Zadejte počáteční pozici a počet znaků, které chcete extrahovat.
Řekněme, že máte buňku s hodnotou "1 2 3 4 5" a chcete odstranit všechny mezery mezi čísly. K tomu můžete použít následující vzorec:
| Buňka | Výsledek |
|---|---|
| A1 | =PODŘEP(A1, 1, 1)&PODŘEP (A1,3,1)&PODŘEP (A1,5, 1)&PODŘEP (a1, 7, 1)&PODŘEP (a1, 9, 1) |
V tomto vzorci jsme uvedli, že je třeba vyjmout první, třetí, pátou, sedmou a devátou pozici z buňky A1. Tyto hodnoty jsme poté zkombinovali pomocí příkazu"&".
Po aplikaci tohoto vzorce získáte výsledek "12345" bez mezer.
Použití funkce podřazení umožňuje různé manipulace s textem v Excelu, včetně odstranění mezer mezi čísly. To může být užitečné při práci s velkými datovými sadami nebo v případě potřeby vyčistit data od zbytečných znaků.
Použití funkce Nahradit
K odstranění mezer mezi čísly v Excelu lze použít funkci nahradit. Funkce Nahradit vám umožňuje nahradit řetězec znaků nebo část řádku jiným řádkem nebo symbolem.
Chcete-li odstranit mezery mezi čísly v buňce, postupujte podle těchto kroků:
- Vyberte buňku nebo sloupec, ve kterém chcete odstranit mezery.
- Klikněte na tlačítko" vzorce " v horní liště nabídek v Excelu.
- Vyberte " funkce "a v nabídce, která se zobrazí, vyberte"text".
- V seznamu funkcí vyberte "nahradit".
- Do pole Starý_text zadejte mezeru nebo symbol, který chcete vyměnit.
- V poli "Nový_text" nechte prázdné, abyste odstranili mezery mezi čísly.
- Klikněte na tlačítko OK a mezery mezi čísly budou odstraněny ve vyhrazené buňce nebo sloupci.
Pokud například chcete odstranit mezery mezi čísly v buňce A1, pak lze funkci nahradit následujícím způsobem:
= Nahradit (A1,"",")
Výsledek se zobrazí ve stejné buňce, kde funkci aplikujete.
Nyní víte, jak použít funkci nahradit k odstranění mezer mezi čísly v Excelu. Tato metoda usnadňuje zpracování velkých objemů dat a rychle a efektivně odstraňuje mezery mezi čísly.
Použití speciálního VBA skriptu
Chcete-li začít, otevřete Editor VBA stisknutím klávesy ALT+F11. V editoru vytvořte nový modul kliknutím pravým tlačítkem myši na volnou oblast v okně projektu a výběrem Vložit - > Modul. V okně modulu, které se otevře, vložte následující kód:
Sub RemoveSpaces()Dim rng As RangeDim cell As RangeDim str As StringDim i As IntegerSet rng = SelectionFor Each cell In rngstr = cell.Valuestr = Replace(str, " ", "")For i = 1 To Len(str)cell.Characters(i, 1).Text = Mid(str, i, 1)Next iNext cellEnd Sub
V tomto skriptu používáme cykly a funkci Replace() Chcete-li odstranit mezery z hodnoty buňky. Poté přejdeme přes každý znak v řádku a nahradíme jej příslušným symbolem z filtrovaného řádku bez mezer.
Po vložení skriptu zavřete Editor VBA. Nyní můžete začít odstraňovat mezery mezi čísly v Excelu. Chcete-li to provést, vyberte buňky, ve kterých chcete odstranit mezery, a postupujte takto:
- Klikněte na kartu "Zpracovatel" v horním panelu nástrojů aplikace Excel. Pokud se karta nezobrazí, povolte ji podle následujících kroků: Soubor ->Parametry ->Rozšíření ->Domovská karta ->Zpracovatel.
- Na kartě Vývojář klikněte na tlačítko "Makra".
- V okně, které se otevře, vyberte skript "RemoveSpaces" a klikněte na tlačítko "Spustit".
Po spuštění skriptu budou odstraněny všechny mezery mezi čísly ve vybraných buňkách.