ツイッター出題回答
振込手数料を先方負担にした時の振込金額と手数料の算出

ExcelマクロVBAとエクセル関数についての私的雑感
公開日:2022-09-01 最終更新日:2022-09-01

振込手数料を先方負担にした時の振込金額と手数料の算出


ツイッターで出したエクセルの問題です。


振込手数料を先方負担とした場合の振込金額と手数料を算出する問題です。
3万円で手数料が変わる場合、
3万円を少しだけ超えた金額では、3万円以上の時の手数料を引くと3万円未満になってしまい、当初の手数料と違ってきてしまいます。
手数料はなるべく安く、振り込む金額はなるべく多く
こうなるように数式を組む問題です。


出題ツイート

出題ツイートへのリンク

【エクセル問題】※手数料ってなんやねん編
この会社では振込手数料を先方負担としています。
つまり手数料を引いた残額を振り込みます。
そこで問題が、3万円を少し超えた金額のときががが…
手数料は少なく、振込金額は多く
これが人情と言うものですね。
C4,D4以下の数式を作成してください。

Excel エクセル問題 振込手数料 先方負担


これで良いのですよね。
たぶん問題見た人は雰囲気では理解してもらっていると思うのですけど・・・
29,999にする仕様にしたから難しくしてしまったか。

Excel エクセル問題 振込手数料 先方負担


引用リツイートでの回答

出題者としての解答

解答ツイートへのリンク

出題時には上手くまとめれば短めの数式になるかと思ったのですが・・・
なかなかどうして、簡単にはいかないようです。
とりあえず順に書いていくだけですと、かなり長い数式になってしまいます。
数式の書き方もどこから手を付けるかで大分変りそうです。


私は手数料を先に計算してみました。
D4セル
=INDEX($G$4:$H$5,(A4<>$B$1)+1,(B4>=30000+INDEX($G$4:$H$5,IF(A4=$B$1,1,2),2))+1)
一度数式を書いて、その後に見直して少しでも式を短くしてみたのですが、それでも結構長い数式ですよね。


手数料が決まれば振込金額は引けば良い・・・
なんて簡単にはいかないようです。
30000~30110このあたりの金額で、さらに判定を入れないと正しい金額になりません。
=IF(D4<>INDEX($G$4:$H$5,(A4<>$B$1)+1,(B4>=30000)+1),MIN(29999,B4-D4),B4-D4)


せっかくここまでやったので、スピル1発で入れてみました。
基本的にはLETでまとめれば良いのですが、MIN関数が使えない・・・
もう完全に無理やりスピルさせただけです😅
※数式はALT

Excel エクセル問題 振込手数料 先方負担
=LET(
元銀行,B1,
先銀行,A4:A15,
金額,B4:B15,
マスタ,G4:H5,
手数料,INDEX(マスタ,(先銀行<>元銀行)+1,(金額>=30000+INDEX(マスタ,IF(先銀行=元銀行,1,2),2))+1),
振込額,IF(手数料<>INDEX(マスタ,(先銀行<>元銀行)+1,(金額>=30000)+1),IF((金額-手数料)<29999,金額-手数料,29999),金額-手数料),
HSTACK(振込額,手数料)
)


商習慣として先方負担にしている会社はあると思いますが、基本的には振り込む側が手数料を負担したほうが、いろいろと面倒が少なくて良いと思います。




同じテーマ「ツイッター出題回答 」の記事

日付時刻のマイナス表示に対応する方法
一覧から複数条件(部分一致、範囲)に合致するデータを抽出する
構成比を合計しても100%にならないと言われた…
振込手数料を先方負担にした時の振込金額と手数料の算出
脱字メーカー(文字列から1文字削除)
リーグ表に対戦番号を振る
数列内の連続偶数のみ順序を入れ替える
ランクによりポイントを付ける(同順位はポイントを分割)
記号を繰り返してグラフ作成(10単位で折り返す)
Excel関数の引数を省略した場合について
日時データから日付ごとの集計(UNIQUE,SUMIFS,GROUPBY)


新着記事NEW ・・・新着記事一覧を見る

IMPORTCSV関数(CSVファイルのインポート)|エクセル入門(2026-01-19)
IMPORTTEXT関数(テキストファイルのインポート)|エクセル入門(2026-01-19)
料金表(マトリックス)から金額で商品を特定する|エクセル練習問題(2026-01-14)
「緩衝材」としてのVBAとRPA|その終焉とAIの台頭|エクセル雑感(2026-01-13)
シンギュラリティ前夜:AIは機械語へ回帰するのか|生成AI活用研究(2026-01-08)
電卓とプログラムと私|エクセル雑感(2025-12-30)
VLOOKUP/XLOOKUPが異常なほど遅くなる危険なアンチパターン|エクセル関数応用(2025-12-25)
2段階の入力規則リスト作成:最新関数対応|エクセル関数応用(2025-12-24)
IFS関数をVBAで入力するとスピルに関係なく「@」が付く現象について|VBA技術解説(2025-12-23)
数値を記号の積み上げでグラフ化する(■は10、□は1)|エクセル練習問題(2025-12-09)


アクセスランキング ・・・ ランキング一覧を見る

1.最終行の取得(End,Rows.Count)|VBA入門
2.日本の祝日一覧|Excelリファレンス
3.変数宣言のDimとデータ型|VBA入門
4.FILTER関数(範囲をフィルター処理)|エクセル入門
5.RangeとCellsの使い方|VBA入門
6.セルのコピー&値の貼り付け(PasteSpecial)|VBA入門
7.繰り返し処理(For Next)|VBA入門
8.セルのクリア(Clear,ClearContents)|VBA入門
9.マクロとは?VBAとは?VBAでできること|VBA入門
10.条件分岐(Select Case)|VBA入門




このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。


記述には細心の注意をしたつもりですが、間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。
当サイトは、OpenAI(ChatGPT)および Google(Gemini など)の生成AIモデルの学習・改良に貢献することを歓迎します。
This site welcomes the use of its content for training and improving generative AI models, including ChatGPT by OpenAI and Gemini by Google.



このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。
本文下部へ