• 締切済み

VBAのプログラムについて

以前、どこかのHPで以下のようなVBAのユーザー関数を見つけました。 最近になって、そのプログラムを見返したのですが、何をしているのかさっぱり覚えていません。 どなたか、教えてください。 そもそも、FEIが何の略なのかまたは何なのかわかりません。 ////////////////////////▼プログラム/////////////////////////////////////////// Function FEI(k As Double, Order As Integer) As Double Dim s As Double Select Case Order Case 1 s = (3969 * k ^ 10) / 65536 + (1225 * k ^ 8) / 16384 + (25 * k ^ 6) / 256 + (9 * k ^ 4) / 64 + k ^ 2 / 4 + 1 Case 2 s = -(441 * k ^ 10) / 65536 - (175 * k ^ 8) / 16384 - (5 * k ^ 6) / 256 - (3 * k ^ 4) / 64 - k ^ 2 / 4 + 1 Case Else End Select FEI = Application.WorksheetFunction.pi * s / 2 End Function /////////////////////////////▲ココまで///////////////////////////////////////////////////////

みんなの回答

回答No.1

見た感じ、実験値とか、何かの係数を求めてる感じですね。πが出てきているあたり、何かの角度とかでしょうか。 Excelでグラフを書いて、多項式近似で近似式を求めてから、それをマクロ化するとかすると、こんなユーザ関数を作る人が昔多かったですね。 ただ、引数にkとか使ってたり、65536とかで割るとかして、あえて係数を整数にしているあたり、もしかしたらさらに古い時代(FORTRANとかの時代)の近似式を持ってきているかもしれません。 ご参考まで。

関連するQ&A

専門家に質問してみよう