開始日から終了日まで何ヶ月か求めたい

質問

Excel2003を使用しています。

開始日から終了日までの間隔を○．○ヶ月で求めたいのですが
Excel VBAで行う方法が分かりません。

開始日、終了日には文字形式で日付が入っています。（ex.20070515）

DateDiff関数を使えばできると教わりましたが、どういう風に
使えばよいのか分かりません。

添付の［何ヶ月］欄には私が手作業で求めた値が入っています。

VBAを勉強中ですので、分かりやすく教えてくだされば助かります。

宜しくお願いいたします。

回答No.1

MackyNo1 · ベストアンサー

D2セルに以下の式を入力して下方向にオートフィルしてください。

=DATEDIF(TEXT(B2,"0000!/00!/00")*1,TEXT(C2,"0000!/00!/00")*1,"m")+DATEDIF(TEXT(B2,"0000!/00!/00")*1,TEXT(C2,"0000!/00!/00")*1,"md")/31

1か月未満の日数に該当する小数点以下の数値の処理が不明のところがありますので、ひとまず1か月と30日の場合にも繰り上がることなく「1.9・・・」のような数字になるように、月数から余った日付部分を３１で割る数式にしています。

終了日がない場合などに「計算不能」と表示したい場合は、IF関数とISERROR関数を組合わせてください。

小数点以下1桁で表示したいなら、セルの表示形式を数値にして小数点以下の桁数を1にしてください。

ただし、小数点以下1桁表示の場合は、1か月と30日の場合は、2.0に繰り上がってしまいますので注意してください。

お礼

ありがとうございました。
助かりました。