エクセルのバージョンを調べて、結果で分岐させる。

2017/05/17


エクセルファイルを開くときに、
エクセルのバージョンを調べて、結果で分岐させる。

Sub Auto_Open()

Dim apb
apb = Application.Version
<h7></h7>
 If apb <> "14.0" Then
 MsgBox "このバージョンでは使えません。2010で開きなおしてください。"
 ThisWorkbook.Close
 Exit Sub
 Else

 End If

End Sub
スポンサーリンク

スマホのみ下に表示