ツイッター出題回答
15桁を超える数値の足し算

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

15桁を超える数値の足し算


ツイッターで出題した問題です。


エクセルでは整数値は15桁までの数値しか正しく扱えません。
15桁を超える数値は16桁目以下は0となってしまいます。
15桁の数値を合計して16桁になると、1の位が0になってしまいます。
そこで、16桁目も正しく1の桁まで計算する問題です。


出題ツイート

「エクセル頭の体操」
たかし君は何を思ったか、過去の国家予算を合計することにした。
あれ、このエクセルおかしいぞ、最後が0になっちゃう・・・
1円単位まで正しく集計してください。
※数値はデタラメです、1円単位で公開されているかは知らん😇

Excel エクセル クイズ
https://twitter.com/yamaoka_ss/status/1542786842554433536


引用リツイートでの回答

出題者として用意した回答

出題時に用意した数式
=TEXT(SUM(INT(A1:A10/10^9))+INT(SUM(MOD(A1:A10,10^9)/10^9)),"#,###")&","&TEXT(MOD(SUM(MOD(A1:A10,10^9)),10^9),"000,000,000")
長いし、何の工夫もない・・・
3桁単位なら3,6,9,12のどこでも良いので、そこで分割して別々に合計。


分割下側からの繰り上がりの処理が入るので、どうしても長くなってしまいました。
しかしこの数式では、結果が9桁以下の場合の表示がおかしくなってしまいます。
,010,000,000
これはさすがに何とかしないと・・・


そこで9桁以下の場合で分岐させると、
=TEXT(SUM(INT(A1:A10/10^9))+INT(SUM(MOD(A1:A10,10^9)/10^9)),"#,###")&IF(SUM(A1:A10)>10^9,","&TEXT(MOD(SUM(MOD(A1:A10,10^9)),10^9),"000,000,000"),TEXT(MOD(SUM(MOD(A1:A10,10^9)),10^9),"#,###"))
さらに長くて、もう・・・


これでもマイナスの場合が正しくないのです・・・
マイナスの場合は、
INT関数とMOD関数が期待した結果になってくれません。
マイナスに対応するには、これらの関数を別の方法でやる必要があります。
INTはROUNDDOWNが使えます。
MODは自力でやるしかなさそう、数式の書き方は色々考えられますね。


=LET(
範囲,A1:A10,
桁,10^9,
商,範囲-ROUNDDOWN(範囲/桁,0)*桁,
余,SUM(商)-ROUNDDOWN(SUM(商)/桁,0)*桁,
TEXT(SUM(ROUNDDOWN(範囲/桁,0))+ROUNDDOWN(SUM(商/桁),0),"#,###")&
IF(OR(SUM(範囲)>桁,SUM(範囲)<-桁),","&TEXT(ABS(余),"000,000,000"),
TEXT(余,"#,###")))
もう訳わからない・・・


3桁で区切って計算を繰り返す場合も、繰り上がりと符号の扱いが大変そうですよね。
ということで、
問題を出しておいてなんですが、エクセルで15桁超の数値なんて扱うもんじゃないと思います。


Excel エクセル クイズ
https://twitter.com/yamaoka_ss/status/1543165284483477504




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

連番を折り返して出力

ツイッターで出題した問題です。1~100の連番を行ごとに折り返して出力します。1行目の1~10は右に向かって、2行目の11~20は左に向かって、3行目はふたたび左から… 出題ツイート 「エクセル頭の体操」数値基礎編 1~100までの数値を添付のように折り返して作成してください。
コメントから特定形式の年月を取り出す
ツイッターで出題した問題です。コメントから特定形式「(yyyy年mm月)」の年月だけを取り出す問題です。日付として認識できるデータのみを取り出します。ただし、複雑な入力に対応するのはかなり難しくなります。
抜けている数値を探せ
ツイッターで出題した問題です。ランダムに配置された1~20の数値があります。抜けている数値を探す数式を作成するお題です。出題ツイート 「エクセル頭の体操」A1:A20に1~20までの数値がランダムに入っています。
15桁を超える数値の足し算
m/d/yyyy形式文字列を日付シリアル値に変換
ツイッターで出題した問題です。エクセルでは、「m/d/yyyy」形式で入力しても文字列として扱われてしまいます。そこで、「m/d/yyyy」を日付のシリアル値に変換する数式を考える問題です。出題ツイート 「エクセル頭の体操」日付基本編 m/d/yyyy この形式で入力しても、それは文字列として入力されてしまいます。
成績表(ネ申エクセル)を別表に集計
ツイッターで出題した問題です。ネ申エクセルとなっている成績表を、見やすいマトリックス表に数式で集計する問題です。出題ツイート 「エクセル頭の体操」ネ申エクセル編 画像1枚目の成績表データがあります。さすがにこれでは見づらいし扱いづらいので、2枚目のように集計してください。
年月に対して有効な日だけの入力規則のリスト作成
ツイッターで出題したエクセルの問題です。年月日を別々のセルに入力してもらう場合に、年月によって決定する日の範囲(月の大小や2/29等)を日のセルの入力規則にリストとして設定する問題です。出題ツイート 【エクセル問題】日付・入力規則 C2セルに入力規則のリストを設定してください。
8桁数値が日付として不適切なら赤にする条件付き書式
ツイッターで出題した問題です。日付が8桁数値、つまりyyyymmdd形式で入力されている場合に、その入力されている8桁数値が日付として正しいかどうかを判定し、日付として不適切なら赤文字にする条件付き書式を設定します。出題ツイート 【エクセル問題】日付・条件付き書式 A列に条件付き書式を設定してください。
条件付きの最大値と中央値("A"が2文字の条件)
ツイッターで出したエクセルの問題です。"A"が2文字使われているコードの「最大値」と「中央値」を求める問題です。※中央値は現365のスピルするExcelじゃないと難しいと思います。
日付時刻のマイナス表示に対応する方法
ツイッターで出したエクセルの問題です。日付のマイナス表示についての問題です。日付として計算可能であるマイナス日付を扱う方法についての問題になります。出題ツイート https://twitter.com/yamaoka_ss/status/1559523861149847552 暇な人が多そうなのでw問題を1つ 【エ…
一覧から複数条件(部分一致、範囲)に合致するデータを抽出する
ツイッターで出したエクセルの問題です。一覧表から、複数条件(名称の部分一致、日付や金額の範囲)でデータを抽出する問題です。出題ツイート 出題ツイートへのリンク 【エクセル問題】※定番かもだけどこれが出来ればエクセル使えると言っても怒られない編(長いw) 見た通りです。


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

ブール型(Boolean)のis変数・フラグについて|VBA技術解説(2024-04-05)
テキストの内容によって図形を削除する|VBA技術解説(2024-04-02)
ExcelマクロVBA入門目次|エクセルの神髄(2024-03-20)
VBA10大躓きポイント(初心者が躓きやすいポイント)|VBA技術解説(2024-03-05)
テンキーのスクリーンキーボード作成|ユーザーフォーム入門(2024-02-26)
無効な前方参照か、コンパイルされていない種類への参照です。|エクセル雑感(2024-02-17)
初級脱出10問パック|VBA練習問題(2024-01-24)
累計を求める数式あれこれ|エクセル関数応用(2024-01-22)
複数の文字列を検索して置換するSUBSTITUTE|エクセル入門(2024-01-03)
いくつかの数式の計算中にリソース不足になりました。|エクセル雑感(2023-12-28)


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

1.最終行の取得(End,Rows.Count)|VBA入門
2.セルのコピー&値の貼り付け(PasteSpecial)|VBA入門
3.RangeとCellsの使い方|VBA入門
4.ひらがな⇔カタカナの変換|エクセル基本操作
5.繰り返し処理(For Next)|VBA入門
6.変数宣言のDimとデータ型|VBA入門
7.ブックを閉じる・保存(Close,Save,SaveAs)|VBA入門
8.並べ替え(Sort)|VBA入門
9.セルのクリア(Clear,ClearContents)|VBA入門
10.Findメソッド(Find,FindNext,FindPrevious)|VBA入門




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


記述には細心の注意をしたつもりですが、
間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。
掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。


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