本质上,我的代码只是找到了一个单元格,其中包含一个来自表单的自旋按钮提供的索引坐标。这只是整个代码的一部分,在我今天早上重新打开代码继续编码之前,整个代码工作得非常完美而且速度很快。上次保存之后,我没有做任何更改,通过一些调试,我发现由于某种原因,.Find方法什么也不返回,尽管数据在那里,即使我用它应该找到的数据填充整个列,它也不会返回任何内容。因此,代码产生:
Set DR = Worksheets("Detalle - Reporte")
我的剧本看起来像这样(mon_o < mon_c AND "18:00" BETWEEN mon_o AND mon_c)(mon_o > mon_c AND ("18:00" > mon_o OR "18:00" < mon_c))mon_o =周一开放时间(MySQL time type,hh:mm)18:00是本例中的当前时间。