３．＜税制改正以後 金型（2年償却）限定＞
2007年4月使用開始以後の金型（２年償却）専用の式である。型扱いの版は私の勤務していた事業は3年償却なのでここには含まれなかった。（償却年数は会社や事業によって異なるので、貴方の会社で確認して下さい）
＜ここで扱う資産の一生＞
取得価額の1/12を取得月から毎月定額償却する。（年をまたいでも、定率法の様に期首簿価を計算してそれに償却率を掛ける事はしない。）→償却を終了する12ヶ月目（取得月から数えて）には備忘価額１円を残す。
＜今回解説する部分＞式の行は６行目に変換しているので注意！
３－①現在未使用
３－②年内指定月 簿価計算
＜式の全体＞
=IF(VALUE(LEFT(AW6,4))=$ER$3,(AZ6-(AZ6/12)*($ES$3-VALUE(RIGHT(AW6,2))+1))*($ES$3-VALUE(RIGHT(AW6,2))<11)*(VALUE(RIGHT(AW6,2))<=$ES$3)+IF($AZ6>=1,1,-1)*($ES$3-VALUE(RIGHT(AW6,2))=11),IF((ABS(BL6)-ABS((AZ6/12)*($ES$3+1)))<0,IF($AZ6>=1,1,-1),(BL6-(AZ6/12)*$ES$3)))
＜上の式を分解して解説＞
使用開始年が今年の物は、＜式の全体＞
=IF(VALUE(LEFT(AW6,4))=$ER$3,(AZ6-(AZ6/12)*($ES$3-VALUE(RIGHT(AW6,2))+1))*($ES$3-VALUE(RIGHT(AW6,2))<11)*(VALUE(RIGHT(AW6,2))<=$ES$3)+IF($AZ6>=1,1,-1)*($ES$3-VALUE(RIGHT(AW6,2))=11),IF((ABS(BL6)-ABS((AZ6/12)*($ES$3+1)))<0,IF($AZ6>=1,1,-1),(BL6-(AZ6/12)*$ES$3)))
＜上の式を分解して解説＞
(AZ6-(AZ6/12)
取得価額－(取得価額/12)X（求める月－使用開始月＋１）→償却した月数
*($ES$3-VALUE(RIGHT(AW6,2))<11)
但し、償却月数が11ヶ月迄のもので、
*(VALUE(RIGHT(AW6,2))<=$ES$3)
計算月以前の使用開始月に限る
+IF($AZ6>=1,1,-1)*($ES$3-VALUE(RIGHT(AW6,2))=11),
償却月数が12ヶ月の物の簿価は1（負の取得の時は－１）にする。（１月使用開始で、12月の簿価を求める場合にしか発生しない）
IF((ABS(BL6)-ABS((AZ6/12)*($ES$3+1)))<0,IF($AZ6>=1,1,-1),
（使用開始が今年以外で、）期首簿価－（取得価額/12）X月数+1（つまり、求める月の次の月の簿価が0未満になる様なら、
１（負の取得では－１）にする。
(BL6-(AZ6/12)*$ES$3)))
そうでない場合は、期首簿価－（取得価額/12）X月数
３－③年内指定月 償却費計算
＜式の全体＞
=IF(VALUE(LEFT(AW6,4))=$ER$3,IF(VALUE(RIGHT(AW6,2))<=$ES$3,AZ6/12*($ES$3-VALUE(RIGHT(AW6,2))<11)+(AZ6-AZ6/12*11-IF($AZ6>=1,1,-1))*($ES$3-VALUE(RIGHT(AW6,2))=11),0),IF(ABS(BL6)-ABS(AZ6/12*($ES$3+1))>=0,AZ6/12,IF(ABS(BL6)-ABS(AZ6/12*($ES$3+1))<0,(AZ6-AZ6/12*11-IF($AZ6>=1,1,-1))*(ABS(BL6)-ABS(AZ6/12*$ES$3)>=0),0)))
＜上の式を分解して解説＞
＜式の全体＞
=IF(VALUE(LEFT(AW6,4))=$ER$3,IF(VALUE(RIGHT(AW6,2))<=$ES$3,AZ6/12*($ES$3-VALUE(RIGHT(AW6,2))<11)+(AZ6-AZ6/12*11-IF($AZ6>=1,1,-1))*($ES$3-VALUE(RIGHT(AW6,2))=11),0),IF(ABS(BL6)-ABS(AZ6/12*($ES$3+1))>=0,AZ6/12,IF(ABS(BL6)-ABS(AZ6/12*($ES$3+1))<0,(AZ6-AZ6/12*11-IF($AZ6>=1,1,-1))*(ABS(BL6)-ABS(AZ6/12*$ES$3)>=0),0)))
＜上の式を分解して解説＞
=IF(VALUE(LEFT(AW6,4))=$ER$3,
使用開始が今年の資産の場合で、
IF(VALUE(RIGHT(AW6,2))<=$ES$3,
使用開始月以降なら、（使用開始月より前の月の値を求めてきたらゼロにする）
AZ6/12*($ES$3-VALUE(RIGHT(AW6,2))<11)
取得価額/12が償却費。但し、経過月数が11ヶ月未満の場合。条件で、上記か下記を選ぶ処理。
+(AZ6-AZ6/12*11-IF($AZ6>=1,1,-1))*($ES$3-VALUE(RIGHT(AW6,2))=11)
12ヶ月目で償却が完了する月の端数調整と、備忘価額を残す処理。取得価額－毎月の償却費Ｘ11ヶ月－１円（負の取得では－１円）が償却費となる。
,0),
使用開始月より前の月の値を求めてきたらゼロにする
以下は使用開始が昨年以前の処理
IF(ABS(BL6)-ABS(AZ6/12*($ES$3+1))>=0,AZ6/12,
もし、求める月の次の月の簿価が”0以上なら取得価額/12が償却費となる
IF(ABS(BL6)-ABS(AZ6/12*($ES$3+1))<0,
もし、求める月の次の月の簿価が”0”未満の場合は、
(AZ6-AZ6/12*11-IF($AZ6>=1,1,-1))*(ABS(BL6)-ABS(AZ6/12*$ES$3)>=0),
取得価額－取得価額/12X11-1（負の取得の時は－１）が償却費となる。但し、後ろに条件式が掛けてあり、求める前月の簿価が1円以上の場合。（償却が完了する最後の月で端数調整を行う）
0)))
それ以外の場合は”0”にする。
３－④2008/12 簿価計算
＜式の全体＞
=IF(VALUE(LEFT(AW6,4))=$ER$3,IF(VALUE(RIGHT(AW6,2))=1,IF($AZ6>=1,1,-1),AZ6-AZ6/12*(12-VALUE(RIGHT(AW6,2))+1)),IF($AZ6>=1,1,-1))
＜上の式を分解して解説＞
＜式の全体＞
=IF(VALUE(LEFT(AW6,4))=$ER$3,IF(VALUE(RIGHT(AW6,2))=1,IF($AZ6>=1,1,-1),AZ6-AZ6/12*(12-VALUE(RIGHT(AW6,2))+1)),IF($AZ6>=1,1,-1))
＜上の式を分解して解説＞
=IF(VALUE(LEFT(AW6,4))=$ER$3,
今年使用開始の資産は、
IF(VALUE(RIGHT(AW6,2))=1,IF($AZ6>=1,1,-1),
もし、１月使用開始なら、12月の簿価は１（負の取得の時は－１）になる
AZ6-AZ6/12*(12-VALUE(RIGHT(AW6,2))+1)),
（1月使用開始以外では）取得価額－（取得価額/12）X12月迄の経過月数
IF($AZ6>=1,1,-1))
今年使用開始以外の簿価は１（負の取得では－１）になる。＜今回解説する部分＞式の行は６行目に変換しているので注意！
３－⑤現在未使用
３－⑥次年度以降 計算簿価→今までの解説で分かると思うので省略
＜式の全体＞
=IF((ABS(ET6)-ABS(($AZ6/12)*(EW$3+1)))<0,IF($AZ6>=1,1,-1),(ET6-($AZ6/12)*EW$3))
＜上の式を分解して解説＞＜式の全体＞
=IF((ABS(ET6)-ABS(($AZ6/12)*(EW$3+1)))<0,IF($AZ6>=1,1,-1),(ET6-($AZ6/12)*EW$3))
=IF((ABS(ET6)-ABS(($AZ6/12)*(EW$3+1)))<0,・・・12ヶ月目以降
IF($AZ6>=1,1,-1),
(ET6-($AZ6/12)*EW$3))・・・11ヶ月目まで
３－⑦次年度以降 償却費計算
＜式の全体＞
=IF(ABS(ET6)-ABS($AZ6/12*($EW$3+1))>=0,$AZ6/12,IF(ABS(ET6)-ABS($AZ6/12*($EW$3+1))<0,($AZ6-$AZ6/12*11-IF($AZ6>=1,1,-1))*(ABS(ET6)-ABS($AZ6/12*($EW$3))>=0),0))
＜上の式を分解して解説＞＜式の全体＞
=IF(ABS(ET6)-ABS($AZ6/12*($EW$3+1))>=0,$AZ6/12,IF(ABS(ET6)-ABS($AZ6/12*($EW$3+1))<0,($AZ6-$AZ6/12*11-IF($AZ6>=1,1,-1))*(ABS(ET6)-ABS($AZ6/12*($EW$3))>=0),0))
=IF(ABS(ET6)-ABS($AZ6/12*($EW$3+1))>=0,
もし、求める月の次の月の簿価が0円以上なら（11ヶ月目までの条件）
$AZ6/12,
取得価額/12
IF(ABS(ET6)-ABS($AZ6/12*($EW$3+1))<0,
もし、求める月の次の月の簿価が0円未満なら（下の条件式と合わせて12ヶ月目を検出）
($AZ6-$AZ6/12*11-IF($AZ6>=1,1,-1))
取得価額－取得価額/12X11－１円（負の取得では－１円）・・・１円（－１円）の備忘価額を残す処理
*(ABS(ET6)-ABS($AZ6/12*($EW$3))>=0)
＊（条件式）→求める月の簿価が0円以上の場合償却を完了する最後の月を検出
0))
それ以外はゼロにする。（求める月の簿価がマイナスの場合＝13ヶ月目以降）
＜各月簿価と誤差の関係解説＞
経理のコンピュータは切り捨てで計算しており、ダウンロードしたデータを通常四捨五入で処理しているExcelで処理する時は端数の誤差に注意が必要でした。その例です。
経理のコンピュータは切り捨てで計算しており、ダウンロードしたデータを通常四捨五入で処理しているExcelで処理する時は端数の誤差に注意が必要でした。その例です。
使用開始 償却終了の前月 償却終了月
2008/12 2009/10 2009/11
次の年の期首簿価
取得価額 期末簿価 簿価 簿価\322,934 \296,023 \ 26,913 \ 1
月当り償却費 償却費 償却費（端数調整を行う）
\ 26,911 \
26,911 \ 26,912小数点以下切捨て
＜求める月と次の月の簿価を試算して、償却最終月を見つける原理＞
期首簿価－［取得価額/12］Ｘ月数 で月数を増やしていった時の関係└→［ ］中は切り捨て処理を示す
取得価額が12で 11ヶ月目 12ヶ月目 13ヶ月目
割り切れる場合 ［取得/12］ ゼロ マイナス割り切れない場合 ［取得/12］ 端数 マイナス
└次の月の簿価を試算すると、ゼロ以上
└次の月の簿価を試算するとゼロ未満
で、今の月はゼロ以上
３－⑧次年度以降 12月計算簿価
＜式の全体＞
=IF($AZ6>=1,1,-1)
＜上の式を分解して解説＞＜式の全体＞
=IF($AZ6>=1,1,-1)
=IF($AZ6>=1,1,-1)
前年取得分の12月簿価は全て１円（負の取得の場合は－１円）になる。一番使用開始の遅い前年12月の物でも、今年11月で償却完了となり、12月は常に簿価1円（又は－１円）となる。
以上、最後まで読んで下さって有り難うございました。現有資産の償却費は特例とかが有って、会社によってもまちまちですが、これまで解説してきた原理を理解戴ければ、関数のみで高速に自分の会社用にアレンジできると思います。
＜次回予告＞
次回は、固定資産台帳の比較やExcelファイルの内容比較の方法について解説予定です。
例えば、
①先月の固定資産台帳と今月のを比較し、移管されて増えた固定資産や廃却で減ったを見つける
②複数の人に同時にExcelファイルをメールで送り更新して貰ったが、どこが直されたかを見つける
こんな事が関数でできます。お楽しみに・・・
＜次回予告＞
次回は、固定資産台帳の比較やExcelファイルの内容比較の方法について解説予定です。
例えば、
①先月の固定資産台帳と今月のを比較し、移管されて増えた固定資産や廃却で減ったを見つける
②複数の人に同時にExcelファイルをメールで送り更新して貰ったが、どこが直されたかを見つける
