AccessTr.neT
Word Dot Şablonunu Açtırarak Veri Göndermek - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Word Dot Şablonunu Açtırarak Veri Göndermek (/konu-word-dot-sablonunu-actirarak-veri-gondermek.html)

Sayfalar: 1 2 3

RE: Word Dot Şablonunu Açtırarak Veri Göndermek - bibib - 13/01/2025

(13/01/2025, 14:43)berduş yazdı: keşke nerelere basıp ne yaptığınızda sorun çıktığını da yazsaydınız!
bu haliyle ne yapmamız gerektiğini bulamadım

bilgileri WORD e gönderme olayında 1. göndermede sorun yok 2.göndermede (üst yazı) olayı tutanak ve talep formunu dahi denemedim belki onda da hata verebilir

giriş şifresi eksek yazmışım
şifre (sicil)

123456

RE: Word Dot Şablonunu Açtırarak Veri Göndermek - berduş - 13/01/2025 

With Tahkikat_Talep_Form

     .Class = "Word.Document"

     .Verb = acOLEVerbOpen

     .Visible = False

     .Object.Application.Documents.Item(1).SaveAs Me.Dosya_Kayıt_Yeri & "\" & Şablon_Dosyası, Visible = False

     .Close

End With
.close ksımını devre dışı bırakıp dener misiniz?
galiba üstyazıda da vardı

RE: Word Dot Şablonunu Açtırarak Veri Göndermek - atoykan - 13/01/2025

(11/01/2025, 22:12)bibib yazdı: Aldığım hata
Çalışma zamanı hatası '-2147220995 (800401fd)':
1 Otomasyon hatası
Nesne sunucuya bağlanmamış

Debug'ı tıkladığınızda hangi satır ev kod bloğunda hata veriyor? Kodlara bir göz attığımda çok önemli sayılmasa da bir iki hata var. Nerede hata aldığınızı ve tespit ettiklerim ile ilişkisini bir görelim çözüm yoluna bakalım.

RE: Word Dot Şablonunu Açtırarak Veri Göndermek - berduş - 13/01/2025 

With Tahkikat_Talep_Form

     .Class = "Word.Document"

     .Verb = acOLEVerbOpen

     .Visible = False

     .Object.Application.Documents.Item(1).SaveAs Me.Dosya_Kayıt_Yeri & "\" & Şablon_Dosyası, Visible = False

     .Close

End With
kodundaki .Object.Application.Documents.Item(1).SaveAs Me.Dosya_Kayıt_Yeri & "\" & Şablon_Dosyası, Visible = False satırında hata veriyor hocam

RE: Word Dot Şablonunu Açtırarak Veri Göndermek - berduş - 13/01/2025

kodu sadece 
 Tahkikat_Talep_Form.Object.Application.Documents.Item(1).SaveAs Me.Dosya_Kayıt_Yeri & "\" & Şablon_Dosyası, Visible = False
kullansanız ne olur?
diğer satırların pek işlevi yok gibi
mesela diğer satırları pasif yapıp 
Debug.Print .Class, .Visible
yazdığımda zaten kendisi varsayılan olarak
.Class=Word.Document
.Visible=False
değerlerini döndürüyor

RE: Word Dot Şablonunu Açtırarak Veri Göndermek - bibib - 14/01/2025

(13/01/2025, 22:42)berduş yazdı: kodu sadece 
 Tahkikat_Talep_Form.Object.Application.Documents.Item(1).SaveAs Me.Dosya_Kayıt_Yeri & "\" & Şablon_Dosyası, Visible = False
kullansanız ne olur?
diğer satırların pek işlevi yok gibi
mesela diğer satırları pasif yapıp 
Debug.Print .Class, .Visible
yazdığımda zaten kendisi varsayılan olarak
.Class=Word.Document
.Visible=False
değerlerini döndürüyor

yapamadım olmadı hata veriyor. Bir Örnek yaparsanız çak sevenirim.


programın işleyiş mantığı şu;
konusuna göre seçilen kaydın bilgilerini worde şablona göndermek. hepsini word işareti altında kontrol ettiriyorum ve hepsi için ayrı ayrı yazılmış şablonları açtırıp oraya gönderiyor. ilk gönderdiğini şablona ekleyip dosya numarasına göre açılan klasörün içinde yine dosya numarası ve konusunun ismini vererek kaydediyor.

şablonu hafızaya açtırıp açılan şablona bilgileri gönderdikten sonra farklı kaydetmek istiyorum. Bu örnekteki 2016-2019 oficede normal sıkıntısız çalışırken neden 360 ofice de hata veriyor çözemedim.