幼儿园中秋快乐教案:VBA小问题

来源:百度文库 编辑:高考问答 时间:2024/05/03 12:24:32
cells可以用copy方法,但是用paste方法好像就不行。比如我写代码:
Cells(1, 1).Copy
Cells(1, 2).Select
ActiveSheet.Paste
这样就可以,但
Cells(1, 1).Copy
Cells(1, 2).Paste
就会提示不支持该方法。
我就很纳闷为什么支持copy却不支持paste呢?
上面代码还有更简洁的写法么?

cell 属性是“只读属性”只能读取一个区域的数据,而不能写入数据,因此仅能复制不能粘贴,你可以用Range对象实现你所说的功能。

Cell(1,2).copy
Range("A1", "A2").Select
ActiveSheet.Paste

以上程序经测试可以运行。