みんなの「教えて(疑問・質問)」にみんなで「答える」Q&Aコミュニティ

こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

締切り済みの質問

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
/////////////////////////////▲ココまで///////////////////////////////////////////////////////

投稿日時 - 2018-12-23 12:22:14

QNo.9570569

すぐに回答ほしいです

このQ&Aは役に立ちましたか?

0人が「このQ&Aが役に立った」と投票しています

回答(1)

ANo.1

見た感じ、実験値とか、何かの係数を求めてる感じですね。πが出てきているあたり、何かの角度とかでしょうか。

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

ご参考まで。

投稿日時 - 2018-12-23 18:19:03

あなたにオススメの質問