Skip to main content

AccessTr.neT


metin kutusunu excel aktarma

metin kutusunu excel aktarma

Çözüldü #1
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?
Cevapla
Çözüldü #2
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...
Cevapla
Çözüldü #3
örneğiniz varsa daha kolay anlaşılır.
Murat YANDEMİR ( PyramiD YAZILIM Uluslar Arası Nakliye Programları )
Bilgisayar Programcısı (1989'dan beri)

+rep Yollar biter Access bitmez. +rep
Cevapla
Çözüldü #4
kusura bakmayın geç gördüm...dosyaları ekledim...
.rar 112.rar (Dosya Boyutu: 98,55 KB | İndirme Sayısı: 12)
Cevapla
Çözüldü #5
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ı?
Cevapla
Çözüldü #6
ö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.
Murat YANDEMİR ( PyramiD YAZILIM Uluslar Arası Nakliye Programları )
Bilgisayar Programcısı (1989'dan beri)

+rep Yollar biter Access bitmez. +rep
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task