VBA剪切和粘貼錯誤

我試圖削減細胞K7（100）的內容，並使用VBA（見下文），將其粘貼到M7但我不斷收到一個錯誤（見下文）。我要去哪裏錯了？：VBA剪切和粘貼錯誤

Sub CutPaste()  
    Worksheets("Sheet2Test").Activate 
    Range("K7").Select 
    Selection.Cut 
    Range("M7").Select 
    Selection.Paste 
End Sub

enter image description here

來源

2012-11-10 Anthony

你會得到哪個錯誤？ –

+1感謝您的回覆。當我調試時，我收到第6行的錯誤（Selection.Paste） – Anthony

完全避免Select。使用這個

Worksheets("Sheet2Test").Range("K7").Cut Worksheets("Sheet2Test").Range("M7")

來源

2012-11-10 21:53:29

+1這非常棒！簡潔，更高效。謝謝！ – Anthony

它工作得很好，但我想了解這條線如何粘貼數據。 – Anthony

只需更換Selection.Paste的ActiveSheet.Paste，所以這將是：

Sub CutPaste()  
    Worksheets("Sheet2Test").Activate 
    Range("K7").Select 
    Selection.Cut 
    Range("M7").Select 
    ActiveSheet.Paste 
End Sub

那對粘貼爲你想。

來源

2012-11-10 16:55:38 Nelson

+1謝謝。有效。 – Anthony

VBA剪切和粘貼錯誤

回答

相關問題