![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?e8efa67)
![](http://oshiete.xgoo.jp/images/v2/common/profile/M/noimageicon_setting_15.png?e8efa67)
お世話になります。
初めて質問させていただきます。
下記のように、作家さんへ支払った原稿料の明細を、
作家別、さらに支払日別にグループ化し、
各支払日のグループフッターで計算した源泉所得税を
作家のグループフッターで合計したいのですが、計算されません。
=============『詳細』
作家 書籍名 支払日 原稿料
=============『支払日グループフッター』
="原稿料計"__原稿料合計 ←=Sum([原稿料])
="源泉税"__源泉税 ←=[原稿料計]*0.1
=============『作家グループフッター』
="原稿料総計"__原稿料合計 ←=Sum([原稿料])
="源泉税総計"__源泉税合計 ←=Sum([源泉税])
以前に似た質問をされた方がいらしたのですが
その際の解決方法を試してみてもうまくいきませんでした。
試してみたのは、下記の方法です。
作家グループフッターのフォーマット時イベントプロシージャに
書き込みました。
----------------
Private Sub グループフッター
Tmp = Tmp + Me.源泉税
Me.源泉税総計 = Tmp
-----------------
この方法だと、源泉税総計の欄に、最後の支払日グループの
源泉税の額だけがが表示されてしまいました。
つたない説明で申し訳ありませんが
どなたか分かる方がいらっしゃいましたら
よろしくお願いします。
No.3ベストアンサー
- 回答日時:
>各支払日のグループフッターで計算した源泉所得税を
>作家のグループフッターで合計したいのですが、計算されません。
結局は、原稿料総計*0.1になるのでは?
元のテーブルのデータから集計できるので、
支払日のグループフッターの集計を利用する必要はないかも。
=============『作家グループフッター』
="原稿料総計"__原稿料合計 ←=Sum([原稿料])
="源泉税総計"__源泉税合計 ←=Sum([原稿料])*0.1
>作家グループフッターのフォーマット時イベントプロシージャ
念のため、このイベントに関する注意点。
このイベントプロシージャは複数回呼ばれる可能性があります。
FormatCountプロパティのヘルプをご覧下さい。
ヘルプには、FormatCount プロパティで何回呼ばれたか調べられる
様なことが書いてありますが、たまに不可解な現象が発生します。
http://www.penhagi.com/access/ota2003/3133.htm
このイベントプロシージャの、呼ばれる順序や回数を、
把握するのは難しいです。
下記のような処理で、正しく計算できる場合が多いですが、
私自身は信用していないので、この方法は使いません。(^^;
Dim Tmp As Variant
Private Sub 作家グループフッター_Format(Cancel As Integer, FormatCount As Integer)
If FormatCount = 1 Then
Me.源泉税総計 = Tmp
Tmp = 0
End If
End Sub
Private Sub 支払日グループフッター_Format(Cancel As Integer, FormatCount As Integer)
If FormatCount = 1 Then
Tmp = Tmp + Nz(Me.源泉税)
End If
End Sub
No.4
- 回答日時:
#1です。
> 結局は、原稿料総計*0.1になるのでは
数学的にはそうだと思いますが、円未満切り捨てを考えると
合計値の0.1だと微妙に異なることもあり得ます。
> このイベントプロシージャは複数回呼ばれる可能性があります。
確かにそうですね。
基本的に源泉徴収は書籍別、日別に算出されるべきものと考えられるので、
いっそのこと、原稿料テーブルからクエリを作成し、
このクエリで、Int(原稿料*0.1)の源泉税額フィールドを作りだし、
このクエリをレポートのレコードソースとしたうえで、
この源泉税額を各グループフッタで合計させた方が安全かも...
皆様早速のご回答本当にありがとうございます。
おかげさまで正しく計算することができました!
vizzarさんのご回答のとおりやってみたところ、
作家グループフッターだけが次のページになった際、
正しく計算されませんでした。
そこでvenzouさんのご回答とおりやってみたところ、上記の現象も出ず正しく計算されました。
やはり
> このイベントプロシージャは複数回呼ばれる可能性があります。
が関係しているのでしょうか。
また源泉税の算出の方法ですが、私の説明が足りずに申し訳ございません。
支払日ごとに算出するのですが、その際支払金額が100万円を超えている場合は、100万円に対しては0.1、100万円を越える部分には0.2を
かけることになっています。
そのため作家グループフッターの原稿料合計に0.1を掛けるわけにはいきませんでした。
お二人とも本当にありがとうございました。
No.1
- 回答日時:
> この方法だと、源泉税総計の欄に、最後の支払日グループの
> 源泉税の額だけがが表示されてしまいました。
それは当たり前です。
各日付のグループフッタで積算していないからです。
1.変数Tempをレポートの定義部で宣言する。
2.日別のレポートフッタのフォーマット時イベントプロシージャに、
Tmp = Tmp + Me.源泉税
3.作家別のレポートフッタのフォーマット時イベントプロシージャに、
Me.源泉税総計 = Tmp
Tmp = 0
で、如何でしょう。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- 確定申告 出前館とUber Eatsの青色申告に、支払調書にあたる書類の添付は必要でしょうか。 毎回振込された 1 2023/02/12 11:31
- 減税・節税 源泉給料 乙の支払 3 2023/03/12 17:27
- 所得税 確定申告の収入金額欄、源泉徴収額の記入方法について 1 2023/03/12 23:03
- 財務・会計・経理 個人に講演に対する謝金を支払ったときの源泉徴収の会計処理 3 2022/06/18 11:43
- 財務・会計・経理 3月社会保険料が改定されました 3月1日〜3月31日を翌月25日に支払いしてる場合 社会保険料は、3 2 2023/04/07 09:59
- その他(年金) 離婚に伴う企業年金分割支払いについてお尋ねします 3 2023/01/15 13:21
- 所得税 源泉徴収について 1 2022/05/08 13:56
- その他(税金) 給与所得の源泉徴収票の欄の中のどの項目が年収に相当するのでしょうか? 5 2023/04/17 17:40
- 印紙税 確定申告について 3 2022/08/02 23:59
- 個人事業主・自営業・フリーランス 個人事業主の源泉徴収必須の職種での確定申告についての質問です。売上に記載する額は源泉徴収される前の、 1 2023/01/22 12:46
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
運送会社が商品を破損してしま...
-
だれか税作文みせてくれる人い...
-
消費税の区分について
-
経理です。車検の時の勘定科目...
-
公文書公開に伴うコピー料金等
-
アマチュア団体の出演謝礼に税...
-
印紙税額を求める関数
-
消費税計算で誤差が生じるのは...
-
市民税の督促手数料は非課税と...
-
DIY 小屋の登記と固定資産税
-
建設業の「安全協力費」の会計...
-
建設業者が工事保険をもらった...
-
運転代行の消費税について教え...
-
税務調査 追徴課税500万! い...
-
レシートで消費税率の間違いを発見
-
アメリカから革ジャンを通販で...
-
使用貸借契約の印紙税
-
市役所と消費税
-
輸入税 import taxとはどうい...
-
インボイス制度
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
運送会社が商品を破損してしま...
-
消費税の区分について
-
建設業の「安全協力費」の会計...
-
公文書公開に伴うコピー料金等
-
経理です。車検の時の勘定科目...
-
市役所と消費税
-
自動車部品を個人輸入した際の...
-
印紙税額を求める関数
-
被課税とは
-
アマチュア団体の出演謝礼に税...
-
エクセルで課税、非課税を自動...
-
建設業者が工事保険をもらった...
-
消費税計算で誤差が生じるのは...
-
収入印紙は、必要ないのかな?
-
市民税の督促手数料は非課税と...
-
JPYで表記されている金額について
-
消費税について教えてください
-
税務調査 追徴課税500万! い...
-
講師代をもらって領収書を書く...
-
累積課税合計とは何ですか?
おすすめ情報