■ Excelのバージョンを取得するには?
カン
[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倍のチャンスも!
