VBAでEXCELバージョンを取得する方法を紹介します。Application.Versionを参照するだけです。参照値とEXCELバージョンと対応については、表にまとめています。Excel 2016以降が全て16.0であるのが少し気になりますね。
サンプルプログラム(コピペでOK)
Sub sample()
Debug.Print Application.Version 'EXCEL 2021ならば、16.0
End Sub
EXCELバージョン | 値 |
Excel 2021 | 16.0 |
Excel 2019 | 16.0 |
Excel 2016 | 16.0 |
Excel 2013 | 15.0 |
Excel 2010 | 14.0 |
Excel 2007 | 12.0 |
Excel 2003 | 11.0 |
Excel 2002 | 10.0 |