فتح ملف اكسل بشرط ان يكون اصدار 2016 وأعلى

[ابوسلماان]

السلام عليكم ،، 
احتاج الى مساعدتكم في وضع شرط عند فتح ملف اكسل.
فاذا كان الاكسل المحمل على الكمبيوتر أقل من 2016 لا يفتح الملف.

ودمتم سالمين ،،

[حسونة حسين]

وعليكم السلام ورحمه الله وبركاته

تفضل اخى الكريم

Private Sub Workbook_Open()
    #If VBA7 Then
        Application.WindowState = xlMaximized
    #Else
        Application.Quit
    #End If
End Sub

 

[ابوسلماان]

مشكور يا الغالي 

🌹