SOLVED

Series Fill

Copper Contributor

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'm looking for. I'm using Window 10 and Excel 365.

 

Thanks in advance, Trevor

3 Replies

@TrevorHardisty

Use Flashfill in stead.

Screenshot 2021-09-15 at 13.35.00.png

best response confirmed by TrevorHardisty (Copper Contributor)
Solution

@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.

 

@NikolinoDEThanks for your reply, your formula has saved my a lot of work. Thanks once again.

1 best response

Accepted Solutions
best response confirmed by TrevorHardisty (Copper Contributor)
Solution

@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.

 

View solution in original post