Excel上的错误424

Question

我正在使用excel,我尝试运行此命令,我得到了424 Error....代码很简单,但我找不到解决方案.

Private Sub Run_Click()    
  Dim Weekly As Worksheet
  Set Weekly = ThisWorkbook.Sheets("Weekly")      

  Todaydate = Range("D4").Value  
  foo = WorksheetFuncton.Match(Todaydate, Weekly.Range("A1489:A1499"), 0)  
End Sub

编辑:

我现在正在 Runtime error 1004

Private Sub Run_Click()    
  Dim Weekly As Worksheet
  Set Weekly = ThisWorkbook.Sheets("Weekly")      

  Todaydate = Range("D4").Value  
  foo = WorksheetFunction.Match(Todaydate, Weekly.Range("A1489:A1499"), 0) 
End Sub

编辑:

固定它!

我正在捣乱一个".Value"

foo = WorksheetFunction.Match(Todaydate,Weekly.Range("A1489:A1499").Value,0)

Answer 1

检查你的拼写:

WorkSheetFunct 我上