使用Cells.Find时出现运行时错误91

Question

我要执行以下操作：

我使用以下方法将日期分配给了变量，该日期也已声明为日期类型：

var1 = Worksheets("Sheet1").Cells(rowCounter, 8).Value

在“本地”窗口中，日期已正确地作为#01.08.2018 00:15:00#分配给var1。

现在，我想在其他工作表上搜索该Date值，并使用以下代码行在2个变量中为行和列分配其位置：

    Set timesearch = Worksheets("Sheet2").Cells.Find(What:=var1, LookIn:=xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False, SearchFormat:=False)
timeRow = Range(timesearch.Address).Row
timeCol = Range(timesearch.Address).Column

timeRow和timeCol被声明为Long。

在Sheet2上要搜索值的单元格自定义为DD.MM.YYYY hh:mm

当我使用F8进行调试时，它总是在Set语句中引发错误91。我对此感到奇怪的是，该代码过去曾在同一工作簿上工作，而现在它才开始引发错误。

是我错过了什么吗，还是有一个更优雅的解决方案呢？