サンプルデータ
ExcelのデータをAccessに貼り付ける
で、Excelで形を整えた源泉徴収税額表をAccessのテーブルに貼り付けました。
AccessがインストールされていないPCについては、ランタイム版をどうぞ。
Accessは無料で使うことができます。 Runtimeについて
折角源泉徴収税額表をAccessに作ったので、これを簡単にですが、給与の金額に当てはめてみます。
次のようにテーブルを用意します。数値型は、無難に長整数型にして下さい。
クエリ「源泉計算」を実行すると次のように、給与と扶養親族の数を入力すると、それらに該当する税額が
表示されます。
フィールド源泉税額のところが肝になります。
源泉税額: Int(DLookUp(“源泉税額”,”源泉徴収税額表”,”[以上]<=” & [給料] & “” & ” and ” & “[未満]>” & [給料] & “” & ” and ” & “[扶養親族]=” & [扶養] & “”))/1
Dlookupは条件の今回は給与の金額が2つに加え、扶養親族の数も条件になります。
全部で3つの条件で指定するのでやや複雑です。この説明は後ほど。