Skip to main content

AccessTr.neT


Excel,Exe sürüm 1.6 hatası

Excel,Exe sürüm 1.6 hatası

#1
office programı yüklü olmayan bir bilgisayarda accessde yaptığım programı çıalıştırmak istediğimde  " .... veritabanınız veya projeniz 'EXCEL.EXE' sürüm 1.6. dosyasına eksik veya hatalı başvuru içeriyor" şeklinde hata veriyor. 
Access 2007 Türkçe RunTime  kurdum. ama hala aynı hatayı alıyorum. bunu nasıl aşabilirim. 
Cevapla
#2
sayın hknct,

bahsettiğiniz talebinize yönelik olarak;

bir ihtimal,
Microsoft Excel XX.X Object Library referansının işaretlenmemiş olması söz konusu olabilir.

ya da,excel kullanımına ihtiyacınız varsa,
referansı;gerçek Excel yükleme klasörüne kurmanız gerekebilir.

bilginize...iyi çalışmalar,saygılar.
Herkes, kendisinin AR-GE'cisidir...


Konulara eklenen Uygulama içeriğine yönelik Tavsiyeler
Alt Form Denetim Değerlerine ulaşma ve Alt Form Güncelleme
Kapatırken Düzenle (Compact On Close) Seçeneğinin İşaretlenmesi Hakkında
Cevapla
#3
söylediğiniz eklentileri işaretli, ben bunu microsoft ürünleri olmayan bilgisayarlarda kullanacağım. bu nedenle buna çözüm nasıl olabilir. kullanacağımız bilgisayarlarda libreoffice programı kullanılıyor.
.rar excel sorunu.rar (Dosya Boyutu: 256,98 KB | İndirme Sayısı: 6)
Son Düzenleme: 18/02/2017, 11:11, Düzenleyen: hknct.
Cevapla
#4
veya bu eklentiyi office olup olmamasına göre aktif veya pasif yapabiir miyiz?
Cevapla
#5
Merhaba,

aşağıdaki kodu modüle ekle,

Function ReferenceFromFile(strFileName As String) As Boolean
 Dim ref As Reference
     
        On Error GoTo Error_ReferenceFromFile
        References.AddFromFile (strFileName)
        ReferenceFromFile = True
     
Exit_ReferenceFromFile:
        Exit Function
 
Error_ReferenceFromFile:
        ReferenceFromFile = False
        Resume Exit_ReferenceFromFile
  End Function


Function RefExists(RefName)
 Dim ref As Object
     
    RefExists = False
     
    For Each ref In References
        If ref.Name = RefName Then
            RefExists = True
        End If
    Next
     
 End Function


Uygulamanın ilk açıldığı form olan "Frm_Kullanici_Giris" isimli formun açıldığında olayına


If RefExists("Excel") = False Then
ReferenceFromFile CurrentProject.Path & "\EXCEL.EXE"
MsgBox ("Referanslar eklendi")
Else
MsgBox ("Referanslar zaten var")
End If


Kodu ekle, test amacıyla eklediğim mesaj kutuları kaldırılabilir.

Son olarak, uygulamayı oluşturduğunuz ofis sürümüne ait "EXCEL.EXE" isimli dosyayı (muhtemelen "C:\Program Files\Microsoft Office\Office12" dizininde )  kopyalayıp uygulama ile aynı dizine yapıştırın.

excele aktarma butonunda oluşturulan Excel belgesini açtırmaya çalışacağından hata verebilir. Bu kısmın excel'in kurulu olup olmamasına göre çalıştırılması gerekli.
Cevapla
#6
Bu arada, EXCEL.EXE isimli dosya ofis olmayan bilgisayarda çalıştırılınca ne olacağını çok merak ediyorum. 

Ayrıca belirtirseniz memnun olurum.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da