VBA 这句话错哪里了？

显示全部楼层 · 2009-2-5 15:21:06

Sheets("汇总表").Rows("3:65535").Select
就是说原先是把结果写到差异表的，现在要写到汇总表里面，改了几个字，就不行了
涉及到如下几个代码
Dim a As String

a = Sheets("差异表").Cells(1, 4).Value '这个数据还是在sheets("差异表")里面的，没有改
Sheets("汇总表").Rows("3:65535").Select
Selection.ClearContents
Sheets("汇总表").Range("A3").CopyFromRecordset rs

千问 · 2009-2-5 15:21:06

改成这样吧！Sheet2改成你汇总表sheet 对应的ID Sheet2.Range("A3:A65535").ClearContents Sheet2.Range("A3").CopyFromRecordset RS...

千问 · 2009-2-5 15:21:06

但是我想把结果弄到另外一个sheet是什么意思？复制黏贴么？...