Hoppa till huvudinnehåll

Hur numrerar man cellerna med alfabetiska bokstäver i Excel?

I Excel kan vi numrera cellerna med nummerserier som 1, 2, 3 ... med hjälp av autofyllhandtaget, men hur kan du numrera celler med alfabetiska bokstäver A, B, C ...? I denna handledning introducerar jag några sätt att hantera detta jobb i Excel.

Nummerering av celler med alfabetisk bokstav med formel

Nummerering av celler med alfabetisk bokstav med VBA-kod

Numrerar celler med med Kutools för Excelbra idé3


Infoga flera kulor eller numreringar i en löpningge

I Excel måste du infoga kulorna eller numreringen en efter en, men med det här praktiska verktyget, Kutools för Excel's Sätt in kula och Sätt i Nmbering verktyg kan du snabbt infoga kulor eller numrering
till de valda cellerna på en gång ..  Klicka i 60 dagars gratis provperiod!
doc infoga punktnumrering
 
Kutools för Excel: med mer än 200 praktiska Excel-tillägg, gratis att prova utan begränsning på 60 dagar.

Nummerering av celler med alfabetisk bokstav med formel

1. Skriv in alla bokstäver som du vill använda för numreringscellen i en lista bredvid cellerna du vill numrera.
doc-numrering med bokstav 1

Om du har Kutools för Excel, den Fyll i anpassade listor verktyget stöder dig att skapa en lista från ett intervall, sedan kan du infoga den nya listan var som helst du behöver utan att skriva in dem en efter en.  Klicka i 60 dagars gratis provperiod!
doc-numrering med bokstav 2

2. Välj en cell som gränsar till bokstäverna och cellinnehållet du vill numrera, skriv denna formel = A1 & "." & B1, dra fyllningshandtaget ner för att fylla formeln till alla celler du behöver.
doc-numrering med bokstav 3


Nummerering av celler med alfabetisk bokstav med VBA-kod

Om du känner till makrokoder kan du göra så här:

1. Tryck Alt + F11 för att aktivera Microsoft Visual Basic för applikationer fönster. Klick Insert > Modulerna.

2. Kopiera och klistra in koden nedan till Modulerna skript.

VBA: numrering med 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. Upprepa sedan koden och ändra A till B eller C eller D efter behov.
doc-numrering med bokstav 4

4. Spara koden och stäng Microsoft Visual Basic för applikationer fönster.

5. Markera de celler som du vill numrera med A och klicka på Utvecklare > Makron.
doc-numrering med bokstav 5

6. i Makro välj koden Prefix_A och klicka Körning.
doc-numrering med bokstav 6

7. Urvalet har numrerats med A.
doc-numrering med bokstav 7

8. Upprepa steg 5 och 6 för att numrera cellerna med den specifika bokstaven som du behöver.


Numrerar celler med Kutools för Excel

Om du har Kutools för Excel kan du snabbt numrera celler.

Kutools för Excel, med mer än 200 praktiska funktioner, underlättar dina jobb. 

När du har installerat Kutools för Excel, gör så här:(Gratis nedladdning Kutools för Excel nu!)

Markera cellerna du vill numrera och klicka sedan på Kutools > Insert > Infoga numrering, välj en typ du behöver.
doc-numrering med bokstav 8

Sedan har cellerna lagts till numrering.
doc-numrering med bokstav 9

Tabbad surfning och redigering av flera Excel-arbetsböcker / Word-dokument som Firefox, Chrome, Internet Explore 10!

Du kanske är bekant att visa flera webbsidor i Firefox / Chrome / IE och växla mellan dem genom att enkelt klicka på motsvarande flikar. Här stöder Office Tab liknande bearbetning, som låter dig bläddra i flera Excel-arbetsböcker eller Word-dokument i ett Excel-fönster eller Word-fönster och enkelt växla mellan dem genom att klicka på deras flikar. Klicka gratis 30-dagars provversion av Office Tab!

eller excel

Bästa kontorsproduktivitetsverktyg

🤖 Kutools AI Aide: Revolutionera dataanalys baserat på: Intelligent utförande   |  Generera kod  |  Skapa anpassade formler  |  Analysera data och generera diagram  |  Anropa Kutools funktioner.
Populära funktioner: Hitta, markera eller identifiera dubbletter   |  Ta bort tomma rader   |  Kombinera kolumner eller celler utan att förlora data   |   Rund utan formel ...
Superuppslag: Flera kriterier VLookup    VLookup med flera värden  |   VSök över flera ark   |   Fuzzy Lookup ....
Avancerad rullgardinslista: Skapa snabbt en rullgardinslista   |  Beroende rullgardinslista   |  Flervals-rullgardinslista ....
Kolumnhanterare: Lägg till ett specifikt antal kolumner  |  Flytta kolumner  |  Växla synlighetsstatus för dolda kolumner  |  Jämför intervall och kolumner ...
Utvalda funktioner: Rutnätsfokus   |  Designvy   |   Stor formelbar    Arbetsbok & Bladhanterare   |  Resursbibliotek (Automatisk text)   |  Datumväljare   |  Kombinera arbetsblad   |  Kryptera/Dekryptera celler    Skicka e-postmeddelanden efter lista   |  Superfilter   |   Specialfilter (filtrera fet/kursiv/genomstruken...) ...
Topp 15 verktygssatser12 text verktyg (lägga till text, Ta bort tecken, ...)   |   50+ Diagram Typer (Gantt Chart, ...)   |   40+ Praktiskt Formler (Beräkna ålder baserat på födelsedag, ...)   |   19 Införande verktyg (Infoga QR-kod, Infoga bild från sökväg, ...)   |   12 Konvertering verktyg (Siffror till ord, Valutaväxling, ...)   |   7 Slå ihop och dela verktyg (Avancerade kombinera rader, Dela celler, ...)   |   ... och mer

Uppgradera dina Excel-färdigheter med Kutools för Excel och upplev effektivitet som aldrig förr. Kutools för Excel erbjuder över 300 avancerade funktioner för att öka produktiviteten och spara tid.  Klicka här för att få den funktion du behöver mest...

Beskrivning


Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare

  • Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
  • Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
  • Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!
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