Forum Discussion

TrevorHardisty's avatar
TrevorHardisty
Copper Contributor
Sep 15, 2021
Solved

Series Fill

Hi, I'm new to Excel, what I'm trying to do is create a worksheet with letters AAA thorough to ZZZ, I would like to use series fill to save time in typing each cell. My sample file shows the format I...
excel
  • NikolinoDE's avatar
    NikolinoDE
    Sep 15, 2021

    TrevorHardisty 

    In formula:

    =CHAR(TRUNC((ROW(A1)-1)/26/26,0)+65)&CHAR(MOD(TRUNC((ROW(A1)-1)/26,0),26)+65)&CHAR(MOD(ROW(A1)-1,26)+65)

     

    with VBA:

    insert into a module

    Sub AA_AAZ()
Dim wks As Worksheet
Set wks = Worksheets("Tabelle1")
zeile = 2
For z = 65 To 90
    For s = 65 To 90
       wks.Cells(zeile, 1) = Chr(z) & Chr(s)
       zeile = zeile + 1
    Next s
Next z
End Sub

     File with examples inserted.

     

    I would be happy to know if I could help.

     

    NikolinoDE

    I know I don't know anything (Socrates)

    * Kindly Mark and Vote this reply if it helps please, as it will be beneficial to more Community members reading here.