Ajouter des alphabets de A à Z dans une plage, Excel VBA

Sub ajouterAlphabet1()
Dim i As Integer 
For i = 65 To 90 
ActiveCell.Value = Chr(i) 
ActiveCell.Offset(1, 0).Select 
Next i End Sub
Sub ajouterAlphabet2()
Dim i As Integer 
For i = 97 To 122 
ActiveCell.Value = Chr(i) 
ActiveCell.Offset(1, 0).Select 
Next i 
End Sub

Tout comme les numéros de série, vous pouvez également insérer des alphabets dans votre feuille de calcul. Voici le code que vous pouvez utiliser.

S’abonner
Notifier de
0 Commentaires
Inline Feedbacks
Voir tous les commentaires

Initiation à Excel

Fonctions Excel

Excel VBA

Macros VBA Utiles

Plus d'outils

Sur Facebook

Sur YouTube

0
Nous aimerions avoir votre avis, veuillez laisser un commentaire.x