文章/答案/技术大牛

发布

问简单范围复制问题
EN

Stack Overflow用户

提问于 2017-04-19 15:07:59

回答 2查看 41关注 0票数 0

我知道我很笨，但我无法为简单的(免费剪贴板)复制操作找到正确的语法：

Sheets("B").Range(Cells(X, Y), Cells(X, Y+ 3)).value = _
Sheets("A").Range(Cells(1, Z), Cells(1, Z+ 3)).value

excel

vba

回答 2

Stack Overflow用户

回答已采纳

发布于 2017-04-19 15:14:34

您需要限定Cells的一种或两种用途，这样VBA才能知道哪些工作表包含这些单元格：

Sheets("B").Range(Sheets("B").Cells(X, Y), Sheets("B").Cells(X, Y+ 3)).Value = _
Sheets("A").Range(Sheets("A").Cells(1, Z), Sheets("A").Cells(1, Z+ 3)).Value

票数 2

Stack Overflow用户

发布于 2017-04-19 15:19:14

我将从一个已知的引用(如"A1")开始，并使用.Offset()和.Resize()方法“选择”所需的值。这样，您就可以得到相同数量的行和列。

Sheets("A").Range("A1").Offset(0,Z-1).Resize(1,3).Value = _ 
  Sheets("B").Range("A1").Offset(X-1,Y-1).Resize(1,3).Value

这与工作表中的命名范围相结合，效果最佳。

Sheets("A").Range("TableA").Offset(0,X-1).Resize(n,1).Value = _
  Sheets("B").Range("TableB").Offset(0,Y-1).Resize(n,1).Value

将n行从TableB column# X复制到TableA column# Y

票数 0

页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持

原文链接：

https://stackoverflow.com/questions/43499569

复制

相似问题

问简单范围复制问题
EN

回答 2

Stack Overflow用户

Stack Overflow用户

社区

活动

圈层

关于

腾讯云开发者

热门产品

热门推荐

更多推荐

问简单范围复制问题EN

回答 2

Stack Overflow用户

Stack Overflow用户

社区

活动

圈层

关于

腾讯云开发者

热门产品

热门推荐

更多推荐

问简单范围复制问题
EN