时间戳

首页 > 解决方案 > 如何粘贴数据一定次数

excel - 如何粘贴数据一定次数

问题描述

我有 2 行：

L39 = DR
L40 = CR

而且我想将这两行复制一定次数，每次执行宏时都会改变。我已经使用变量计算了数字Template_row

所以如果Template_row= 128，我希望这 128 行用 DR & CR 填充。像这样

我不确定还需要哪些其他信息来提供帮助。有人建议使用自动填充，但是如何使目标变为可变的行数？

我已经看到其他代码使用 count 函数，但是由于我之前已经在我的代码中使用了 count 函数并将其设为变量`Template_row，使用该变量会更容易/可能吗？

标签： excelvba

解决方案

您可以将行数传递给range.autofill对象。

现在，如果您将行数作为变量，那么这个小代码

Sub Macro15()

Template_row = 128

   With ActiveSheet

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

   End With

End Sub

将设置range("L39:L167")为DR& CR

在此处输入图像描述

现在您可以使用它并根据您的需要进行修改。

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

 rw = ActiveCell.Row

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

推荐阅读