Excel VBA错误:运行时错误424对象必需

时间:2017-08-25 06:42:10

标签: excel vba excel-vba excel-formula excel-2010

当工作表MW中的单元格A1值发生更改时,我需要将工作表MW A1:M1单元格值复制到工作表TimeStampWork

我正在使用下面的代码,但每当我运行代码时,在If Value <> MW.Range("A1").Value Then

获取对象需要424错误
Private Sub Worksheet_Calculate()
Dim ws As Worksheet
Set ws = Workbooks("Main.xlsm").Sheets("TimeStampWork")
 If Value <> MW.Range("A1").Value Then
    Range("A1:M1").Copy
    ws.Range("A" & ws.Cells(ws.Rows.Count, "A").End(xlUp).Row + 1).PasteSpecial xlPasteValues
End If
End Sub

请让我知道造成这种情况的原因

0 个答案:

没有答案