■ Excelのバージョンを取得するには?

[Visual Basic Q & A 掲示板] [過去ログの一覧]


カン [E-Mail] 2007/12/11(火) 14:39:03 <初心者>
VB6でパソコンにインストールされている
Excelのバージョン(2000、2007など)を取得する方法はあるのでしょうか?
もしあるのであれば教えてください。

もげ 2007/12/11(火) 15:23:00 <常連>
ご参考までに、過去ログをどうぞ。
http://hpcgi1.nifty.com/MADIA/VBBBS2/wwwlng.cgi?print+200511/05110010.txt

カン 2007/12/11(火) 15:51:31 <初心者>
[[解決]]

もげさん、回答ありがとうございます。
以下のコードをExcel2007がインストールされている環境で実行したら、
test="12.0"となりました。

 Dim test As String
 Dim xlApp As Object
     
 Set xlApp = CreateObject("Excel.Application")
 test = xlApp.Version
 Set xlApp = Nothing

すなわち
 Excel97の場合=>"8.0"
 Excel2000の場合=>"9.0"
 Excel2002の場合=>"10.0"
 Excel2003の場合=>"11.0"
 Excel2007の場合=>"12.0"
となるのですね。
文字列にアルファベットが付加されて場合もあるみたいですね。

毎週金曜日はポイント最大3倍!さらに4倍のチャンスも!

Programming Library