Note: The other languages of the website are Google-translated. Back to English

Hur ökar jag bokstaven automatiskt med en för att få nästa bokstav i Excel?

Om du antar att du har en cell som innehåller bokstaven AB, måste du öka den sista bokstaven med en för att få nästa bokstav AC, AD ... och så vidare. Eller så har du en bokstav A och vill öka bokstaven till B, C ... för att skapa en bokstavslista. Hur uppnår man det? Den här artikeln kan hjälpa dig i detaljer.

Öka bokstaven AB med en för att få AC, AD ... med formel
Öka bokstaven med en för att få bokstavslistan med formel
Öka bokstaven med en för att få bokstavslistan med användardefinierad funktion


Öka bokstaven AB med en för att få AC, AD ... med formel

Gör så här för att öka bokstaven med en i Excel.

1. Välj en tom cell under den angivna bokstaven, ange nedanstående formel i den och tryck sedan på ange nyckel. 

=IF(RIGHT($A2,1)="Z", CHAR(CODE(LEFT(A2,1))+1),LEFT(A2,1))&CHAR(65+MOD(CODE(RIGHT(A2,1))+1-65,26))

Anmärkningar: I formeln är A2 cellen innehåller den angivna bokstaven.

2. Fortsätt att välja A3, dra ner Fill Handle för att få listan över bokstäver du behöver.


Öka bokstaven A med en för att få bokstavslistan med formel

Du kan använda = CHAR (KOD (A1) +1) formel för att öka bokstaven med en i Excel. Gör så här.

1. Välj en tom cell under den angivna bokstaven, ange formel = CHAR (KOD (A2) +1) in i formelfältet och tryck sedan på ange nyckel. Se skärmdump:

2. Välj resultatcellen, dra ner Fyllningshandtaget för att få bokstaven du behöver.

Anmärkningar: Med denna formel, efter att ha fått bokstaven Z, kommer du att få några specialtecken enligt nedanstående skärmdump om du fortsätter att dra ner Fill Handle. Om du vill få bokstaven AA efter Z kan följande användardefinierade funktion hjälpa dig.


Öka bokstaven med en för att få bokstavslistan med användardefinierad funktion

Följande användardefinierade funktion kan också hjälpa dig att öka bokstaven med en i Excel.

1. Tryck andra + F11 samtidigt för att öppna Microsoft Visual Basic för applikationer fönster.

2. I Microsoft Visual Basic för applikationer fönstret klickar Insert > Modulerna. Kopiera sedan och klistra in nedanstående VBA-kod i Modulerna fönster.

VBA-kod: Öka bokstaven med en för att få bokstavslistan

Function ColLtrs(i As Long) As String
    ColLtrs = Replace(Cells(1, i).Address(False, False), "1", "")
End Function

3. Tryck andra + Q för att stänga Microsoft Visual Basic för applikationer fönster.

4. Välj en tom cell under den angivna bokstaven, ange formel = ColLtrs (ROW ()), och tryck sedan på ange för att få andra bokstaven.

2. Välj resultatcellen, dra ner Fyllningshandtaget för att få bokstaven du behöver.

Anmärkningar: Med den här metoden baseras bokstäverna du ökat på radnumret. Du måste starta den första bokstaven A i den första raden i kalkylbladet, annars blir ordningen orolig.


De bästa Office-produktivitetsverktygen

Kutools för Excel löser de flesta av dina problem och ökar din produktivitet med 80%

  • återanvändning: Sätt snabbt i komplexa formler, diagram och allt som du har använt tidigare; Kryptera celler med lösenord; Skapa e-postlista och skicka e-post ...
  • Super Formula Bar (enkelt redigera flera rader med text och formel); Läslayout (enkelt läsa och redigera ett stort antal celler); Klistra in i filtrerat intervall...
  • Sammanfoga celler / rader / kolumner utan att förlora data; Delat cellinnehåll; Kombinera duplicerade rader / kolumner... Förhindra duplicerade celler; Jämför intervall...
  • Välj Duplicera eller Unikt Rader; Välj tomma rader (alla celler är tomma); Super Find och Fuzzy Find i många arbetsböcker; Slumpmässigt val ...
  • Exakt kopia Flera celler utan att ändra formelreferens; Skapa referenser automatiskt till flera ark; Sätt in kulor, Kryssrutor och mer ...
  • Extrahera text, Lägg till text, ta bort efter position, Ta bort mellanslag; Skapa och skriva ut personsökningstalsatser; Konvertera mellan celler innehåll och kommentarer...
  • Superfilter (spara och tillämpa filterscheman på andra ark); Avancerad sortering efter månad / vecka / dag, frekvens och mer; Specialfilter av fet, kursiv ...
  • Kombinera arbetsböcker och arbetsblad; Sammanfoga tabeller baserat på nyckelkolumner; Dela data i flera ark; Batchkonvertera xls, xlsx och PDF...
  • Mer än 300 kraftfulla funktioner. Stöder Office / Excel 2007-2021 och 365. Stöder alla språk. Enkel implementering i ditt företag eller organisation. Fullständiga funktioner 30 dagars gratis provperiod. 60 dagars pengarna tillbaka-garanti.
kte-flik 201905

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!
officetab botten
Sortera kommentarer efter
Kommentarer (19)
Inga betyg än. Bli först med att betygsätta!
Denna kommentar minimerades av moderatoren på webbplatsen
tack för ovanstående. Men vad händer om du vill öka från 400_A till 400_B? Jag försökte några saker men jag kan bara få det att fungera med siffror.
Tack
Denna kommentar minimerades av moderatoren på webbplatsen
Hittade svaret. Tack.
=VÄNSTER(B1,4)&"_"&CHAR(KOD(HÖGER(B1,1))+1)
Denna kommentar minimerades av moderatoren på webbplatsen
formeln =ColLtrs(ROW()) fungerar utmärkt i en excel-cell, jag måste använda samma inuti en VBA för att ge mig resultat från A till Ö sedan AA till AZ och så vidare. Om jag använder CHAR i VBA har det en begränsning att bara gå till Z.
Denna kommentar minimerades av moderatoren på webbplatsen
Hej,
Vill du inte fortsätta använda VBA-koden? Ovanstående VBA-kod kan skapa bokstäver från A till Ö sedan AA till AZ och så vidare för att möta dina behov.
Denna kommentar minimerades av moderatoren på webbplatsen
Dear Sir
När jag kör funktionen =ColLtrs(ROW()) i ett excelark får jag perfekta resultat, men om jag vill anropa denna funktion eller cellvärdet i VBA så är det möjligt. Så min variabel kan vara i med värdena 1,2,3,4,....27,28, etc och resultatet bör vara A,B,C,D....,AA,AB och så vidare. Är det möjligt?
Tack
Denna kommentar minimerades av moderatoren på webbplatsen
Hej,
Vänligen välj nummercellerna och kör koden nedan för att lösa problemet.

Sub NumTOAZ()
Dim xRg As Range
Dim xStr As String
On Error Resume Next
För varje xRg i urval
xStr = Replace(Cells(1, xRg.Value).Address(False, False), "1", "")
xRg.Value = xStr
Nästa
End Sub
Denna kommentar minimerades av moderatoren på webbplatsen
Excel var kalkylarket som ersatte Lotus 1-2-3, och efter att ha funnits så länge skulle man kunna tro att genier på Microsoft skulle ha skapat ett enklare sätt att hämta ett cells kolumnnummer, utan att behöva skriva en egen funktion. Tillbaka 2001, 2002 när jag programmerade i VBA fanns det bara 65536 rader i ett Excel-kalkylblad, nu har antalet ökat till löjliga 1.4 miljoner rader. Det är inte hur stor databasen är som räknas, utan hur intelligent du hanterar data på din hårddisk när du får åtkomst till dessa data via Excel.

Om det inte gör dig upprörd, så borde Bankers Rounding-schemat som används av Excel avsluta jobbet! Vi lärde oss matematik i skolan, grundläggande avrundning, kom för att ta reda på det, Bankers "gille" vill bestämma hur kontantbelopp avrundas för att bättre tillgodose deras fördelar. Till exempel är 1.5 antingen närmare 1 eller 2, men avrundas uppåt till 2, vilket är det jämna talet. 0.5 är antingen närmare 0 eller 1, men eftersom det är det udda talet rundar de ner det till 0. Hela systemet är korrupt och de skapar affärsmjukvaran som används av amerikanska företag.



Jag läste en kommentar under den jag vänder mig till, och någon sa i princip, "Jag har många bankirvänner, och de har aldrig hört talas om Bankers Rounding; De säger att de använde en metod som heter "5 Step Rounding" i EU. Så betyder det att Bankers Rounding endast används i sabotage av den amerikanska ekonomin, men inte tillräckligt bra för att förstöra den europeiska ekonomin som försöker ta över världen?! Dessa pengaväxlare slutar aldrig att förvåna mig över hur långt de kommer att gå i sin arrogans!
Denna kommentar minimerades av moderatoren på webbplatsen
Allt människan gör är korrupt. Allt.
Denna kommentar minimerades av moderatoren på webbplatsen
Finns det något sätt att göra detta för hela ord? Där varje bokstav i ordet flyttas upp med X antal tecken
Denna kommentar minimerades av moderatoren på webbplatsen
Denna kod låter dig gå från A till ZZ.

=IF(B2="Z","AA",IF(LEN(B2)=1,CHAR(CODE(B2)+1),IF(RIGHT(B2,1)="Z",CHAR(CODE(LEFT(B2,1))+1),LEFT(B2,1))&CHAR(65+MOD(CODE(RIGHT(B2,1))+1-65,26))))
Denna kommentar minimerades av moderatoren på webbplatsen
Tack Zac för bokstavssekvensformeln, räddade mig massor av arbete
Denna kommentar minimerades av moderatoren på webbplatsen
Hur får jag det att börja om vid A när Z används?
Denna kommentar minimerades av moderatoren på webbplatsen
Jag behöver en kod från AZ, AA-ZZ, AAA till ZZZ, AAAA till ZZZZ
Denna kommentar minimerades av moderatoren på webbplatsen
Hej, jag kan tyvärr inte hjälpa till med detta problem. Du kan lägga upp problemet på forumet nedan för att få hjälp av andra Excel-entusiaster.
https://www.extendoffice.com/forum/kutools-for-excel.html 
Denna kommentar minimerades av moderatoren på webbplatsen
Jag behöver en kod för att öka mina radcellvärden från AA-01-A01, AA-01-A02 till AA-01-B01, AA-01-B02. Och jag behöver också en kod för mina kolumncellvärden från AA-01-A01, AA-01-A02 till AA-03-A01, A-03-A02. Hjälp.
Denna kommentar minimerades av moderatoren på webbplatsen
Hur skulle jag skapa en formel som utvecklas så här?:

AAAAAAAAA
AAAAAAAAB
AAAAAAAAC
AAAAAAAAD
och så vidare
Denna kommentar minimerades av moderatoren på webbplatsen
Hej Willie B,
Du kan prova VBA-koden som anges i inlägget. När du har lagt till koden, använd den här formeln för att få det resultat du behöver:
="AAAAAAAA"&ColLtrs(ROW())
Denna kommentar minimerades av moderatoren på webbplatsen
Jag behöver en kod för att göra mina rader från 1-A till 1-Z tack
Denna kommentar minimerades av moderatoren på webbplatsen
Hej Mayra Lopez,
VBA-koden som anges i inlägget är fortfarande användbar, men du måste använda följande formel för att få de resultat du behöver:
="1-"&ColLtrs(ROW())
Det finns inga kommentarer här ännu
Lämna dina kommentarer
Postar som gäst
×
Betygsätt detta inlägg:
0   Tecken
Föreslagna platser

Följ oss

Copyright © 2009 - www.extendoffice.com. | Alla rättigheter förbehållna. Drivs av ExtendOffice. | | Sitemap
Microsoft och Office-logotypen är varumärken eller registrerade varumärken som tillhör Microsoft Corporation i USA och / eller andra länder.
Skyddad av Sectigo SSL