vba - Excel 宏复制粘贴 REF!错误

Question

我目前是 excel 宏的新手，并试图弄清楚为什么这不起作用。基本上，我希望将“Sheet1”中的单元格“D22”复制然后粘贴到“sheet2”单元格“A2”中。问题出在 sheet1 我在单元格 D22 中有一个公式，所以当我将其复制并粘贴到新工作表中时，我得到一个 #REF!错误 :(

我已经查找并尝试修复它，但仍然没有运气。下面是我的基本代码。我知道可能有一个简单的解决方案，但如果有人可以向我建议正确的方向，将不胜感激! xD

Sub Insert()
 Sheets("Sheet1").Select
 Range("D22").Select
 Selection.Copy
 Sheets("Sheet2").Select
 Range("A2").Select
 ActiveSheet.Paste
End Sub

Answer 1

如果您只想分配 值(value) 一个单元格到另一个单元格，不要使用复制/粘贴，只需使用 Value属性(property):

Sub Insert()
    Sheets("Sheet2").Range("A2").Value = Sheets("Sheet1").Range("D22").Value
End Sub