如何基于小时数清除Excel VBA单元格

时间:2018-08-16 10:23:42

标签: excel vba windows time

我正在尝试在其工作时间超过8小时时在一张纸上清除Microsoft Excel 2016中单元格的内容。我们会在8小时后审核所有收到的工作,并根据需要分配其他资源。

我有3张纸Test,VLOOKUP和Log。测试是普通用户唯一可见的测试,VLOOKUP持有Vlookup表来计算年龄,Log正是这样,包含所做的所有更改的日志。

通过使用循环方程式,我能够输出更改单元格的时间,并将其放入VLOOKUP工作表-

= IF(Test!E6 <>“”,IF(K4 =“”,NOW(),K4),“”)

在VLOOKUP工作表中,我有一个显示NOW(H3)的单元格。

我希望能够使用VLOOKUP的K列中的数据来提供Test E:G列的清晰内容,一次仅提供1行,并且前提是K单元的使用时间超过8小时。

我尝试了许多选项,但是无法根据VLOOKUP工作表值清除另一张工作表。

这是我目前的工作-

Sub DeleteRowsBeforeCutoff()

Application.ScreenUpdating = False
    If Worksheets("VLOOKUP").Range(K3) < DateAdd("h", -8, Now) Then
        Worksheets("Test").Range(E5).ClearContents
    End If

Application.ScreenUpdating = True
End Sub

在此先感谢任何指针!

0 个答案:

没有答案