A custom function for Excel to find Nth weekday of the month

WEEKDAYOFMONTH.vba

Function WEEKDAYOFMONTH(month As Date, dow As Integer, offset As Integer)
    FirstDayOfMonth = month - Day(month) + 1
    LastDayOfMonth = WorksheetFunction.EoMonth(month, 0)
    
    If offset > 0 Then
        StartDate = FirstDayOfMonth + offset * 7
        adjustment = weekday(FirstDayOfMonth + 7 - dow)
    ElseIf offset < 0 Then
        StartDate = LastDayOfMonth + (offset + 1) * 7
        adjustment = weekday(LastDayOfMonth - dow)
    End If

    WEEKDAYOFMONTH = StartDate - adjustment
End Function