请问RANGE怎么区域复制值

qq_24370081 2017-04-14 08:31:22
Sheet1.Range(Sheet1.Cells(1, 1), Sheet1.Cells(1, 3)) = Sheet2.Range(Sheet2.Cells(1, 1), Sheet2.Cells(1, 3)).Value
上面这个语句可以成功将sheet2中的3个值复制到sheet1

下面这个语句缺不行,没有报错,但是sheet1的A1到C1没有任何值,还是空的
Sheet1.Range(Sheet1.Cells(1, 1), Sheet1.Cells(1, 3)) = Sheet2.Range(Sheet2.Cells(1, 1), Sheet2.Cells(1, 3))

请问为什么

。。。不会传附件,请谅解
...全文
713 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
qq_18328521 2017-05-21
  • 打赏
  • 举报
回复
少了一个value Sheet1.Range(Sheet1.Cells(1, 1), Sheet1.Cells(1, 3)) = Sheet2.Range(Sheet2.Cells(1, 1), Sheet2.Cells(1, 3)).Value 这样就可以了,也可以换种写法,简单一点 Sheet1.Range("A1:C1") = Sheet2.Range("A1:C1").Value 或者 Sheet3.[A1:C1] = Sheet2.[A1:C1].Value
赵4老师 2017-04-16
  • 打赏
  • 举报
回复
在VBA IDE(按Alt+F11键可进入)的立即窗口中,使用 ?变量名 显示你这个长表达式中的各个子表达式的值辅助调试。
一如既往哈 2017-04-16
  • 打赏
  • 举报
回复
1、请确认A1:C1有内容 2、请确认sheet1,sheet2的表格名称和代码名称是否一致 ....

2,461

社区成员

发帖
与我相关
我的任务
社区描述
VBA(Visual Basic for Applications)是Visual Basic的一种宏语言,是在其桌面应用程序中执行通用的自动化(OLE)任务的编程语言。
社区管理员
  • VBA
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧