- ベストアンサー
エクセルVBAとワークシート関数の違いとは？
- エクセルVBAとワークシート関数の違いについて説明します。
- A1セルからA100セルにはすべて1%が入力されており、BIセルには=SUM(A:A)という数式が入っています。BIセルには100％が表示されていますが、標準モジュールでB1と比較するとFalseが返ってきています。Val関数を使用するとTrueが返ってくるのはなぜでしょうか？
- どなたか詳しい方が教えていただけませんか？
- emaxemax
- お礼率100% (857/857)
- Excel（エクセル）
- 回答数2
- ありがとう数2
- みんなの回答 （2）
- 専門家の回答
質問者が選んだベストアンサー
本当に正確・詳細な仕様（内部計算）のこととなると、Microsoft の社員でなければ説明できないかもしれませんが、分かっていることについて書きます。 Excel では、小数の計算をするとき、誤差がある程度小さい場合に、自動的にそれを除去するという機能があります。申し訳ないですが、詳しい発動条件は説明できません。それらしいケースがあるのは確かだと分かっているだけです。 参考 URL を参考にしてください。ページ中、5 ~ 6 割くらい進んだ位置に、「実は、エクセルには自動的に……」と述べられています。できればページ全部を読んでみることをお勧めします。 ＞=ROUND(SUM(A:A),100) としても……が、TRUEを返すのはなぜでしょう？ 先ほどの Val 関数というのは丸めることが目的の関数ではないわけですが、結果として、数値から誤差が取り除かれていました（いたようでした）。同様に ROUND も、何桁であろうとも、関数を通すだけで誤差を取り除いてしまうと考えるほかないのではないかと思います。 他のセルの Value プロパティに、SUM による誤差を含む計算結果を放り込むということをしても、誤差は消えているようです。そこから更に 1 を引いて 10^16 を掛けても、結果は 30 桁、ゼロ行進です。 一般には、このような微小な差分や関数の性質まで含めて考えるとなると、ワークシート上の数式と VBA プロシージャでの計算の双方で、同様な処理を行ったとして、両者の挙動が一致する保証、あるいは一致しない保証は、ないと思います。 誤差が発生する可能性の有無が不明な場合は、参考 URL でも言及されていることですが、適度な桁数で ROUND しておけということですね。発生し得るのは小数の場合のみですから、整数化しておけば安心です。ただし整数ではなく小数点以下に何桁か残す場合の、ROUND による計算結果も誤差を含む場合があるという問題が実はありますが。 ＞ますますわからなくなってきました・・・・・。 正直、キリがなくなりますんで、あまり深く考えないことをお勧めします。ご関心があるようなら、追々研究していくという方針がよろしいかと。
その他の回答 (1)
- MarcoRossiItaly
- ベストアンサー率40% (454/1128)
どこかのセルに、=(b1-1)*10^14 と記入してみてください。計算誤差が発生していることが分かります。小数を交えた計算では、こういうことが起こり得ます。 B1 セルの数式を =round(SUM(A:A),5) といった感じに丸めるように書き換えて、もう一度 MsgBox Range("B1").Value = 1 を実行してみてください。今度は True になると思います。 VBA の Val 関数が型変換の過程で、丸めてしまうのですかね。しかしワークシート関数の VALUE で SUM の戻り値を処理しても、True にはなりませんでした。
お礼
ありがとうございます。 =(B1-1)*10^14 でエクセルの計算誤差が見えました。 0.0666133814775094 が返りました。 ただ、それならなんでワークシート上では =B1=1 が、TRUEを返すのでしょう？ また、計算誤差部分を丸めないように =ROUND(SUM(A:A),100) としても MsgBox Range("B1").Value = 1 が、TRUEを返すのはなぜでしょう？ ますますわからなくなってきました・・・・・。
お礼
ありがとうございます。 参考URL読ませていただきました。 小数点以下も扱うので、今回はB1セルの数式を =Round(SUM(A:A),8) として対応しました。 よいお年をお迎えください。