Přejít k hlavnímu obsahu

Jak číslovat buňky abecedními písmeny v aplikaci Excel?

V aplikaci Excel můžeme číslovat buňky pomocí číselných řad, jako jsou 1, 2, 3… pomocí úchytu automatického vyplňování, ale jak můžete číslovat buňky abecedními písmeny A, B, C…? V tomto kurzu představím některé způsoby, jak zvládnout tuto práci v Excelu.

Číslování buněk abecedním písmenem se vzorcem

Číslování buněk abecedním písmenem s kódem VBA

Číslování buněk pomocí aplikace Kutools pro Exceldobrý nápad3


Vložte více odrážek nebo číslování do běhuge

V aplikaci Excel musíte vložit odrážky nebo číslování jeden po druhém, ale s tímto praktickým nástrojem Kutools pro Excel's Vložte odrážku a Vložte Nmbering nástroje, můžete rychle vložit odrážky nebo číslování
najednou do vybraných buněk.  Klikněte na 60denní zkušební verzi zdarma!
doc vložte číslování odrážek
 
Kutools pro Excel: s více než 200 praktickými doplňky Excel, můžete vyzkoušet bez omezení za 60 dní.

Číslování buněk abecedním písmenem se vzorcem

1. Zadejte všechna písmena, která chcete použít k číslování buňky, do seznamu vedle buněk, které chcete číslovat.
číslování dokumentů s písmenem 1

Pokud máte Kutools pro Excelse Vyplňte vlastní seznamy obslužný program podporuje vytváření seznamu z rozsahu, pak můžete nový seznam vložit kdekoli, kam potřebujete, aniž byste je po jednom přepisovali.  Klikněte na 60denní zkušební verzi zdarma!
číslování dokumentů s písmenem 2

2. Vyberte buňku sousedící s písmeny a obsahem buňky, které chcete číslovat, zadejte tento vzorec = A1 & "." & B1, přetáhněte úchyt výplně dolů a vyplňte vzorec do všech buněk, které potřebujete.
číslování dokumentů s písmenem 3


Číslování buněk abecedním písmenem s kódem VBA

Pokud znáte makro kódy, můžete to udělat takto:

1. lis Alt + F11 klíče k povolení Microsoft Visual Basic pro aplikace okno. Klikněte na tlačítko Vložit > Modul.

2. Zkopírujte a vložte níže uvedený kód do Modul skripty.

VBA: číslování pomocí A.

Sub Prefix_A()
'UpdatebyExtendoffice20180828
Dim xRg As Range
Dim xStrPrefix As String
xStrPrefix = "A."
On Error Resume Next
Application.ScreenUpdating = False
For Each xRg In Selection
    If xRg.Value <> "" Then
        xRg.Value = xStrPrefix & xRg.Value
    End If
Next
Application.ScreenUpdating = True
End Sub

3. Poté opakujte vložení kódu a změňte A na B nebo C nebo D podle potřeby.
číslování dokumentů s písmenem 4

4. Uložte kód a zavřete Microsoft Visual Basic pro aplikace okno.

5. Vyberte buňky, které chcete číslovat pomocí A, a klepněte na Vývojka > makra.
číslování dokumentů s písmenem 5

6. V Makro v dialogovém okně vyberte kód Předpona_A a klepněte na tlačítko Běh.
číslování dokumentů s písmenem 6

7. Výběr byl očíslován písmenem A.
číslování dokumentů s písmenem 7

8. Opakujte kroky 5 a 6 a podle potřeby očíslovejte buňky konkrétním písmenem.


Číslování buněk pomocí programu Kutools pro Excel

Pokud máte Kutools pro Excel, můžete rychle číslovat buňky.

Kutools pro Excel, s více než 200 užitečné funkce, které vám usnadní práci. 

Po instalaci Kutools pro Excel, prosím, postupujte takto:(Zdarma ke stažení Kutools pro Excel nyní!)

Vyberte buňky, které chcete číslovat, a klikněte na Kutools > Vložit > Vložit číslování, vyberte jeden typ, který potřebujete.
číslování dokumentů s písmenem 8

Poté byly buňky přidány číslování.
číslování dokumentů s písmenem 9

Procházení a úpravy více sešitů aplikace Excel / dokumentů aplikace Word jako záložek v prohlížeči Firefox, Chrome, Internet Prozkoumejte 10!

Možná znáte prohlížení více webových stránek ve Firefoxu / Chrome / IE a přepínáte mezi nimi snadným kliknutím na příslušné karty. Zde karta Office podporuje podobné zpracování, které vám umožní procházet více sešitů aplikace Excel nebo dokumentů aplikace Word v jednom okně aplikace Excel nebo v okně aplikace Word a snadno mezi nimi přepínat kliknutím na jejich karty. Klikněte zdarma 30-denní zkušební verze Office Tab!

ne excel

Nejlepší nástroje pro produktivitu v kanceláři

🤖 Kutools AI asistent: Revoluční analýza dat založená na: Inteligentní provedení   |  Generovat kód  |  Vytvořte vlastní vzorce  |  Analyzujte data a generujte grafy  |  Vyvolejte funkce Kutools...
Populární funkce: Najít, zvýraznit nebo identifikovat duplikáty   |  Odstranit prázdné řádky   |  Kombinujte sloupce nebo buňky bez ztráty dat   |   Kolo bez vzorce ...
Super vyhledávání: Více kritérií VLookup    VLookup s více hodnotami  |   VLookup na více listech   |   Fuzzy vyhledávání ....
Pokročilý rozevírací seznam: Rychle vytvořte rozevírací seznam   |  Závislý rozbalovací seznam   |  Vícenásobný výběr rozevíracího seznamu ....
Správce sloupců: Přidejte konkrétní počet sloupců  |  Přesunout sloupce  |  Přepnout stav viditelnosti skrytých sloupců  |  Porovnejte rozsahy a sloupce ...
Doporučené funkce: Zaměření mřížky   |  Návrhové zobrazení   |   Velký Formula Bar    Správce sešitů a listů   |  Knihovna zdrojů (Automatický text)   |  Výběr data   |  Zkombinujte pracovní listy   |  Šifrovat/dešifrovat buňky    Odesílat e-maily podle seznamu   |  Super filtr   |   Speciální filtr (filtr tučné/kurzíva/přeškrtnuté...) ...
Top 15 sad nástrojů12 Text Tools (doplnit text, Odebrat znaky, ...)   |   50+ Graf Typ nemovitosti (Ganttův diagram, ...)   |   40+ Praktické Vzorce (Vypočítejte věk na základě narozenin, ...)   |   19 Vložení Tools (Vložte QR kód, Vložit obrázek z cesty, ...)   |   12 Konverze Tools (Čísla na slova, Přepočet měny, ...)   |   7 Sloučit a rozdělit Tools (Pokročilé kombinování řádků, Rozdělit buňky, ...)   |   ... a více

Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času.  Kliknutím sem získáte funkci, kterou nejvíce potřebujete...

Popis


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!
Comments (1)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Sub Alphabetic_Numbering()
Dim InputRng As Range, Start As Integer, Cell As Range, Start1 As Integer, Rowsx As Integer, Double_Start As Integer
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range", xTitleId, InputRng.Address, Type:=8)

Start = 65
Rowsx = InputRng.Rows.Count


For i = 1 To Rowsx
If i < 27 Then
InputRng.Cells(i, 1).Value = Chr(Start) & ". " & InputRng.Cells(i, 1).Value
Start = Start + 1
End If

roundupUnitcount = Application.WorksheetFunction.RoundUp(i / 26, 0) - 1
If Start > 90 Then
Start = Start - 26
End If
Double_Start = 64 + roundupUnitcount
If i > 26 Then
InputRng.Cells(i, 1).Value = Chr(Double_Start) & Chr(Start) & ". " & InputRng.Cells(i, 1).Value
InputRng.Cells(i, 2).Value = Start
Start = Start + 1
End If
Next i
End Sub
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations