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