在一個工作表中復制一行並粘貼到另一個工作表中

Question

這是代碼，我不知道它失敗有什么錯？ 我想我無法定義一個范圍來更改目標是將選定的行從一個工作表復制到另一工作表的末尾... row.counts等等根本不起作用！ 我不知道為什么...我正在使用excel2007，而vba版本是6.5，我不知道是否可以將其升級到更好的版本？這是代碼：

K = 2
For i = 1 To LastLine
  If Cells(i, 2).Value = longti Then
   Rows(i).Select
   Selection.Copy
   Worksheets("result").Range("A" & "k").PasteSpecial (xlPasteValues)

謝謝你的幫助 。 我不知道問題是否清楚

Answer 1

.Range("A" & "k")可能應該是.Range("A" & K) （即，丟失字母K周圍的引號）

就像您現在擁有的那樣，代碼正在尋找地址“ A​​k”的范圍，這是沒有意義的。 修改后的代碼將查找地址為“ A2”的范圍，這可能是您想要的