Obsah
V tomto článku vám ukážeme, jak převést položku číslo sloupce na písmeno v aplikaci Excel třemi snadnými a efektivními způsoby.
Stáhnout pracovní sešit
Bezplatný cvičný sešit aplikace Excel si můžete stáhnout zde.
Převést číslo sloupce na písmeno.xlsm
3 snadné způsoby převodu čísla sloupce na písmeno v aplikaci Excel
V této části se dozvíte, jak převést čísla sloupců na písmena pomocí příkazu vzorec , VBA kód a vestavěná možnost v aplikaci Excel.
1. Vzorec pro převod čísla sloupce na písmeno v aplikaci Excel
Uvažujme následující soubor dat, který použijeme jako příklad pro převod čísla sloupce na písmeno pomocí vzorce.
Kroky:
- Vyberte buňku který chcete, aby se zobrazil jako výsledek.
- Na stránkách obecný vzorec převést číslo sloupce na písmeno je,
=SUBSTITUTE(ADDRESS(1,col_number,4), "1",")
- V této buňce tedy napište vzorec takto,
=SUBSTITUTE(ADDRESS(1,B5,4), "1",")
Zde,
B5 = Referenční číslo buňky, které obsahuje číslo sloupce pro převod na písmeno.
- Tisk Vstupte na .
Získáte přidruženou dopisní adresu ( A ) čísla sloupce ( 1 ) ve vašem souboru dat.
- Nyní přetáhněte řádek dolů o Plnicí rukojeť použít vzorec na ostatní buňky a převést je na písmena.
Rozdělení vzorců:
- ADRESA(1,B5,4)
- Výstup: A1
- Vysvětlení: Funkce ADRESA vrátí adresu buňky na základě zadaného řádku a sloupce. řádek číslo 1 a číslo sloupce z B5 pro konstrukci adresy a pro získání relativního odkazu nastavíme hodnotu 4 pro abs_num argument.
- abs_num = 4 je konstantní hodnota. Musíte nastavit hodnotu 4, jinak se adresa buňky zobrazí se znaky $.
- SUBSTITUTE(ADRESA(1,B5,4), "1",") -> stává se
- SUBSTITUTE(A1, "1″,"")
- Výstup: A
- Vysvětlení: Funkce SUBSTITUTE nahrazuje 1 s nic ("") z A1 , a proto se vrací A .
Přečtěte si více: [Opraveno] Čísla ve sloupcích aplikace Excel místo písmen (2 řešení)
Podobná čtení
- VBA pro použití rozsahu na základě čísla sloupce v aplikaci Excel (4 metody)
- Jak převést písmeno sloupce na číselný graf v aplikaci Excel (4 způsoby)
- Excel VBA: Nastavení rozsahu podle čísla řádku a sloupce (3 příklady)
2. VBA pro transformaci čísla sloupce na písmeno v aplikaci Excel
Kroky k převést číslo sloupce na písmeno v aplikaci Excel pomocí VBA jsou uvedeny níže.
Využijeme Funkce definovaná uživatelem (UDF) k převodu čísla.
Kroky:
- Tisk Alt + F11 na klávesnici nebo přejděte na kartu Vývojář -> Visual Basic otevřít Editor jazyka Visual Basic .
- Ve vyskakovacím okně kódu klikněte na panelu nabídek na možnost Insert -> Modul .
- Zkopírujte následující kód a vložte jej do okna kódu.
Public Function NumToLetter(ColNum) NumToLetter = Split(Cells(1, ColNum).Address, "$")(1) End Function
Toto není dílčí postup pro VBA spustit program, čímž se vytvoří Funkce definovaná uživatelem (UDF) . Takže po napsání kódu, místo kliknutí na tlačítko Spustit na panelu nabídek klikněte na Uložit .
- Nyní se vraťte na pracovní list, který vás zajímá, a napište funkci, kterou jste právě vytvořili, pomocí příkazu VBA kód (Funkce NumToLetter v prvním řádku kódu) a v závorkách kódu NumToLetter předejte funkci referenční číslo buňky které chcete převést na písmeno (v našem případě předáme Buňka B5 uvnitř závorek).
Náš konečný vzorec se tedy týká,
=NumToLetter(B5)
- Tisk Vstupte na .
Získáte přidruženou dopisní adresu ( A ) čísla sloupce ( 1 ) ve vašem souboru dat.
- Nyní přetáhněte řádek dolů o Plnicí rukojeť použít UDF do ostatních buněk, aby je převedl na písmena.
Další informace: Excel VBA: Počítání sloupců s daty (2 příklady)
3. Vestavěná možnost aplikace Excel změnit číslo sloupce na písmeno
Aplikace Excel má vestavěná možnost změnit číslo sloupce (na obrázku níže) na písmeno.
Kroky:
- Klikněte na kartu Soubor -> Možnosti .
- Ve vyskakovacím okně aplikace Excel vyberte Vzorce -> zrušte zaškrtnutí . Referenční styl R1C1 box -> OK .
Sloupce nyní budou mít místo čísel písmenné adresy.
Další informace: Jak spočítat sloupce pro VLOOKUP v aplikaci Excel (2 metody)
Závěr
Tento článek vám ukázal, jak převést číslo sloupce na písmeno v aplikaci Excel třemi různými způsoby. Doufám, že pro vás byl tento článek velmi přínosný. Pokud máte k tématu nějaké dotazy, neváhejte se zeptat.