If date is between two periods from a DatedIf function

Hi all,

I have been using a Dated if function to return how many years, months and days have occurred between two dates. I am now trying to use an if function to tell me if this result is between two time periods. The formula however, is not working all the time.

So, I have grouped it into the following: -

less than 4 months = if(result<"0 years, 4 months, 0 days")
more than 4 months but less than 1 year = if(and(result >="0 years, 4 months, 0 days",result<"1 Years, 0 months, 0 days")
more than 1 year but less than 2 years = as above
more than 2 years but less than 5 years = as above
more than 5 years but less than 10 years = as above
more than 10 years = if(result>"10 years, 0 months, 0 days")

The formula is working on anything for less than 4 months, 4 months to 1 year, 1-2 years and 10 years plus but, anything between 2 and 10 years is coming back as 10+ years.

Any help would be appreciated, I am unable to upload an example file at the moment but, can do later on.

Try the attached file, maybe a solution.
Enter start date in column "A" - end date in column "B" both in dd/mm/yyyy format.

version 2, cleaning up maximums, minimums and negatives.

AliGW - my apoligise.
I believed the thread to be intact and the solution offered to be to simplistic to require explaining.
However;
Format columns "A" & "B" , Custom, dd/mm/yyyy
Open VBA editor, (Alt + F11)
In project window select sheet1
copy and paste the code below into the code window and save and exit
run the app and enter relevant dates in columns "A"(start date) & "B"(end date)
On moving from cell in column "B" a message box will appear with relevant comment.
The code can be further extended by replacing the message box with further code to manipulate any relevant data

'code ------------------------------------------------------------------------------------
Option Explicit
Dim x As Double

Private Sub Worksheet_Change(ByVal Target As Range)
Dim KeyCells1 As Range, KeyCells2 As Range
Set KeyCells1 = Range("A:A")
Set KeyCells2 = Range("B:B")
If Not Application.Intersect(KeyCells2, Range(Target.Address)) Is Nothing Then
x = DateDiff("d", Target.Cells(1, 0), Target.Cells(1, 1))
Select Case x
Case Is < 1
MsgBox "DATE CONFLICT OR NEGATIVE RESULT"
Case 1 To 121
MsgBox "THE PERIOD IS LESS THAN 4 MONTHS"
Case 122 To 365
MsgBox "THE PERIOD IS GREATER THAN 4 MONTHS BUT LESS THAN 1 YEAR"
Case 366 To 732
MsgBox "THE PERIOD IS GREATER THAN 1 YEAR BUT LESS THAN 2 YEARS"
Case 733 To 1826
MsgBox "THE PERIOD IS GREATER THAN 2 YEARS BUT LESS THAN 5 YEARS"
Case 1827 To 3652
MsgBox "THE PERIOD IS GREATER THAN 5 YEARS BUT LESS THAN 10 YEARS"
Case Is > 3652
MsgBox "THE PERIOD IS GREATER THAN 10 YEARS"
Case Else
MsgBox "AMBIGUOS RESULT"
End Select
End If
End Sub
'---------------------------------------------------------------------------