AccessTr.neT
formdaki bilgileri worde aktarmak - 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ığı: formdaki bilgileri worde aktarmak (/konu-formdaki-bilgileri-worde-aktarmak.html)

Sayfalar: 1 2 3 4 5 6 7

Cvp: formdaki bilgileri worde aktarmak - Yandemir - 13/02/2013

bir recordset ve döngü yardımıyla tablo şeklinde dökülebilir.

Cvp: formdaki bilgileri worde aktarmak - alperadn01 - 14/02/2013

(13/02/2013, 19:14)Yandemir yazdı: bir recordset ve döngü yardımıyla tablo şeklinde dökülebilir.

hocam biliyorum bu konu sizin için çok basit olabilir. ancak benim kodlarla pek aram iyi değil. bu konuyla ilgili yardım edebilirseniz sevinirim. teşekkür ederim. saygılar

Cvp: formdaki bilgileri worde aktarmak - Yandemir - 14/02/2013 

dim rs as recordset

set rs=curentdb.openrecordset("Select * from FaturaHareketleri where ID=" & me.ID)

rs.movefirst

Sat=10 ' 10.satırdan başlaması için

do until rs.eof

    belge.Cells(Sat, 5) = rs.fields("Aciklama")

    belge.Cells(Sat, 5).Font.name = "Arial Narrow"

    ..................

    .............

    belge.Cells(Sat, 4) = rs.fields("StokKod")

    belge.Cells(Sat, 4).Font.name = "Arial Narrow"

    ...........

    ...........

    Sat=Sat+1

    rs.movenext

loop

rs.close
gibi bir örnek hem satır artar hem kayıt artar.

Cvp: formdaki bilgileri worde aktarmak - alperadn01 - 15/02/2013

hocam ilginize teşekkür ederim .kodu uygulamaya çalışayacağım saygılar