复制和粘贴Excel VBA中的单元格值:编译和运行时错误

复制和粘贴Excel VBA中的单元格值:编译和运行时错误,excel,vba,copy-paste,Excel,Vba,Copy Paste,我正在使用excel VBA设置一个循环代码,该代码将从一个工作表中复制公式值,并将这些值粘贴到另一个工作表的运行列表中。我可以将公式复制并粘贴到所需的位置,但要仅复制和粘贴值,我需要在代码中更改什么 我已经尝试了此代码的多种变体: .Value在底部的复制和/或粘贴命令之后 .paste特殊xlPasteValues(它给出编译错误,预期语句结束) .Value定义要复制的单元格时(这会导致运行时错误“438”) 将复制和粘贴变量的Dim类型更改为变量、字符串和范围 如果我删除.pasteV

我正在使用excel VBA设置一个循环代码,该代码将从一个工作表中复制公式值,并将这些值粘贴到另一个工作表的运行列表中。我可以将公式复制并粘贴到所需的位置,但要仅复制和粘贴值,我需要在代码中更改什么

我已经尝试了此代码的多种变体:

  • .Value
    在底部的复制和/或粘贴命令之后

  • .paste特殊xlPasteValues
    (它给出编译错误,预期语句结束)

  • .Value
    定义要复制的单元格时(这会导致运行时错误“438”)

  • 将复制和粘贴变量的
    Dim
    类型更改为变量、字符串和范围


  • 如果我删除
    .pasteValues
    我的代码将正常工作以复制和粘贴公式,但由于我需要时间戳数据,因此我只需要值,而不需要公式。 我目前正在

    编译错误:应为:语句结束

    如果我将其更改为
    .Values
    ,我将得到

    运行时错误“438”:对象不支持此属性或方法


    请让我知道,如果你看到任何可以解决这个问题!我确信这很简单,但我在这一点上已经坚持了一段时间。

    当使用
    PasteSpecial
    时,此位需要位于
    副本的单独一行,如下所示:

    copyR.Copy
    pasteR.PasteSpecial xlPasteValues
    
    在这种特殊情况下,可以完全避免使用剪贴板,直接传输代码和操作更短的值。例如:

    pasteR.value=copyR.value
    

    使用
    PasteSpecial
    时,此位需要位于
    复制
    的单独一行上,如下所示:

    copyR.Copy
    pasteR.PasteSpecial xlPasteValues
    
    在这种特殊情况下,可以完全避免使用剪贴板,直接传输代码和操作更短的值。例如:

    pasteR.value=copyR.value
    

    将pasteR Special放在新行上,或者只是
    pasteR.value=copyr.value
    @SJR-pasteR.value=copyr.value修复它。非常感谢。我想这可能是件简单的事pasteR.Value=copyR.Value pasteT.Value=copyT.ValueTip,也许@SJR应该将建议作为答案发布,或者您可以自行回答问题,而不是更改标题。第一个选项将向帮助者返回积分。=)@SJR如果您将此作为答复提交,我将接受。非常感谢。将pasteR Special放在新行上,或者只是
    pasteR.value=copyr.value
    @SJR-pasteR.value=copyr.value修复它。非常感谢。我想这可能是件简单的事pasteR.Value=copyR.Value pasteT.Value=copyT.ValueTip,也许@SJR应该将建议作为答案发布,或者您可以自行回答问题,而不是更改标题。第一个选项将向帮助者返回积分。=)@SJR如果您将此作为答复提交,我将接受。非常感谢。