入居日 1997/01/20
退去日 2000/08/15
期間 3年6ヶ月26日
↑
関数 =DATEDIF(A1,B1,"Y")&"年"&DATEDIF(A1,B1,"YM")&"ヶ月"&(DATEDIF(A1,B1,"MD")&"日")
別のセルに上記と同じ関数で 期間 2年2ヶ月24日 と結果が入力されています。
期間同士を足すと 5年8ヶ月50日 となります。
しかし、表示は、12ヶ月、31日をMAXとしたいので 5年9ヶ月16日 という結果がほしいです。
説明が下手ですいません。関数で出来ますか??
おわかりの方教えてくださーい!
No.2ベストアンサー
- 回答日時:
上記の関数だと最大値は
11ヶ月(0ヶ月があるため)
30日(0日があるため)
だと思いますがいいのでしょうか?
ユーザー定義関数を作りました。Alt+F11でBisualVasicEditorを起動して
標準モジュール(なければ「挿入」「標準モジュール」)に下記のVBAをコピーしてください。
Function DATESUM(RG)
Dim RC, WY, WM, WD
For Each RC In RG
If InStr(1, RC, "年") = 0 Then GoTo RCNEXT 'セルに年がない場合集計しない
If InStr(1, RC, "ヶ月") = 0 Then GoTo RCNEXT 'セルにヶ月がない場合集計しない
If InStr(1, RC, "日") = 0 Then GoTo RCNEXT 'セルに日がない場合集計しない
WY = WY + CInt(Left(RC, InStr(1, RC, "年") - 1)) '年集計
WM = WM + CInt(Replace(Mid(RC, InStr(1, RC, "年") + 1, 2), "ヶ", "")) '月集計
WD = WD + CInt(Replace(Mid(RC, InStr(1, RC, "月") + 1, 2), "日", "")) '日集計
RCNEXT:
Next RC
WM = WM + Int(WD / 31): WD = WD - Int(WD / 31) * 31 '日桁あふれ修正
WY = WY + Int(WM / 12): WM = WM - Int(WM / 12) * 12 '月桁あふれ修正
DATESUM = WY & "年" & WM & "ヶ月" & WD & "日"
End Function
No.1
- 回答日時:
二つの期間が(B1,B2)、(C1,C2)にあるとして
=DATEDIF(0,DATEDIF(B1,B2,"D")+DATEDIF(C1,C2,"D"),"Y") → 合算の満年数
=DATEDIF(0,DATEDIF(B1,B2,"D")+DATEDIF(C1,C2,"D"),"YM") → 合算の満月数
=DATEDIF(0,DATEDIF(B1,B2,"D")+DATEDIF(C1,C2,"D"),"MD") → 合算の満日数
で求められませんか。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) 現時点の年齢を算出して、その年齢と一致したセルを色付けしたい。 4 2022/06/23 17:49
- Excel(エクセル) EXCEL 計算結果の桁数をそろえたい。 5 2022/12/25 18:33
- Excel(エクセル) Excelの関数 5 2023/07/07 05:26
- Excel(エクセル) エクセルで月末、月初の判定をしたい。 4 2022/05/18 23:22
- Excel(エクセル) Excel ある日の45日後の計算 及び 3か月後の計算 6 2022/04/05 13:44
- Excel(エクセル) 至急です><Excelの関数を教えてください。 2 2022/03/22 17:56
- Excel(エクセル) エクセルでIF関数中にIFERROR関数を使いたいのですが???? 5 2022/04/08 13:24
- Excel(エクセル) エクセルで一定の数値を超えたとき”一定数”、超えなかったら計算式を入れたい 3 2022/04/05 10:31
- Excel(エクセル) エクセルで、特定のセルの内容を更新すると、別の特定セルに 更新日付が自動的に表示させる方法はあります 1 2022/11/14 21:03
- その他(Microsoft Office) 従業員増減対応で当番種類の増減対応な当番表 21 2022/07/19 07:30
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
【エクセル】オートフィルタで...
-
エクセルで特定の色の数字だけ...
-
ピボットテーブルでは時間の表...
-
VBAで重複する項目を1つにまと...
-
フィルタをしても最下行を常に...
-
ピボットの集計方法「合計」初...
-
EXCEL 重複データの集計の仕方
-
複数のピボットテーブルを一括...
-
アンケートの集計
-
エクセルのピボットテーブルで...
-
エクセルデータの集計
-
エクセル 関数を使った横方向の...
-
エクセルの小計を自動的に色づ...
-
エクセル2010でピボットテーブ...
-
EXCELで増減率を計算したいです
-
Excel : 二通りの合計が合わな...
-
ピボットテーブルのページエリ...
-
SUBTOTALが変わってしまいます。
-
【追加】複数シートを集計した...
-
いい機能だけど、毎回めんどく...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルで特定の色の数字だけ...
-
【エクセル】オートフィルタで...
-
フィルタをしても最下行を常に...
-
ピボットテーブルでは時間の表...
-
VBAで重複する項目を1つにまと...
-
アンケートの集計
-
ピボットの集計方法「合計」初...
-
複数のピボットテーブルを一括...
-
ピボットを更新すると数式が入...
-
ピボットテーブルのページエリ...
-
EXCEL 重複データの集計の仕方
-
エクセル 関数を使った横方向の...
-
エクセルの小計を自動的に色づ...
-
Excelの集計結果だけをコピー貼...
-
エクセル、リソース不足エラー...
-
excelで集計の合計を降順に並べ...
-
いい機能だけど、毎回めんどく...
-
EXCELで増減率を計算したいです
-
ピボットテーブルで同じデータ...
-
Excel : 二通りの合計が合わな...
おすすめ情報