VBA Verzie Excel

ub zistiVerziuExcelu()
    If Application.Version = "15.0" Then
        MsgBox "Pouzivate Microsoft Excel 2013."
        ElseIf Application.Version = "14.0" Then
        MsgBox "Pouzivate Microsoft Excel 2010."
        ElseIf Application.Version = "12.0" Then
        MsgBox "Pouzivate Microsoft Excel 2007."
        ElseIf Application.Version = "11.0" Then
        MsgBox "Pouzivate Microsoft Excel 2003."
        ElseIf Application.Version = "9.0" Then
        MsgBox "Pouzivate Microsoft Excel 2000."
        ElseIf Application.Version = "8.0" Then
        MsgBox "Pouzivate Microsoft Excel 97."
        ElseIf Application.Version = "7.0" Then
        MsgBox "Pouzivate Microsoft Excel 95."
    End If

End Sub