AccessTr.neT
metin kutusunu excel 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ığı: metin kutusunu excel aktarma (/konu-metin-kutusunu-excel-aktarma.html)

Sayfalar: 1 2


metin kutusunu excel aktarma - mhmtogz - 10/02/2013

merhaba excele aktarma ile ilgilir çok fazla konu okdum ama istediğim gibi olana rastgelmedim.. umarım fikri olan vardır yoksa bütün çalışmam boşa gidecek...
raporlarımda Dsum DCount kullanıyorum. istediğim şu raporlardaki metin1 kutusunun excelde mesela G15 nolu kutuya denk gelmesini istiyorum... mümkünmüdür acaba?


Cvp: metin kutusunu excel aktarma - mhmtogz - 10/02/2013

Dim A, B As String
A = DLast("[adi]", "Tablo1")
B = DLast("[soyadi]", "Tablo1")
Dim MyObject As Object

Set MyObject = GetObject(CurrentProject.Path & "\Sonveri.xls")

MyObject.Sheets("Sayfa1").Range("A2").Value = A
MyObject.Sheets("Sayfa1").Range("B1").Value = B


bu kodlar güzel tablo ve sorguyu excele göndermek isteyen arkadaşlar kullanabilir... Sonveri.xls dosyası işlemi yaparken açık olmalıdır....

Ama benim istediğim raporda DCount kullandığım bir metin kutusunu excelde G15 kutusuna aktarmak...


Cvp: metin kutusunu excel aktarma - Yandemir - 10/02/2013

örneğiniz varsa daha kolay anlaşılır.


Cvp: metin kutusunu excel aktarma - mhmtogz - 11/02/2013

kusura bakmayın geç gördüm...dosyaları ekledim...


Cvp: metin kutusunu excel aktarma - mhmtogz - 11/02/2013

tekrar mesaj yazıyorum kusura bakmayın bütün çalışmam buna bağlı çünkü bendeki sonucu Excel deki gibi istiyor.. acaba yukardaki kodlar rapora uygulanamaz mı?


Cvp: metin kutusunu excel aktarma - Yandemir - 14/02/2013

öncelikle raporu Excel ortamına aktarırsanız istediğiniz veriyi istediğiniz yere atamazsınız. bunun yerine Excel dosyasını kendinizin açıp satır satır kodla aktarmanızdır.