Display duration 1yr 8 mo 15 days

[Av8tordude]

The formula dateif allows me to create a formula to what I'm seeking, but in VBA dateiff doesnt really do the trick. In VBA, can someone assist me with a code that will allow me to display what I'm seeking.

i.e. 1yr 8 mo 15 days

Thank you kindly

 

[James006]

Hello,

Your question is not very precise ...

What are you currently using ???

In VBA, have you tested DATEDIFF() ...

[COLOR=#333333]=DATEDIFF([/COLOR][COLOR=#333333]"Y",[/COLOR][COLOR=#333333]LowerDate,UpperDate) &" Years "& DATEDIFF([/COLOR][COLOR=#333333]"YM",[/COLOR][COLOR=#333333]LowerDate,UpperDate) &" Months and " & DATEDIFF([/COLOR][COLOR=#333333]"MD",[/COLOR][COLOR=#333333]LowerDate,UpperDate)&" Days"[/COLOR]

See explanation : http://www.excelfunctions.net/vba-datediff-function.html

Hope this will help

 

[Av8tordude]

Yes...I have tried datediff, however, when using datediff to determine Years Months Days between 01/01/200 & 02/15/2005, I would get

5 years (Fine)
61 months (incorrect), I want to display 1 month
1858 days (incorrect) I want to display 14 days

The display I want to see in this scenario 5 Yrs 1 Mo 14 Days

I would need this in VBA as I am using a Userform

Hello,

Your question is not very precise ...

What are you currently using ???

In VBA, have you tried DATEDIFF() ...

[COLOR=#333333]=DATEDIFF(LowerDate,UpperDate,"Y") &" Years "& DATEDIFF(LowerDate,UpperDate,"YM") &" Months and " & DATEDIFF(LowerDate,UpperDate,"MD")&" Days"[/COLOR]

See explanation : http://www.excelfunctions.net/vba-datediff-function.html

Hope this will help

 

[James006]

Hello again,

Before getting into the DATEDIFF issue, since you are using a UserForm ... most probably both your dates are located in textboxes ...which means you are dealing with Strings and NOT actual DATES ...

Have you tried to use CDate in order to convert your text strings into numeric values ...???

HTH