Macro to clear cell contents based on IF date in another cell = today

[rabidcabbage]

I am trying to build a macro that will clear contents of the cell that holds the PTO taken based on hire date to the year mark (if the employee has passed their 1 year anniversary) and at to the 6 month mark (if the employee has passed their 5 year anniversary).

So a macro that will clear the contents of Cell D11 if [B23 >= today's date AND if B27 = today's date] or [B20 >= today's date AND if B26 = today's date]. Attached is a mock worksheet, which is the style we will build out for each employee. So I am wanting the macro to run this process if the worksheet is the active window. Is this even possible?

 

[learnerrr]

You can use the Worksheet_Activate event.

Private Sub Worksheet_Activate()
'your code here
End Sub

 

[rabidcabbage]

Are Marco codes written in the same way as a function in a cell?

 

[learnerrr]

You can do something like this:

If (Range("B23").Value >= Date And Range("B27").Value = Date) Or _
   (Range("B20").Value >= Date And Range("B26").Value = Date) Then
    Range("D11").ClearContents
End If

 

[rabidcabbage]

You can do something like this:

If (Range("B23").Value >= Date And Range("B27").Value = Date) Or _
   (Range("B20").Value >= Date And Range("B26").Value = Date) Then
    Range("D11").ClearContents
End If

So written very differently from formulas in a cell.
So you use

  vs "Sub" I have been seeing used for excel vba?

 

[rabidcabbage]

So I was able to perform the Macro, but I had to invert the Date / Range fields. Thank you!

 

[learnerrr]

Thanks for the feedback