Accesten Word Dosyasına Veri Ekleme

1 2 3
28/06/2021, 11:05

ALTANs

Merhaba oluşturduğum bir form sayfasına 5 farklı veri değeri girip rapor hazırla butonuna bastığımda word belgesinden önceden yazılmış metine benim formdan girdiğim verileri eklemek istiyorum. Ama worddeki şablonu bozmadan. şimdiden yardımlarınız için teşekkür ederim.
28/06/2021, 12:29

berduş

her metin yeni paragraf olarak mı eklenecek?
28/06/2021, 13:45

ALTANs

ALTAN1,2,3,4 olan metinler değişecek. Örnek metin değişebilir. Aslında istediğim çalışmanın benzeri yapılmış ama onu tam çözemedim. onun üstünde çalışıyorum.

https://accesstr.net/konu-accesste-word-...rlama.html
28/06/2021, 13:55

berduş

orada veri önce Html dosyasına yazılıp word ile açılıyor. sizin yapmak istediğiniz ne? word dosyasındaki ALTAN1 kelimesi metin0 kutusundaki veri ile mi değişecek?
28/06/2021, 14:08

berduş

önce referanslarda Microsoft word ... library eklenmeli aşağıdaki kod sadece altan2 için
isterseniz çalışmanıza değişecek veri ve alacağı yeni değer için 2 metin kutusu koyarsınız ona göre işlem yapar
    Dim app As Word.Application
Dim doc As Word.Document

Set app = CreateObject("Word.Application")
app.Visible = True
Set doc = app.Documents.Open("C:\Users\halil\Desktop\Database2\ORNEK METIN.docx")

With doc.Content.Find
.Text = "Altan2"
.Replacement.Text = Me.Metin0
.Wrap = wdFindContinue
.Execute Replace:=wdReplaceAll
End With
28/06/2021, 14:23

berduş

Yalniz burada şöyle bir sorun ortaya çıkabilir; eğer dosya zaten açıksa işlem gerçekleşmez, o durumda hata verebilir
1 2 3