高手幫幫忙好嗎?急

uone

緣儿﹐新QqQ



86523884



有一工作表A







a   b    c







1   2     3







4   5     6







4   2     1







5   7     3







現要把這工作表的數据插入到另一工作表B中







a   b     c







1   2     3











4   5     6











4   2     1











5   7     3







然后把工作表A的數据全部刪掉﹐除標題 a b c







偶是菜鳥啊﹐請教高手﹐怎么編程啊?謝謝啦







[em08]

晓月清风

下面的代码将工作表SHEET1中A1到C5的内容复制到工作表SHEET2中A1到C5的位置，然后清除工作表SHEET1中A2到C5的内容，也就是只留下标题栏。根据你的需要，自行修改一下代码Sub test()

    Sheets("Sheet1").Activate '激活要复制内容的工作表

    Range("A1:C5").Select     '选择要复制的区域

    Selection.Copy            '复制

    Sheets("Sheet2").Activate '选择要粘贴内容的工作表

    Range("A1").Select        '选择要粘贴的位置

    ActiveSheet.Paste         '粘贴

    Sheets("Sheet1").Select   '回到工作表sheet1

    Range("A2:C5").Select     '选择要清除内容的区域

    Selection.ClearContents   '清除内容

End Sub

uone

[color="#990000"]晓月清风﹐謝謝啦

红池坝

像这类可以手工完成的任务的宏代码，可以通过录制宏获取的。请楼主以后多在这方面去下点功夫，会有收获的