2014-02-24 148 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 

這是一個單細胞...............你會嵌入這種語法的一個循環。

相關問題