【发布时间】:2020-07-13 19:01:50
【问题描述】:
我有一行包含各种公式,我想将公式复制到某个范围内。
假设公式行来自 A1:T1,我想将公式向下复制 20 行。
意图是如果 A1 有公式 Sum(U1:Z1) 那么 A10 应该有 Sum(U10:Z10)
也许不是最好的例子,但你明白我的意思,VBA 相当于突出显示一系列单元格并向下拖动 20 行。
我得到的如下:
Sub test()
Sheets("Sheet1").Range("A1:T10").Copy Sheets("Sheet1").Range("A20:T20")
End Sub
代码没有做我想做的事,我做错了什么?
【问题讨论】:
-
Sheets("Sheet1").Range("A1:T1").Copy Sheets("Sheet1").Range("A1:T20")? -
是的。就是这样...哈哈谢谢