Ofis veya Access Sürümünü Öğrenme

Herkese merhabalar,

Yaptigim proje ile ilgili olarak Access programinin acildigi bilgisayarda ofisin 2003 mu, 2007 mi oldugunu nasil ogrenebilir ve formda bunu gosterebilirim.

Aşağıdaki kodları formun vb sayfasına ekle

Function OfisVersiyonKontrolu()



  Select Case SysCmd(acSysCmdAccessVer)

        Case "8.0"

           OfisVersiyonKontrolu = "97"

        Case "9.0"

           OfisVersiyonKontrolu = "2000"

        Case "10.0"

           OfisVersiyonKontrolu = "2002"

        Case "11.0"

           OfisVersiyonKontrolu = "2003"

        Case "12.0"

           OfisVersiyonKontrolu = "2007"

        Case "14.0"

           OfisVersiyonKontrolu = "2010"

        Case Else

           OfisVersiyonKontrolu = "Bulunamadı"

  End Select



End Function

Formda metin kutusuna yazdıracağın zaman

Metin = OfisVersiyonKontrolu

şeklinde kullan.

Ofis 2013 muhtemelen 15.0 olmalı, ancak emin olmadığım için koda eklemedim.

Sayın ozan,
Evet,bahsettiğiniz gibi Office 2013 için sürüm 15.0 dır.2010 kodu bitimine;


 
Kodu da dahil edilebilir.bilginize.

İyi çalışmalar,
Saygılar.

Cevaplar icin tesekkur ederim.