在一个工作表中复制一行并粘贴到另一个工作表中

这是代码,我不知道什么是错误的,它失败? 我想我不能定义一个范围,改变目标是复制从一个工作表中选定的行到另一个工作表的结尾… 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) 

谢谢你的帮助 。 我不知道问题是否清楚

.Range("A" & "k")应该是.Range("A" & K) (即在字母K周围丢失引号)

就像你现在使用的那样,代码正在寻找一个地址为“Ak”的范围,这没有任何意义。 修改后的代码将查找地址为“A2”的范围,这可能是您想要的