VBA Specific Value to Return with Date Calculation

[Razor_Rob]

Hi
Need help with VBA please
I would like to Return 2 values to Column A
1stHalf
2ndHalf

If current date is on or after 1st January 2023(Current Year) BUT before 1st July 2023(following year) make the used rows in Column A to have a value "1stHalf"
If current date is on or after 1st July 2022 (Current Year) BUT before 1st January 2023(following year) make the used rows in Column A to have a value "2ndHalf"


Thanks in advance

 

[Joe4]

Are you really wanting to use the "Current Date", or is their some data field we should be looking in (if so, where is it)?

If you really just want to use the current date, you could simply use this formula:

=IF(MONTH(TODAY())<7,"1stHalf","2ndHalf")

 

[Razor_Rob]

How do I convert that to a VBA as I've got other codes and I can just add that in my existing vba

 

[Joe4]

How do I convert that to a VBA as I've got other codes and I can just add that in my existing vba

Something like this:

    If Month(Date) < 7 Then
        Range("A1") = "1stHalf"
    Else
        Range("A1") = "2ndHalf"
    End If