AccessTr.neT

sayın angelos,

Alıntı:3. Bu mesajı iki defa gönderme gereği neden duydunuz benim Access formumda sıkıntım yok birebir aynısı 3 pc de çalışıyor referanslarda aynısı olduğu şekilde

Alıntı: yazdı:[/url][url=https://accesstr.net/konu-accesstr-net-forum-kurallari.html]Site Kuralları gereği;

lütfen içeriğinde farazi gerçek dışı uydurma bilgiler ve sonuçları görebilmek adına da birkaç veri barındıracak şekilde örnek uygulamanızı konunuza dahil ediniz.

ifadenize yönelik olarak;
örnek uygulama,kimi durumlarda konu sahipleri,uygulamalarında farkında olmadıkları bazı sorun ya da hataları varsa incelemek için talep edilmektedir.

kullanılan ofis sürümleri farklı olabilir.bu da,sorunlardan biri sayılabilir.sürüm farklılıklarında kendi sürümünüze göre olan referansların seçilmesi gerekebilir.

konunuzun 2.mesajında belirtilen

Alıntı:1)
kod sayfasındayken üst menüden DEBUG - COMPILE ile genel kod kontrolü yapmayı da ihmal etmeyiniz.

2)
yine üst menüden ARAÇLAR sekmesinde,VERİTABANINI SIKIŞTIR VE ONAR seçeneği ile düzenlemede bulunmayı da ihmal etmeyiniz.

açıklamaları da kontrol etmekte fayda var.aşağıda bağlantısı yazılı konunun 7.mesajını da incelemeniz gerekebilir.

Konulara eklenen Uygulama içeriğine yönelik Tavsiyeler

bilginize...iyi çalışmalar,saygılar.

office 2013 sürümü tüm pcler 

Alıntı:Private Sub Komut61_Click()
Dim WordApp As Word.Application
   Dim strTemplateLocation As String
    
    strTemplateLocation = CurrentProject.Path & "\TUTANAK.docx"
   On Error Resume Next
   Set WordApp = GetObject(, "Word.Application")
   If Err.Number <> 0 Then
     Set WordApp = CreateObject("Word.Application")
   End If
   On Error GoTo ErrHandler
   
   
   WordApp.Visible = True
   WordApp.WindowState = wdWindowStateMaximize
   WordApp.Documents.Add Template:=strTemplateLocation, NewTemplate:=False

hata veren satır kırmızı renkli olan referanslarda Microsoft Word 15.0 Object Library ,Microsoft Office15.0 Object Library ekli

sayın angelos,

Alıntı:kısayol olarak attığım bilgisayar 64 bit sürüm olduğu için ptrsafe yapmıştım bu işlemden sonra kendi bilgisayarımda çalışmadığını anlayınca masaüstüne kopya alıp ptrsafe olayını sildim

konunuzun 3.mesajında yukarıda yazılı açıklamanız nezdinde;

bu işlemi uygularken,olası bir sorun da mevcut olabilir.bu işlemi içeren kodları görmekte fayda var.bu nedenle,örnek uygulama,her ihtimal adına incelenmesi gerekmektedir.

bilginize...iyi çalışmalar,saygılar.

Word dosyalarımın komple yerlerini değiştirince sıkıntı halloldu neden böyle oldu bilmiyorum ama çok şükür halloldu çok teşekkürler yardımcı olmaya çalıştın Allah razı olsun

sayın angelos,

öncelikle;
sorununuzun çözülmesi sizin adınıza olumlu bir netice.

son olarak;

Alıntı:Word dosyalarımın komple yerlerini değiştirince sıkıntı halloldu

ifadenize için,


kod satırını kullanmanız akabinde,eğer ilgili Word dosyalarınızın barındırıldığı konum farklı bir dosya yoluna maruz kalmışsa bundan dolayı dosyanın açılması veya kullanılmasında sorun yaratmıştır.

bilginize...iyi çalışmalar,saygılar.

Bu konu cevaplanmış sorunlar kısmına taşındı hallolduğunu belirttiğim için ama şu anda yukarıdaki mesajımda belirttiğim hata kodunun olduğu satırı hala alıyorum kendi projemde değil sitede yayınlanmış olan diğer worde aktarımla ilgili hazırlanan programlarda da alıyorum aynı hatayı worde aktar butonuna tıklayınca kullandığım office 2013 sürümü bu sıkıntıyı nasıl aşabilirim şu an worde aktarım yapamıyorum referanslarda Missing yazan yer yok yardımlarınızı bekliyorum