+- 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ığı: Liste Kutusunda Seçtiğim Kayıtları Excele Atma (/konu-liste-kutusunda-sectigim-kayitlari-excele-atma.html)
Liste Kutusunda Seçtiğim Kayıtları Excele Atma - sertac76 - 27/12/2008
Arkadaşlar texboxtan arama yaptıktan sonra liste kutusuna gelen verileri Excel atamak isyorum yardımlarınızı bekliyorum
Cvp: Liste Kutusunda Seçtiğim Kayıtları Excele Atma - ozanakkaya - 28/12/2008
IVISATIS tablosundaki tüm alanları içeren IVISATIS isimli rapor ekledim.
IVISATIS formuna excele gönder isimli buton ekledim.
butonun tıklandığında olayındaki kod
Kod:
Private Sub Komut7_Click()
On Error GoTo Err_Komut7_Click
Dim stDocName As String
stDocName = "IVISATIS"
DoCmd.OutputTo acReport, stDocName
Exit_Komut7_Click:
Exit Sub
Err_Komut7_Click:
MsgBox Err.Description
Resume Exit_Komut7_Click
End SubKod:
([Kimlik]=[Forms]![IVISATIS]![Kimlik])Cvp: Liste Kutusunda Seçtiğim Kayıtları Excele Atma - sertac76 - 28/12/2008
İstediğim bu değil liste kutusundaki verileri tekrar hatrılatıyorum verileri derken tümü değil ben süzme yaptıktan sonra kalan verileri excele aktarmak istiyorum
Cvp: Liste Kutusunda Seçtiğim Kayıtları Excele Atma - ozanakkaya - 29/12/2008
1. mesaja yazdığın
Alıntı:Arkadaşlar texboxtan arama yaptıktan sonra liste kutusuna gelen verileri Excel atamak isyorum yardımlarınızı bekliyorum
eklediğin örnekte 15 tane form var, süzme hangi formda yapılıyor, neyi excele atmak istiyorsun ??
eklediğim örnekte gerekli kodlar var, zaten tek satırlık bir kod.
DoCmd.OutputTo acReport, stDocName
neyi süzmek istiyorsan süzme sonucunu rapora aktar, üstteki kod ile raporu açtır.
yapamaz isen hangi form olduğunu yaz.