Salt la conținutul principal

Cum se numerotează celulele cu litere alfabetice în Excel?

În Excel, putem numerota celulele cu serii de numere, cum ar fi 1, 2, 3 ... folosind mânerul de completare automată, dar cum puteți numerota celulele cu litere alfabetice A, B, C ...? În acest tutorial, introduc câteva modalități de a gestiona această lucrare în Excel.

Numerotarea celulelor cu literă alfabetică cu formulă

Numerotarea celulelor cu literă alfabetică cu cod VBA

Numerotarea celulelor cu cu Kutools pentru Excelidee bună3


Introduceți mai multe gloanțe sau numerotări într-o alergarege

În Excel, trebuie să introduceți gloanțele sau numerotarea unul câte unul, dar cu acest instrument la îndemână, Kutools pentru Excel's Introduceți Bullet și Introduceți Nmbering utilitare, puteți introduce rapid gloanțe sau numerotare
la celulele selectate simultan ..  Faceți clic pentru o perioadă de încercare gratuită de 60 de zile!
doc inserare numerotare glonț
 
Kutools pentru Excel: cu peste 200 de programe de completare la îndemână Excel, gratuit pentru a încerca fără limitări în 60 de zile.

Numerotarea celulelor cu literă alfabetică cu formulă

1. Tastați toate literele pe care doriți să le utilizați pentru numerotarea celulei într-o listă de lângă celulele pe care doriți să le numerotați.
numerotarea doc cu litera 1

Dacă aveţi Kutools pentru Excel, Completați liste personalizate utilitarul vă ajută să creați o listă dintr-un interval, apoi puteți insera noua listă oriunde doriți, fără a le retipa unul câte unul.  Faceți clic pentru o perioadă de încercare gratuită de 60 de zile!
numerotarea doc cu litera 2

2. Selectați o celulă adiacentă literelor și conținutului celulei pe care doriți să o numerotați, tastați această formulă = A1 & "." & B1, glisați mânerul de umplere în jos pentru a completa formula în toate celulele de care aveți nevoie.
numerotarea doc cu litera 3


Numerotarea celulelor cu literă alfabetică cu cod VBA

Dacă sunteți familiarizat cu codurile macro, puteți face următoarele:

1. presa Alt + F11 taste pentru activare Microsoft Visual Basic pentru aplicații fereastră. Clic Insera > Module.

2. Copiați și lipiți codul de mai jos în Module script-ul.

VBA: numerotare cu 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. Apoi repetați lipiți codul și schimbați A în B sau C sau D după cum aveți nevoie.
numerotarea doc cu litera 4

4. Salvați codul și închideți Microsoft Visual Basic pentru aplicații fereastră.

5. Selectați celulele pe care doriți să le numerotați cu A și faceți clic pe Dezvoltator > Macrocomenzi.
numerotarea doc cu litera 5

6. În Macro , selectați codul Prefixul_A și faceți clic Alerga.
numerotarea doc cu litera 6

7. Selecția a fost numerotată cu A.
numerotarea doc cu litera 7

8. Repetați pașii 5 și 6 pentru numerotarea celulelor cu litere specifice după cum aveți nevoie.


Numerotarea celulelor cu Kutools pentru Excel

Dacă aveți Kutools pentru Excel, puteți numerota rapid celulele.

Kutools pentru Excel, cu mai mult de 200 funcții la îndemână, vă ușurează lucrările. 

După instalare Kutools pentru Excel, faceți următoarele:(Descărcați gratuit Kutools pentru Excel acum!)

Selectați celulele pe care doriți să le numerotați, apoi faceți clic pe Kutools > Insera > Inserați numerotarea, selectați un tip de care aveți nevoie.
numerotarea doc cu litera 8

Apoi, celulele au fost adăugate numerotând.
numerotarea doc cu litera 9

Navigarea cu file și editarea mai multor registre de lucru Excel / documente Word ca Firefox, Chrome, Internet Explore 10!

Este posibil să fiți familiarizați să vizualizați mai multe pagini web în Firefox / Chrome / IE și să comutați între ele făcând clic pe filele corespunzătoare. Aici, fila Office acceptă procesări similare, care vă permit să răsfoiți mai multe cărți de lucru Excel sau documente Word într-o fereastră Excel sau fereastră Word și să comutați cu ușurință între ele făcând clic pe filele lor. Click gratuit 30-o zi de probă a Office Tab!

nu excelează

Cele mai bune instrumente de productivitate de birou

🤖 Kutools AI Aide: Revoluționați analiza datelor pe baza: Execuție inteligentă   |  Generați codul  |  Creați formule personalizate  |  Analizați datele și generați diagrame  |  Invocați funcțiile Kutools...
Caracteristici populare: Găsiți, evidențiați sau identificați duplicatele   |  Ștergeți rândurile goale   |  Combinați coloane sau celule fără a pierde date   |   Rundă fără Formula ...
Super căutare: VLookup cu mai multe criterii    VLookup cu valori multiple  |   VLookup pe mai multe foi   |   Căutare fuzzy ....
Listă derulantă avansată: Creați rapid o listă derulantă   |  Listă drop-down dependentă   |  Listă derulantă cu selectare multiplă ....
Manager de coloane: Adăugați un număr specific de coloane  |  Mutați coloanele  |  Comutați starea vizibilității coloanelor ascunse  |  Comparați intervale și coloane ...
Caracteristici prezentate: Focus pe grilă   |  Vedere de proiectare   |   Big Formula Bar    Manager registru de lucru și foi   |  Biblioteca de resurse (Text automat)   |  Data Picker   |  Combinați foi de lucru   |  Criptare/Decriptare celule    Trimiteți e-mailuri după listă   |  Super Filtru   |   Filtru special (filtrează bold/italic/barat...) ...
Top 15 seturi de instrumente12 Text Instrumente (Adăuga text, Eliminați caractere,...)   |   50+ Diagramă Tipuri de (Gantt Chart,...)   |   40+ Practic Formule (Calculați vârsta pe baza zilei de naștere,...)   |   19 inserare Instrumente (Introduceți codul QR, Inserați imaginea din cale,...)   |   12 Convertire Instrumente (Numere la cuvinte, conversie valutara,...)   |   7 Merge & Split Instrumente (Rânduri combinate avansate, Celule divizate,...)   |   ... și altele

Îmbunătățiți-vă abilitățile Excel cu Kutools pentru Excel și experimentați eficiența ca niciodată. Kutools pentru Excel oferă peste 300 de funcții avansate pentru a crește productivitatea și a economisi timp.  Faceți clic aici pentru a obține funcția de care aveți cea mai mare nevoie...

Descriere


Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară

  • Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
  • Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ​​ferestrele noi.
  • Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!
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