2014-02-24 52 views
0

我一直在试图找到解决方案,现在我已经有一段时间了,我不相信我正在寻找正确的东西。将单元格复制到另一个表格,一个接一个

基本上我想要做的是复制单元格内容并将其粘贴到另一个表格,然后删除从中复制的单元格的内容。

我有一个按钮对应于每个单元格,我想写一点代码,使您可以通过单击按钮来完成此操作。

另一个问题是我不知道代码不会不断粘贴在同一个单元格中,而是转到下一行并粘贴到那里。

我目前所面对的是以下几点:

Sub Macro1() 


Range("I2").Select 
Selection.Copy 
Sheets("Completed Tasks").Select 
Range("A72").Select 
ActiveSheet.Paste 
Sheets("Projects Live!").Select 
Application.CutCopyMode = False 
ActiveCell.FormulaR1C1 = "" 
Range("H2").Select 

End Sub 

这只是指顶电池,我已经录制宏基本上我想要什么表现。

希望你能帮助或指点我正确的方向。

+3

两个链接,让你开始。 '1'请避免使用'.Select/.Activate' [有趣的阅读](http://stackoverflow.com/questions/10714251/excel-macro-avoiding-using-select) '2'找到[Last行(http://stackoverflow.com/questions/11169445/error-finding-last-used-cell-in-vba) –

回答

0

考虑:

Sub luxation() 
    Range("I2").Copy Sheets("Completed Tasks").Range("A72") 
    Range("I2").Clear 
End Sub 

这是一个单细胞...............你会嵌入这种语法的一个循环。

相关问题