Excel工作表功能匹配不起作用？

Question

我在表'仪表板'M1中有一个日期。我需要在'HDCinput'单元格A33：A833的范围内匹配它。当我运行下面的代码（一个更大的宏的一部分）时，我得到一个“对象变量或没有设置块变量”。我不知道为什么

Dim mydate As Date
Dim myrange As Range
Dim Colindex As Long

mydate = Sheets("Dashboard").Range("M1")
myrange = Sheets("HDCInput").Range("A3:A833")
Colindex = Application.WorksheetFunction.Match(mydate, myrange, 0)

Answer 1

你必须Set范围对象：

Set myrange = Sheets("HDCInput").Range("A3:A833")

未经过进一步测试，但这应解决该特定错误。