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

时间:2015-01-28 14:11:09

标签: excel vba excel-vba

我在表'仪表板'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)

1 个答案:

答案 0 :(得分:1)

你必须Set范围对象:

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

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