如何在Excel中基于单元格值生成指定行数并重复填充序列列？

完全可以实现，下面提供几种适配不同Excel版本的实用方法：

方法1：SEQUENCE函数（Excel 365/2021及以上版本） #

这是最便捷的实现方式，公式输入后自动溢出填充所有行。假设从F2开始生成序列，在F2单元格输入：
=MOD(SEQUENCE(D2*E2,,0),D2)

• 原理：SEQUENCE(D2*E2,,0)生成从0开始的连续D2×E2个数字，MOD(...,D2)取每个数字除以D2的余数，自动得到0到D2-1重复E2次的序列，回车后直接完成填充。

方法2：拖拽填充（全版本通用） #

1. 先在目标列的前D2行生成基础序列：比如F2输入0，F3输入1，选中F2:F3，拖拽右下角的填充柄到第D2+1行（如D2=64则拖到F65），得到0到63的序列。
2. 选中这个0-63的序列区域，按住填充柄继续向下拖拽，直到总行数达到D2×E2，Excel会自动重复该序列完成填充。

方法3：Power Query工具（全版本通用） #

1. 给D2、E2所在列添加标题（比如A列标题「基数」，B列标题「重复次数」），选中这两列数据，点击「数据」选项卡→「从表格/区域」。
2. 在Power Query编辑器中，点击「添加列」→「自定义列」，输入公式：=List.Repeat({0..[基数]-1}, [重复次数])。
3. 点击自定义列右侧的展开箭头，选择「展开到新行」。
4. 点击「关闭并上载」，生成的序列会自动导入到新工作表中。

方法4：VBA宏（适合批量重复操作） #

按Alt+F11打开VBA编辑器，插入新模块，粘贴以下代码：

Sub GenerateRepeatedSequence()
    Dim baseNum As Integer, repeatTimes As Integer
    Dim totalRows As Integer
    Dim i As Integer, j As Integer
    Dim targetCol As Range
    
    baseNum = Range("D2").Value
    repeatTimes = Range("E2").Value
    totalRows = baseNum * repeatTimes
    
    On Error Resume Next
    Set targetCol = Application.InputBox("选择目标列（如F列）", Type:=8)
    On Error GoTo 0
    
    If targetCol Is Nothing Then Exit Sub
    
    For j = 1 To repeatTimes
        For i = 0 To baseNum - 1
            targetCol.Cells((j - 1) * baseNum + i + 1, 1).Value = i
        Next i
    Next j
End Sub

运行宏后，选择需要填充的目标列，即可自动生成所需序列。

内容的提问来源于stack exchange，提问作者Andrew Feenan