AccessTr.neT

Tam Versiyon: Accessden Word'e Formdaki Verileri Aktarma
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
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
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], "")
cevabınız için teşekkür ederim. problemim çözüldü.