+- 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ığı: açılan kutu (/konu-acilan-kutu--14398.html)
Cvp: açılan kutu - ferhatozge - 13/04/2012
ben sorgudaki verileri Excel'e aktarıyorum. sorguda veri varsa problem yok masaüstüne istediğim dosya adında excele atıyor. Ama veri yoksa boş bir dosya atıyor. boş dosya derken sütun başlıkları mevcut.
excel'e attığım;
On Error GoTo Err_aktar
Dim Klasor As String
Klasor = CurrentProject.Path & "\ExcelDosyasıAdı.xls"
If MsgBox("Verileri Excele aktarmak istiyor musunuz? ", 36, "ExcelDosyasıAdı.xls 'ye aktarılacak") = 6 Then
DoCmd.TransferSpreadsheet acExport, 8, "Tablo/SorguAdı", Klasor, True, ""
MsgBox "Aktarma işlemi tamamlandı", 0, "VERİ AKTARIMI"
Exit_aktar:
Exit Sub
Err_aktar:
MsgBox Error$
Resume Exit_aktar
End If
Cvp: açılan kutu - C*e*l*o*y*c*e - 14/04/2012
bunu geliştirebilirsiniz
Cvp: açılan kutu - kyskys - 06/05/2012
hocam ekte gönderdiğim gelir formunda açılan kutudan "üye", "firma" ve "personel" seçeneklerinden birini seçtiğimde açılan_kutu26 da seçeneğe göre tablolardan veri gelmesini istiyorum.yani "üye" seçtiğimde açılan_kutu26 ya üyelerin adları, "Firma" seçtiğimde Firma tablosundan firmaların listesi "Personel"i seçtiğimde personel tablosundan personellerin isimleri gelsin istiyorum. Bunu kasa programında gelir gider formunda kullanacağım. teşekkürler
dosya eklenmemişti tekrar gönderiyorum
Cvp: açılan kutu - benremix - 07/05/2012
(06/05/2012, 22:31)kyskys yazdı: hocam ekte gönderdiğim gelir formunda açılan kutudan "üye", "firma" ve "personel" seçeneklerinden birini seçtiğimde açılan_kutu26 da seçeneğe göre tablolardan veri gelmesini istiyorum.yani "üye" seçtiğimde açılan_kutu26 ya üyelerin adları, "Firma" seçtiğimde Firma tablosundan firmaların listesi "Personel"i seçtiğimde personel tablosundan personellerin isimleri gelsin istiyorum. Bunu kasa programında gelir gider formunda kullanacağım. teşekkürler
dosya eklenmemişti tekrar gönderiyorum
Lütfen yeni konu açınız. Cevaplanmış konuya örnek ekleyemezsiniz.
Saygılar...