CalcとExcelをマクロ中で判断 #if ～

質問

マクロの中で、#if ～ #endif を利用し、Calc（LibreOffice）かExcelかを判断したいと思っており、偶然実現出来そうな方法を見つけたのですが、本当にこれでいいの？という所もあり、質問させて頂きました。
例えば、Calc 側だけで定義されている定数（その逆でも）などがあれば、#if ～ #endif で判断できるかと思い探しましたが、見つけることが出来ていません。

xlNormalは、excelで定義されているものですが、以下のように実装すると、
calc は１（上）側、excelは２（下）側が実行されます。　
尚、Calc側はOption VBASupport 1 としています。　
どちらも、上側が実行されてもよさそうなのですが、理由はよく分かりません。

sub test ()
#if xlNormal then
msgbox 1
#else
msgbox 2
#end if
end sub

もし、これに代わるもっとスマートな形や標準的な方法がありましたら、ご教授お願いします。

回答No.1

chie65536（@chie65535） · ベストアンサー

＞calc は１（上）側、excelは２（下）側が実行されます。　

Excel vbaでは、#ifで使える変数は

・#Constディレクティブで定義したコンパイル変数

・「VBA7」や「Win64」などの定義済みコンパイル変数

だけです。

それ以外の定義済み変数を使用したり、未定義の変数を指定すると、すべて「False」と扱われます。

Calc（LibreOffice）では、この辺りの仕様が明確になってないので、Excel vbaとは異なる動作をする可能性があります。

お礼

ありがとうございます。
大変参考になりました。
32bit/64bit 共に、Win32 = 1 のようなので、
#If Win32 = 0 Then
● LibreOffice - CALC 時
#Else
● Excel 時
#End If

と判断するようにしました。

尚、VBE では「条件付きコンパイル引数」を設定できますので、ここで
MACRO_MODE = 1 などと定義する方法もありました。

CALC 側でのみ default で定義されている定数があれば、一番よかったのですが、
今回は、ご教授頂いた "条件付きコンパイル定数" の「Win32」を使用するようにしたいと思います。