Gå til hovedindhold

Hvordan nummereres cellerne med alfabetiske bogstaver i Excel?

I Excel kan vi nummerere cellerne med nummerserier som 1, 2, 3 ... ved hjælp af autofyldhåndtaget, men hvordan kan du nummerere celler med alfabetiske bogstaver A, B, C ...? I denne vejledning introducerer jeg nogle måder at håndtere dette job på i Excel.

Nummerering af celler med alfabetisk bogstav med formel

Nummerering af celler med alfabetisk bogstav med VBA-kode

Nummerering af celler med med Kutools til Excelgod idé3


Indsæt flere kugler eller nummereringer i en løbge

I Excel skal du indsætte kuglerne eller nummereringen en efter en, men med dette praktiske værktøj Kutools til Excel's Indsæt kugle , Indsæt Nmbering hjælpeprogrammer, kan du hurtigt indsætte kugler eller nummerering
til de valgte celler på én gang ..  Klik i 60 dages gratis prøveperiode!
doc indsæt punktnummerering
 
Kutools til Excel: med mere end 200 praktiske Excel-tilføjelsesprogrammer, gratis at prøve uden begrænsning på 60 dage.

Nummerering af celler med alfabetisk bogstav med formel

1. Skriv alle de bogstaver, du vil bruge til nummereringscelle, på en liste ud for de celler, du vil nummerere.
doc nummerering med bogstav 1

Hvis du har Kutools til Excel, Udfyld tilpassede lister hjælpeprogram understøtter dig til at oprette en liste fra et interval, så kan du indsætte den nye liste hvor som helst du har brug for uden at indtaste dem en efter en.  Klik i 60 dages gratis prøveperiode!
doc nummerering med bogstav 2

2. Vælg en celle, der støder op til de bogstaver og celleindhold, du vil nummerere, skriv denne formel = A1 & "." & B1, træk fyldhåndtaget ned for at udfylde formlen til alle celler, du har brug for.
doc nummerering med bogstav 3


Nummerering af celler med alfabetisk bogstav med VBA-kode

Hvis du er fortrolig med makrokoder, kan du gøre som disse:

1. Trykke Alt + F11 taster for at aktivere Microsoft Visual Basic til applikationer vindue. Klik indsatte > Moduler.

2. Kopier og indsæt nedenstående kode til Moduler scripts.

VBA: nummerering 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. Gentag derefter indsæt koden, og skift A til B eller C eller D efter behov.
doc nummerering med bogstav 4

4. Gem koden, og luk Microsoft Visual Basic til applikationer vindue.

5. Vælg de celler, du vil nummerere med A, og klik på Udvikler > Makroer.
doc nummerering med bogstav 5

6. i Makro dialog, skal du vælge koden Præfiks_A og klik Kør.
doc nummerering med bogstav 6

7. Valg er nummereret med A.
doc nummerering med bogstav 7

8. Gentag trin 5 og 6 for at nummerere cellerne med det specifikke bogstav, som du har brug for.


Nummerering af celler med Kutools til Excel

Hvis du har Kutools til Excel, kan du hurtigt nummerere celler.

Kutools til Excel, med mere end 200 praktiske funktioner, der gør dine job lettere. 

Efter installation Kutools til Excel, gør venligst som nedenfor:(Gratis download Kutools til Excel nu!)

Vælg de celler, du vil nummerere, og klik derefter på Kutools > indsatte > Indsæt nummerering, vælg den type, du har brug for.
doc nummerering med bogstav 8

Derefter er cellerne tilføjet nummerering.
doc nummerering med bogstav 9

Tabberet browsing og redigering af flere Excel-projektmapper / Word-dokumenter som Firefox, Chrome, Internet Explore 10!

Du er måske bekendt med at se flere websider i Firefox / Chrome / IE og skifte mellem dem ved let at klikke på tilsvarende faner. Her understøtter Office-fanen lignende behandling, som giver dig mulighed for at gennemse flere Excel-projektmapper eller Word-dokumenter i et Excel-vindue eller Word-vindue og nemt skifte mellem dem ved at klikke på deres faner. Klik gratis 30-dages prøveversion af Office Tab!

ikke udmærke sig

Bedste kontorproduktivitetsværktøjer

🤖 Kutools AI Aide: Revolutionér dataanalyse baseret på: Intelligent udførelse   |  Generer kode  |  Opret brugerdefinerede formler  |  Analyser data og generer diagrammer  |  Aktiver Kutools funktioner...
Populære funktioner: Find, fremhæv eller identificer dubletter   |  Slet tomme rækker   |  Kombiner kolonner eller celler uden at miste data   |   Runde uden formel ...
Super opslag: VLookup med flere kriterier    Multiple Value VLookup  |   VOpslag på tværs af flere ark   |   Fuzzy Lookup ....
Avanceret rulleliste: Opret hurtigt rulleliste   |  Afhængig rulleliste   |  Multivælg rulleliste ....
Column Manager: Tilføj et bestemt antal kolonner  |  Flyt kolonner  |  Skift synlighedsstatus for skjulte kolonner  |  Sammenlign områder og kolonner ...
Fremhævede funktioner: Grid fokus   |  Designvisning   |   Stor Formel Bar    Arbejdsbog & Ark Manager   |  Ressourcebibliotek (Autotekst)   |  Datovælger   |  Kombiner regneark   |  Krypter/Dekrypter celler    Send e-mails efter liste   |  Superfilter   |   Specielt filter (filter fed/kursiv/gennemstreget...) ...
Top 15 værktøjssæt12 tekst Værktøjer (tilføje tekst, Fjern tegn, ...)   |   50 + Chart Typer (Gantt kort, ...)   |   40+ Praktisk formler (Beregn alder baseret på fødselsdag, ...)   |   19 Indsættelse Værktøjer (Indsæt QR-kode, Indsæt billede fra sti, ...)   |   12 Konvertering Værktøjer (Tal til ord, Valutaomregning, ...)   |   7 Flet og del Værktøjer (Avancerede kombinere rækker, Opdel celler, ...)   |   ... og mere

Overlad dine Excel-færdigheder med Kutools til Excel, og oplev effektivitet som aldrig før. Kutools til Excel tilbyder over 300 avancerede funktioner for at øge produktiviteten og spare tid.  Klik her for at få den funktion, du har mest brug for...

Beskrivelse


Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere

  • Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
  • Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
  • Øger din produktivitet med 50 % og reducerer hundredvis af museklik for dig hver 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