2013年10月10日木曜日

VBAで気圧高度

Excel2007のVBA
Officeファミリはかなり昔から使ってますが
VBAなる機能を初めて使いました

気圧から高度に変換する関数です

Function Alt(気圧 As Double, 温度 As Double, 海面気圧 As Double) As Variant
    Dim h As Double
    h = (1013.25 / 海面気圧) ^ (1 / 5.256) * ((海面気圧 / 気圧) ^ (1 / 5.256) - 1) * (温度 + 273.15) / 0.0065
    Alt = h
End Function

一旦変数を書いてから関数に代入する必要があるらしい

あと冪乗計算がPowerじゃないってのにハマった
Cじゃ^記号はXORだし
Excelだって冪乗計算はPowerを使うのに
VBAは^で冪乗計算になる

VBA 便利のような… 便利じゃないような…

0 件のコメント:

コメントを投稿