AccessTr.neT
Accessden Word'e Formdaki Verileri Aktarma - 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ığı: Accessden Word'e Formdaki Verileri Aktarma (/konu-accessden-word-e-formdaki-verileri-aktarma.html)



Accessden Word'e Formdaki Verileri Aktarma - sfenksturk - 21/04/2012

Arkadaşlar ben Access formunda bulunan verileri kod ile önceden D: içerisine kaydettiğim word1 şablonuna kod ile atabiliyorum. Ancak Access formunda bir alan boş bırakıldığında word'e veri aktardığımda boş alana kadar veriyi aktarıyor ancak daha sonraki verileri aktarmıyor. Yani formdaki tüm alanları doldurmam gerekiyor. Ancak gerekmediğinde ben bazı alanları doldurmak istemiyorum. Bu nedenle asccessden word'e belirttiğim eksiklik olmadan nasıl veri aktara bilirim. örnek çalışmayı aşağıda yolluyorum. gönderdiğim dosya içerisindeki wor1 belgesi D: içerisinde aynı isimde olmalı. Cevaplarınızı bekliyorum. Ayrıca siteyi araştırdım. bu konuda örnek çalışma bulamadım.

calisma1.rar



Cvp: Accessden Word'e Formdaki Verileri Aktarma - Kur@l - 21/04/2012

Kodun ilgili kısmını aiağıdaki ile değiştirin.
Kolay Gelsin.

' Her satırı uygun olan kayıt ile değiştirmek.
With WordApp.Selection
.GoTo what:=wdGoToBookmark, Name:="A"
.TypeText Nz([A], "")

.GoTo what:=wdGoToBookmark, Name:="B"
.TypeText Nz([B], "")

.GoTo what:=wdGoToBookmark, Name:="C"
.TypeText Nz([C], "")

.GoTo what:=wdGoToBookmark, Name:="D"
.TypeText Nz([D], "")

.GoTo what:=wdGoToBookmark, Name:="E"
.TypeText Nz([E], "")

.GoTo what:=wdGoToBookmark, Name:="F"
.TypeText Nz([F], "")

.GoTo what:=wdGoToBookmark, Name:="G"
.TypeText Nz([G], "")



Cvp: Accessden Word'e Formdaki Verileri Aktarma - sfenksturk - 21/04/2012

cevabınız için teşekkür ederim. problemim çözüldü.