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...
metin kutusunu excel aktarma
Bu Konudaki Yorumlar |
metin kutusunu excel aktarma - Yazar: mhmtogz - 10/02/2013, 02:42
Cvp: metin kutusunu excel aktarma - Yazar: mhmtogz - 10/02/2013, 03:16
Cvp: metin kutusunu excel aktarma - Yazar: Yandemir - 10/02/2013, 10:20
Cvp: metin kutusunu excel aktarma - Yazar: mhmtogz - 11/02/2013, 02:24
Cvp: metin kutusunu excel aktarma - Yazar: mhmtogz - 11/02/2013, 21:31
Cvp: metin kutusunu excel aktarma - Yazar: Yandemir - 14/02/2013, 01:20
Cvp: metin kutusunu excel aktarma - Yazar: mhmtogz - 14/02/2013, 22:43
Cvp: metin kutusunu excel aktarma - Yazar: mhmtogz - 15/02/2013, 19:02
Cvp: metin kutusunu excel aktarma - Yazar: Yandemir - 15/02/2013, 22:36
Cvp: metin kutusunu excel aktarma - Yazar: mhmtogz - 16/02/2013, 02:59
|
Konuyu Okuyanlar: 1 Ziyaretçi