エクセルで、源泉税額を計算する

税務署から配布される、源泉徴収月額表をもとに、所得税額を計算している人も多いと思います。「電子計算機等を使用して、源泉徴収税額を計算する方法を定める大蔵省告示」という、文書が告示されています。これを元に、エクセルで税額を自動計算させてみましょう。

平成25年1月に改正された、告示は以下のようになっています。別表1は変更ありません。　　（更新：H25.1.15　２５年度用です。）

別表第一（給与所得控除額の計算式）

別表第二（扶養控除の計算）

別表第三（月額源泉税額の計算）　　平成25年1月より変更 　（復興特別所得税に変更され、増税になりました。）

社会保険料等控除した金額から、別表第一・第二で計算した額を控除し、この金額に対して別表第三で税額を計算します。なお、別表第一は１円未満切り上げ・別表第三は１０円未満を四捨五入という注があります。

シート関数ｉｆで計算するには（この先の式は、画像なので修正してありません。別表3の赤数字に変更してください。）

条件分岐が６つと６つの組み合わせになるので、これを１行のｉｆ文に書くのは無理です。そこで２つに分け、控除金額を計算してから、源泉徴収額を計算することにします。

Ａ１のセルに、社会保険等控除後の給与額を、Ｂ１に扶養家族数（配偶者を含む）があるものとします。そこで、Ｃ１には別表１・２で控除金額を計算する式を入れます。

＝ｉｆ（Ａ１＜１３５４１７，５４１６７，そうでないとき）の形になりますが、「そうでないとき」もｉｆ（）文です。ここからはｉｆの前の＝は要りません。

　「そうでないとき」は、Ａ１が１５００００円より小さいときは、Ａ１の４０％なので、ｉｆ（Ａ１＜１５００００，Ａ１＊０．４，そうでないとき２）が入ります。

＝ｉｆ（Ａ１＜１３５４１７，５４１６７，ｉｆ（Ａ１＜１５００００，Ａ１＊０．４，そうでないとき２））となり、
最後の）は、２重になりますが、さらに「そうでないとき２」もｉｆ（）文になり「そうでないとき３」が入り、結局「そうでないとき４」までの、５重の）で閉めることになります。

この式は１３８文字になっており、これに更に４つの分岐をｉｆ文で記述すると、制限の２５５文字を越えてしまいます （この256文字制限は、エクセル95までで97以降は1024文字まで使えます。）。ただし、これでは不十分なので、もう少し追加します。

１円未満を切り上げて、整数にする

これには、ＲＯＵＮＤＯＵＰ関数を使います。上のｉｆ文全体を、=ＲＯＵＮＤＵＰ（ｉｆ文，０）とします。

更に、扶養家族分を加えることにします。自分の分があるので、＋３１６６７＊（Ｂ１＋１）を最後に追加します。これで、１６２文字の式になりました。式は、文字数の他（）の数・参照座標の数（３０個まで*この制限は97以降も同じです）で制限を受けます。

税額計算の式

これも、ｉｆ文で分岐させますが、こちらも５重で終わります。Ｄ１に＝Ａ１−Ｃ１を書き、ここに控除後の給与額があるものとします。

更に、「１０円未満四捨五入」という条件を加えます。これには、ＲＯＵＮＤ関数を使います。ＲＯＵＮＤ関数は四捨五入・ＲＯＵＮＤＵＰ関数は切り上げ・ＲＯＵＮＤＤＯＷＮ関数は切り下げです。いずれも、桁数を２番目の引数に指定しますが、正数が小数点以下・負数が小数点以上の桁数です。１０円の位に四捨五入は−１を指定します。

月額表の税額との違い

簡易計算のための月額表は、いくら以上・いくら未満で段階を付けてあります。実際はその中間の数字で表が作られているので、こちらの計算式の方が正しいものです。月額表と全く同じにしたければ、もう一つｉｆ関数でランクの中間値に換算する式を作ります。しかし、この方が大蔵省の指定通りの税額です し、年末調整での誤差調整は少なくなります。。

マクロ関数への応用

この関数をまとめて、ひとつの関数にすることもできます。この場合は、モジュールシートにマクロ関数を記述します。詳細は、こちらを見て下さい。ｉｆ関数とともに、サンプルのファイルがあります。ダウンロードして、下さい。

賞与の源泉計算について

前月の社会保険料控除後の給与額から、賞与に乗ずる税率を求める表があります。これを、エクセルで自動計算させたいという場合、換算表をif関数で実現するのは困難です。表の数値は、何らかの数式の結果ではなさそうです。そこで、この表を丸ごとデータとしてシートに書き込み、給与の額と扶養家族数から読み取るようにします。具体的には、MATCH関数を使いますが、その他INDEX関数・INDIRECT関数・ADDRESS関数を駆使します。「テーブルから参照する」を見てください。

乙欄の源泉税額計算について

作って見ました。こちらをご覧下さい。

●表紙へ