エクセルルで経過年数の計算

質問

経過年数を計算する方法を教えて下さい。
平成21年1月－平成15年11月＝5年2ヶ月経過、見たいな感じです。
どんな形でも良いので、よろしくお願いします。

回答No.4

hige_082 · ベストアンサー

関数です
A1=平成15年11月
B1=平成21年1月
C1へ
=DATEDIF(DATEVALUE(A1&"1日"),DATEVALUE(B1&"1日"),"y")&"年"&DATEDIF(DATEVALUE(A1&"1日"),DATEVALUE(B1&"1日"),"ym")&"ヶ月経過"
A1、B1が文字列場合です

A1、B1がシリアルの場合は
C1へ
=DATEDIF(A1,B1,"y")&"年"&DATEDIF(A1,B1,"ym")&"ヶ月経過"

以上、参考まで

お礼

いやー助かりました。みなさんありがとうございます。

回答No.3

Sinogi

#2です。前提説明が抜けていました。

#2の式では
開始年月がＡ11
終了年月がＡ10にシリアル値（日付形式データ）であるとしています。

開始年月がＡ1
終了年月がＡ2
なら
=TEXT(INT(YEARFRAC(A1,A2)),"#年")&TEXT((YEARFRAC(A1,A2,0)-INT(YEARFRAC(A1,A2,0)))*12,"#か月")

となります。

修正失礼しました。

回答No.2

Sinogi

一例です。

=TEXT(INT(YEARFRAC(A11,A10)),"#年")&TEXT((YEARFRAC(A11,A10,0)-INT(YEARFRAC(A11,A10,0)))*12,"#か月")

※YEARFRAC関数が使用できず、エラー値 #NAME? が返される場合は、分析ツール アドインを組み込む必要があります。

回答No.1

hoopcup

DateDiff関数を利用すれば簡単です。
------------------------------------
dim date1 as Date,date2 as Date
date1 = 日付１
date2 = 日付２

msgbox DateDiff("m",date1,date2)
------------------------------------
これでヶ月数を返します。