Excelのバージョン

[excelvba]

VBAでこうやってExcelのバージョンがとれます。

Sub Sample1()
  MsgBox Application.Version
End Sub   

Versionプロパティは、次の文字列を返します。

  • Excel 2010 → 14.0
  • Excel 2007 → 12.0
  • Excel 2003 → 11.0
  • Excel 2002 → 10.0
  • Excel 2000 → 9.0
  • Excel 97 → 8.0
  • Excel 95 → 7.0
  • Excel 5.0 → 5.0

Excel 2010は「13.0」ではなく「14.0」です。
13は不吉な数字だからでしょうか、飛ばされてしまいました。

ネタ元