Comment augmenter automatiquement la lettre d'une unité pour obtenir la lettre suivante dans Excel?

Supposons qu'une cellule contienne la lettre AB, vous devez augmenter la dernière lettre d'une unité pour obtenir la lettre suivante AC, AD… et ainsi de suite. Ou vous avez une lettre A, et souhaitez augmenter la lettre à B, C… afin de créer une liste de lettres. Comment y parvenir? Cet article peut vous aider en détail.

Augmentez la lettre AB de un pour obtenir AC, AD… avec la formule
Augmentez la lettre d'une unité pour obtenir la liste des lettres avec formule
Augmentez la lettre d'une unité pour obtenir la liste des lettres avec la fonction définie par l'utilisateur

Augmentez la lettre AB de un pour obtenir AC, AD… avec la formule

Veuillez procéder comme suit pour augmenter la lettre d'une unité dans Excel.

1. Sélectionnez une cellule vide sous la lettre donnée, entrez la formule ci-dessous, puis appuyez sur le bouton Entrer clé.

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

importante: Dans la formule, A2 est la cellule contenant la lettre donnée.

2. Continuez à sélectionner A3, faites glisser la poignée de remplissage vers le bas pour obtenir la liste des lettres dont vous avez besoin.

Augmentez la lettre A par un pour obtenir la liste de lettres avec la formule

Vous pouvez utiliser le = CHAR (CODE (A1) +1) formule pour augmenter la lettre de un dans Excel. Veuillez faire comme suit.

1. Sélectionnez une cellule vide sous la lettre donnée, entrez la formule = CHAR (CODE (A2) +1) dans la barre de formule, puis appuyez sur Entrer clé. Voir la capture d'écran:

2. Sélectionnez la cellule de résultat, faites glisser la poignée de remplissage vers le bas pour obtenir la lettre dont vous avez besoin.

importante: Avec cette formule, après avoir obtenu la lettre Z, si vous continuez à faire glisser la poignée de remplissage vers le bas, vous obtiendrez des caractères spéciaux comme illustré ci-dessous. Si vous souhaitez obtenir la lettre AA après Z, la fonction définie par l'utilisateur suivante peut vous aider.

Augmentez la lettre d'une unité pour obtenir la liste des lettres avec la fonction définie par l'utilisateur

La fonction définie par l'utilisateur suivante peut également vous aider à augmenter la lettre d'une unité dans Excel.

1. presse autre + F11 touches simultanément pour ouvrir le Microsoft Visual Basic pour applications fenêtre.

2. dans le Microsoft Visual Basic pour applications fenêtre, cliquez sur insérer > Module. Ensuite, copiez et collez le code VBA ci-dessous dans le Module fenêtre.

Code VBA: augmentez la lettre d'une unité pour obtenir la liste des lettres

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

3. presse autre + Q touches pour fermer le Microsoft Visual Basic pour applications fenêtre.

4. Sélectionnez une cellule vide sous la lettre donnée, entrez la formule = ColLtrs (ROW ()), puis appuyez sur Entrer touche pour obtenir la deuxième lettre.

2. Sélectionnez la cellule de résultat, faites glisser la poignée de remplissage vers le bas pour obtenir la lettre dont vous avez besoin.

importante: Avec cette méthode, les lettres que vous avez augmentées sont basées sur le numéro de ligne. Vous devez commencer la première lettre A de la première ligne de la feuille de calcul, sinon la lettre deviendra désordonnée.

Les meilleurs outils de productivité de bureau

Kutools for Excel résout la plupart de vos problèmes et augmente votre productivité de 80%

Réutilisation: Insérer rapidement formules complexes, graphiques et tout ce que vous avez utilisé auparavant; Crypter les cellules avec mot de passe; Créer une liste de diffusion et envoyer des e-mails ...
Barre Super Formula (modifiez facilement plusieurs lignes de texte et de formule); Disposition de lecture (lire et modifier facilement un grand nombre de cellules); Coller dans la plage filtrée...
Fusionner les cellules / lignes / colonnes sans perdre de données; Contenu des cellules divisées; Combiner des lignes / colonnes en double... Empêcher les cellules en double; Comparer les gammes...
Sélectionnez Dupliquer ou Unique Lignes; Sélectionnez les lignes vides (toutes les cellules sont vides); Super Find et Fuzzy Find dans de nombreux classeurs; Sélection aléatoire ...
Copie exacte Plusieurs cellules sans changer la référence de formule; Créer automatiquement des références à plusieurs feuilles; Insérer des puces, Cases à cocher et plus encore ...
Extrait du texte, Ajouter du texte, Supprimer par position, Supprimer l'espace; Créer et imprimer des sous-totaux de pagination; Conversion entre le contenu et les commentaires des cellules...
Super filtre (enregistrer et appliquer des schémas de filtrage à d'autres feuilles); Tri avancé par mois / semaine / jour, fréquence et plus; Filtre spécial par gras, italique ...
Combiner des classeurs et des feuilles de travail; Fusionner les tableaux en fonction des colonnes clés; Diviser les données en plusieurs feuilles; Conversion par lots xls, xlsx et PDF...
Plus de 300 fonctionnalités puissantes. Prend en charge Office / Excel 2007-2019 et 365. Prend en charge toutes les langues. Déploiement facile dans votre entreprise ou organisation. Essai gratuit de 30 jours. Garantie de remboursement de 60 jours.

Lire la suite... Téléchargement Gratuit... Achat...

Office Tab apporte une interface à onglets à Office et simplifie considérablement votre travail

Activer l'édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
Augmente votre productivité de 50% et réduit des centaines de clics de souris chaque jour!

Lire la suite... Téléchargement Gratuit... Achat...

13 Comments
Login

Sort by Newest
- Best
- Popular
- Newest
- Oldest

You are guest

or post as a guest, but your post won't be published automatically.

Loading comment... The comment will be refreshed after 00:00.

To post as a guest, your comment is unpublished.
brickh7777@gmail.com · 1 years ago
How do I get it to start over at A when Z is used?
- Reply
To post as a guest, your comment is unpublished.
Zac · 2 years ago
This code will allow you to go from A to 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))))
- Reply
To post as a guest, your comment is unpublished.
Dan · 2 years ago
Is there a way to do this for entire words? Where every letter in the word moves up by X number of characters
- Reply
To post as a guest, your comment is unpublished.
Harold McBroom · 2 years ago
Excel was the spreadsheet that superseded Lotus 1-2-3, and having been around that long, you would think that geniuses at Microsoft would have created a more simple means of retrieving a cells column number, without having to write your own function. Back in 2001, 2002 when I was programming in VBA there were only 65536 rows in an Excel spreadsheet, now the number has increased to a ridiculous 1.4 million rows. It's not how big the database is that counts, but how intelligent you manage the data on your hard drive, when accessing that data through Excel.

If that doesn't make you upset, then the Bankers Rounding scheme used by Excel should finish the job! We were taught math in school, basic rounding, come to find out, the Bankers "guild" wants to determine how cash amounts are rounded to better cater to their advantages. For instance, 1.5 is either closer to 1 or 2, but is rounded up to 2, being the even number. 0.5 is either closer to 0 or 1, but being the odd number, they round it down to 0. The entire system is corrupt, and they create the business software used by American businesses.

I read a comment below the one I'm addressing, and someone basically said, "I have a lot of banker friends, and they never heard of Bankers Rounding; They say they used a method called "5 Step Rounding" in the EU. So does that mean the Bankers Rounding is used only in the sabotage of the American Economy, but not good enough to ruin the European Economy that's trying to take over the world?! These money changers never cease to amaze me at how far they will go in their arrogance!
- Reply
- To post as a guest, your comment is unpublished.
  Me · 1 years ago
  
  Everything man does is corrupt. Everything.
  
  Reply
To post as a guest, your comment is unpublished.
afzalss · 3 years ago
Dear Sir
When I run the function =ColLtrs(ROW()) in an excel sheet, I get perfect results, but if I want to call this function or cell value in VBA, then is it possible. So my variable could be i with values 1,2,3,4,....27,28, etc and result should be A,B,C,D....,AA,AB and so on. Is it possible?
Thanks
- Reply
- To post as a guest, your comment is unpublished.
  crystal · 2 years ago
  
  Hi,
  Please select the number cells and run the below code to solve the problem.
  
  Sub NumTOAZ()
  Dim xRg As Range
  Dim xStr As String
  On Error Resume Next
  For Each xRg In Selection
  xStr = Replace(Cells(1, xRg.Value).Address(False, False), "1", "")
  xRg.Value = xStr
  Next
  End Sub
  
  Reply
To post as a guest, your comment is unpublished.
Afzal · 3 years ago
the formula =ColLtrs(ROW()) works perfectly well in an excel cell, I need to use the same inside a VBA to give me result from A to Z then AA to AZ and so on. If I use CHAR in VBA it has limitation to go only till Z.
- Reply
- To post as a guest, your comment is unpublished.
  crystal · 2 years ago
  
  Hi,
  Way not keep using the VBA code? The above VBA code can create letters from A to Z then AA to AZ and so on to meet your needs.
  
  Reply
To post as a guest, your comment is unpublished.
cdarzur · 3 years ago
thank you for the above. But what if you want to increment from 400_A to 400_B? I tried a few things but I can only make it work with numbers.
Thanks
- Reply
- To post as a guest, your comment is unpublished.
  cdarzur · 3 years ago
  
  Found the answer. Thank you.
  =LEFT(B1,4)&"_"&CHAR(CODE(RIGHT(B1,1))+1)
  
  Reply

Connectez-vous à votre compte

Réinitialiser mot de passe