excel - 使用日期选择器将数据从 Excel 工作表过滤到用户表单中的列表框

Question

我一直在尝试创建一个 excel 宏，在该宏中，我将用户输入从 form1 获取到 excel sheet1，并使用 form2 通过使用日期选择器和组合框到列表框来从 sheet1 获取数据。我按照教程提出了这个，我没有向列表框显示任何错误输出。PS 我还没有完全完成教程中的说明，但是代码在我完成之前不会运行。我迷失在两者之间 我无法继续下一步

Private Sub DTPicker2_CloseUp()
Dim i As Long
Me.ListBox1.Clear
For i = 2 To Sheet1.Range("I100000").End(xlUp).Offset(1, 0).Row
If Sheet1.Cells(i, "A").Value = Me.ComboBox1.Value And Sheet1.Cells(i, "I").Value >= _
Me.DTPicker1.Value And Sheet1.Cells(i, "I").Value <= Me.DTPicker2.Value Then
Me.ListBox1.AddItem Sheet1.Cells(i, 1).Value
End If
Next i

End Sub

excel文件

标签： excelvba