在一个工作表中怎样操作另外一个表中的数据，实现在另一个表中的复制、粘贴。望高手指点...

Question

在一个工作表中怎样操作另外一个表中的数据，实现在另一个表中的复制、粘贴。望高手指点。

Answer 1

哦,对不起,我是新手.题目是这样的,别人做的表有几行作为样本(打出来是收费清单),用VBA把这几行复制下来,再粘贴到下面,可以是整行复制,然后新粘贴的几行又可以填入数据生成新的收费清单.这样清楚了吧.

Answer 2

    Sheets("Sheet2").Select
    Range("B1:G1").Select
    Selection.Copy
    Sheets("Sheet3").Select
    Range("B1").Select
    ActiveSheet.Paste

Answer 3

整行选,选几行,怎样选择呀
jhone99老师给的代码
Range("B1:G1").Select 
出错:
运行时错误'1004':
应用程序定义或对象定义错误

Answer 4

录制的宏和控件运行的结果怎么不一样,像"CommandButton1_Click"

Answer 5

录制的宏是这样
Sub Macro1()
'
' Macro1 Macro
' 宏由 FtpDown 录制，时间: 2008-10-6
''    Sheets("Sheet2").Select
    Range("C1:C15").Select
    Selection.Copy
    Sheets("Sheet3").Select
    Range("D1").Select
    ActiveSheet.Paste
End Sub
双击控件按钮
Private Sub CommandButton1_Click()End Sub将代码拷贝过来Private Sub CommandButton1_Click()
    Sheets("Sheet2").Select
    Range("C1:C15").Select
    Selection.Copy
    Sheets("Sheet3").Select
    Range("D1").Select
    ActiveSheet.PasteEnd Sub不就成了

Answer 6

请jhone99老师再费费心,控件"CommandButton1_Click"仍运行不通
"Range("C1:C15").Select "
这句出错: 
运行时错误'1004': 
应用程序定义或对象定义错误

Answer 7

把你的文件发给我
[email protected]