Excel 如何将数据粘贴一定次数

我有两行：

L39 = DR
L40 = CR

我想把这两行复制下来一定次数，每次我做宏的时候都会改变。我已经使用变量

Template\u row

因此，如果

Template\u row

=128，我希望用DR&CR填充这128行

我不确定还需要什么其他信息来帮助。有人建议使用自动填充，但如何使目标成为要向下移动的可变行数

---

我见过其他代码使用count函数，但由于我以前在代码中已经使用了count函数，并将其设置为变量“Template”行，使用该变量是否更容易/可能？

您可以将行数传递给

范围。autofill

对象

现在，如果您将行数作为变量，那么下面的代码

Sub Macro15()

Template_row = 128

   With ActiveSheet

        .Range("L39:L40").AutoFill .Range("L39:L" & Template_row + 39)

   End With

End Sub

将

范围（“L39:L167”）

设置为

DR

&CR

现在你可以玩它，并根据需要修改它

---

假设活动单元是两个单元中的第一个单元：

 rw = ActiveCell.Row

.Range("L" & rw & ":L" & rw + 1).AutoFill .Range("L" & rw & ":L" & Template_row + rw)

---

编辑答案，并进一步解释您希望如何获得这些数据。从目前可以理解的情况来看，您可以从使用

AutoFill

中获益。很抱歉，我对VBA很陌生。如何使用

AutoFill

，使其只填充多行，而不是全部填充？谢谢。我需要它为每行交替DR和CR。有什么方法可以用这个公式做到吗？太好了！非常感谢你的帮助！真的很感激！！另一个问题-如果我想为同一列L中的两个选定单元格调整此代码，但每次行都会不同，我将如何进行调整？我试过使用

Activecell

，但我认为我写得不对<代码>带有工作表（“模板”）.Range（ActiveCell）.AutoFill.Range（ActiveCell&“：L”&month_row+39）以结束。它已经占用了2个单元格

.Range（“L39:L40”）。AutoFill

，39和40是-但我的意思是我不知道该行，因为它每次都会不同。它仍然是列L，但可能是L60和61或L85和86。如何调整代码，使其拾取活动单元格-有办法吗？