运行时错误＃91，对象变量或未设置块变量

Question

我已将搜索命令按钮添加到excel VBA中的userform，并希望通过组合框中显示的日期搜索数据。想法是在名为ICC_Data的工作表中搜索日期，如果找到，则它将在userform的TextBox1，TextBox2和TextBox3中显示数据。当我在组合框中选择日期并按下搜索命令按钮时。首先，它将日期转换为5位数值，然后显示错误：

  

未设置运行时错误91，对象变量或带有块变量。

我的代码如下，在我的工作簿中，Sheet2被命名为ICC_Data，其中存在数据。

Private Sub CmdSearch_Click()
Dim Findvalue As Range
Set Findvalue = Sheet2.Range("A:A").Find(what:=Me.ComboBox1.Value, _
                                 LookIn:=xlFormulas, lookat:=xlWhole)
Me.TextBox1.Value = Findvalue.Value

Me.TextBox2.Value = Findvalue.Offset(0, 1).Value

Me.TextBox3.Value = Findvalue.Offset(0, 2).Value

End sub

有人可以帮我解决这个问题。

此致 Vivek Roshan