Machin's method by VBA

さて、円周率の計算にマチンの式が使えることが分かったところで、Excel の VBA でマクロを組んでみました。

ここからファイルをダウンロードして、自由に試してください(プラウザ上でファイルを開くことができるかもしれませんが、これはダウンロードして実行することが前提のファイルです)。

ARRAYS と書かれたボックスに適当な数値---初期値は 10 にしてある---を入力して [Calculate] ボタンを押せば、(ARRAY×4)桁分の円周率を計算してくれます。したがって、初期値では 40 桁分の計算をします。(ただし、最後の数桁は誤差を含んでいることに注意してください。)より多くの桁数を計算させたければ、当然ボックスに入力する数値を大きくすればよいのですが、いきなり大きすぎる数値を入れると後悔することになるかもしれません。

後悔しないためにも「残り計算回数」を有効に利用してください。これは、コンピュータがどのあたりを計算しているか知るためのものですが、このカウンタの減る速さを目安に入力する数値を決めればよいでしょう。

コードには、チューンアップの余地が山のようにあることは確かです。それは各自の楽しみということで、是非コードを書き換えてください。ちなみに、この [[ VBA 版 pi の計算 ]] は Windows、Mac OS 上の Microsoft Excel 2000 以降のバージョンで動作を確認しています。