首页 文章

Excel 2007 - 工作表之间的宏复制和粘贴到新行

提问于
浏览
2

我正在使用Excel 2007,我试图在2个不同的工作表之间创建一个宏 .

我试图复制单元格并将它们粘贴到工作表2中 . 我意识到这很简单,但这是我的问题 - 我希望每次运行宏时,它都可以将值复制到工作表2中的新行 .

例如:
行数据示例:行 Headers :(a1)月,(b1)1,(c1)2,(d2)3 . 数据:(a1)7月-12,(b2)2,(c2)5,(d2)1数据:(a1)8月12日,(b2)1,(c2)4,(d2)2 .

要复制的位置 . 行 Headers :(a1)月,(b1)值为1,(c1)值为2,(d2)值为3 .

我之前从未使用过VB,我习惯于在Excel上使用论坛 .
我尝试了以下方法:范围("A1:A2") . 选择Selection.Copy范围("C4") . 选择ActiveSheet.Paste

我正在尝试自动化我的电子表格,而不是必须从一个工作表中记下一个数字,然后将其写在另一个工作表中 .

我不确定我是否在自己的脑海中复杂化了事情,或者这是否更复杂 .

非常感谢所有回复 .

1 回答

  • 0

    我可能会很迟,但在这里你可以找到Sheet2的最后一行

    Lrow=ThisWorkbook.Sheets("Sheet2").Cells(65536,).end(Xlup).Row
    

    找到最后一行后,您可以将范围粘贴到最后一行之后的下一行,方法是将其加1,如下所示 .

    Range("A1:A2").Select 
    Selection.Copy Range("C" & Lrow+1).Select ActiveSheet.Paste
    

    希望这可以帮助!

相关问题