Excel怎么用宏把指定行插入到Sheet2里面去?

我想在Sheet1做一个宏按钮,一点这个按钮就把当前鼠标所选中单元格的整行插入到Sheet2的第5行里.这个宏应该怎么写?
二楼的朋友你好,你这个宏我一按就会自动把A1到F16这范围内的所有数据插到表2的第5行了,而不是当前鼠标所选中单元格的整行.麻烦你帮我修改一下.

跟着这个是把当前单元格的复制到表2去,而不是整行.

Sub 选择复制行()
'把sheet1中,当前鼠标所选中单元格的那一行,复制到sheet2第五行中
r = ActiveCell.Row
Sheets("Sheet1").Rows([r]).Copy Destination:=Sheets("Sheet2").Rows([5])
End Sub
Sub 选择复制格()
'把sheet1中,当前鼠标所选中单元格,复制到sheet2第五行的A5单元格里
Worksheets("Sheet1").Activate
ActiveCell.Copy Destination:=Sheets("Sheet2").Range("A5")
End Sub
温馨提示:内容为网友见解,仅供参考
第1个回答  2009-04-10
Sub Macro1()
Sheets("Sheet2").Select
Rows("5:5").Select
Selection.Insert Shift:=xlDown
Sheets("Sheet1").Select
Selection.Copy
Sheets("Sheet2").Select
Range("A5").Select
ActiveSheet.Paste
End Sub
相似回答
大家正在搜