Excel VBAで、関数は参照渡し(ByRef)にデフォルトでなっているが、その引数を型キャストして呼び出すと変更されない、ということに気付かなくてバグって半日潰した！

かなり昔に作ったExcel VBAの数値計算プログラムの中の関数を別のプログラムで使いたい、と言われその部分だけ抜き出そうとした。

ああ、1時間もあればできるよ、と言ったのに半日以上かかった。どこでハマっていたかというと、、、

昔のプログラムは整数にIntegerを使っていたが、別のプログラムはLongでそのまま使うと

例の「コンパイルエラー：ByRef引数の型が一致しません」がでる。

あ、もちろん最初に

Option Explicit

をつけてますよ、、、というか、数値計算のプログラムなんで意図しない変換を避けるために

これは必須。（fortranで言うところのimplicit none)

で通常動作はこれ。

デフォルトでVBAは参照渡し(ByRef)になっているので、関数内で変数を変換すると呼び出した側も変わる。

これを防ぐには値渡し（ByVal）にすればいいが、今回はByRefで変数が変換されるような仕様にしていた。

で、呼び出し側の変数をLongにしてCIntで型変換したら、、、

あれ？参照渡しなのに変換されてない、、、

というところでハマりました。言われてみれば型が違うのに参照渡しするのは変、、、ならエラーを出してほしかったり。

皆さんもしょーもないところでハマることがあるので

気を付けて。