Alphabets Serial Capital And Small Letter

Sub Alphabets_capital()
‘ Smart code for Serial Alphabets in Capital Letters from select cell
‘ Smart Excel (www.anilnahar.com)
Dim i As Integer
For i = 65 To 90
ActiveCell.Value = Chr(i)
ActiveCell.Offset(1, 0).Select
Next i
End Sub
—————
Sub Alphabets_small()
‘ Smart code for Serial Alphabates in Small Letters from select cell
‘ Smart Excel(anilnahar.com)
Dim i As Integer
For i = 97 To 122
ActiveCell.Value = Chr(i)
ActiveCell.Offset(1, 0).Select
Next i
End Sub

Leave a Reply

Your email address will not be published. Required fields are marked *

fourteen − 5 =