Filtreleme ve Excele Aktarma

gunay121 · 06-10-2009, 13:10

Merhaba,
Teşekkürler Sayın @Taruz çok yardımcı oldunuz. Bir de filtreleme ile ilgili sorularım olacaktı. Dosya ektedir. Dosyada ki Raporlama sorgusuna ilişkin RaporAlma formunda yapılacak filtrelemeler aşağıdadır.

1. MüsteriTicAdi na göre filtreleme.
2. MüsteriTicAdi seçildiğinde seçilen müsşteriye ait şubelerin gelmesi ve bu şube ile filtreleme.
3. Durum alanının Açık - Kapalı durumuna göre filtreleme.
4. SicakSatis alanının işaretli olup olmadığına göre filtreleme.
5. Iptal alanının işaretli olup olmadığına göre filtreleme.
6. Kesildi alanının işaretli olup olmadığına göre filtreleme.
7. SiparisNo arama yoluyla filtreleme.
8. IrsaliyeMatbu arama yoluyla filtreleme.
9. Tarih araliğı ile filtreleme.

Ayrıca bunların hepsinde "Tümü" seçeneği olacak. Birde bunlar seçildikten sonra excel dosyası şeklinde dışarı aktarma.

Taruz · 06-10-2009, 16:00

Merhaba..

Aşağıdaki linkte işlenen konu sizin isteğinizle örtüşüyor.. Kriter sayısı gözetmeksizin uygulayabilirsiniz..

gunay121 · **Kayıt Tarihi:** 10.09.2009

Merhaba iyi akşamlar.
bazı sorularım olacaktı. k.bakmayın her zaman soru soruyorum ama .. malum. Smile

pişene kadar böyle olucak sanırım.
1.müşteri adı ve şubeye göre filtreleme yaptım ancak duruma göre yapamadım. Açılan kutu değerlerine -1 ve 0 yazınca görüyor. ancak açık ve kapalı yaptığımda görmüyro doğal olarak. bunu nasıl değiştirebilirim.
2.tarihler arası aramayı ve filtrelediğimi excele nasıl aktarırım.
3. iptal, sıcaksatış, kesildi teker teker işaretleyip kaldırdığımda tekrar eski haline dönmüyor.
4.

SQL
IIf(IsNull([Forms]![RaporAlma]![SubeAdiFiltre]);[Subeler].[SubeNo];[Forms]![RaporAlma]![SubeAdiFiltre])

bu kod subeno nun ölçüt kısmında ve musterino kısmında da

SQL
IIf(IsNull([Forms]![RaporAlma]![MüsteriTicAdiFiltre]);[Musteriler].[MusteriNo];[Forms]![RaporAlma]![MüsteriTicAdiFiltre])

bu ölçüt var. bu sorguda doğal olarak hem müşterino hemde sube no olarak sorgulayıp bir siparişten 2 tane gösteriyor. bunu nasıl hallederim.
bir de filtre seçeneğini silince tümünü göstermesi yerine tümü seçeneği koyamazmıyız. Geldiğim son nokta dosyadadır. dosya ektedir.

Taruz · 07-10-2009, 14:14

Merhaba..

Durum kutusunun sütun sayısını 2, genişlik değerlerini de 0cm;2,542cm yapınız.. Değerlistesini de "-1";"Açık";"0";"Kapalı" şeklinde değiştiriniz..
Forumda Between fonksiyonunu arattığınızda gerekli bilgiyi bulacaksınız..
Onay kutularını 3 seçenekli yapınız.. (Özellikler / Veri / Üç Durumlu = Evet )
Bu sorunuz anlayamadım ama bir kayıttan iki tane çıkması sorgudaki ilişkilerde bir hatayı işaret eder..
Excele formu değil sorguyu gönderiniz.. ( acQuery )
Tümü içinse açılan kutuların seçimini boşalttırabilirsiniz..
Me.açılankutu1=""
Me.açılankutu2=""
.....
Me.altfformunuz.requery

şeklinde..

İyi çalışmalar..

gunay121 · **Kayıt Tarihi:** 10.09.2009

Sayın @Taruz kendi çözümlerim ile hepsini hallettim. taki 2 kayıtın çıkmasına gelene kadar Smile

Ekteki dosyaya bakıp bir sorun olup olmadığını sölerseniz sevinirim. RaporAlma formunda 2 şubesi olan firmanın 1 siparişi 2 tane gözüküyor. bunu da halledersem raporlama bitmiş olacak.

birde bir excel dosyası içine iki farklı sorguyu nasıl birleştirip dışarı aktarabilrim. sayın @taruz hocamın paylaşmış oldugu kod ile aradığım siparişin ürünlerini dışarı aktarıyorum. ancak aradığım sipariş bilgilerinide aynı dosyada nasıl birleştiririm böyle bir yol varmı?

Visual Basic
Dim qd As DAO.QueryDef
    Dim vt As DAO.Database
    Dim sorgu As String    
    'Sorgumuzu hazırlıyoruz
    sorgu = "SELECT SiparisUrunleri.SiparisUrunNo, SiparisUrunleri.SiparisNo, SiparisUrunleri.SiparisMiktari, 
SiparisUrunleri.KesilenMiktar, SiparisUrunleri.TeslimMiktari, SiparisUrunleri.Iptal, 
SiparisUrunleri.Aciklama, Ürünler.UrunKodu, Ürünler.UrunAdi, Ürünler.UrunKoliIci, 
Ürünler.UrunGram FROM Ürünler INNER JOIN SiparisUrunleri 
ON Ürünler.UrunNo = SiparisUrunleri.UrunNo WHERE (((SiparisUrunleri.SiparisNo)=[Forms]![RaporAlma]![siparisara]));"
 
 
   ' Vt'mizde geçici sorgumuzu isimlendirip oluşturuyoruz.
 
    Const GeciciSorgu As String = "urunlerrapor"
 
        Set vt = CurrentDb
    Set qd = vt.CreateQueryDef(GeciciSorgu, sorgu)
 
    ' Excele bu sorguyu gönderiyoruz..
    DoCmd.OutputTo acOutputQuery, GeciciSorgu, "MicrosoftExcel(*.xls)", "", False, "", 0
 
 
    'Geçici sorgumuzu siliyoruz..
    DoCmd.DeleteObject acQuery, GeciciSorgu

gunay121 · **Kayıt Tarihi:** 10.09.2009

son sorunuma bir çözümu varmı ? iki farklı sorguyu filtreledikten sonra tek dosyada dışarı aktarma ?

aşağıdaki between fonksiyonunda bir hata var çözemedim bakabilirmisiniz?

iki tarih arasını sorgulatcağım. ancak siparistarihitumu işaretli ise hepsini gösterecek bunu şu kod ile yapıyorum.

SQL
IIf([Forms]![RaporAlma]![siparistarihitumu]=Doğru;[Siparisler]![SiparisTarihi];
BETWEEN [Forms]![RaporAlma]![siptarihi] AND [Forms]![RaporAlma]![siptarihi2])

ancak kaydet dedikten sonra aşağıdaki şekli alıyor. ve tumu seçeneğinde sorun yok ancak tarih aralığını yazıp ara dediğimde sonuclar gelmiyor.

SQL
IIf([Forms]![RaporAlma]![siparistarihitumu]=Doğru;[Siparisler]![SiparisTarihi];([Siparisler]![SiparisTarihi])
BETWEEN [Forms]![RaporAlma]![siptarihi] AND [Forms]![RaporAlma]![siptarihi2])

Benzer Konular...
Konu:		Yazar	Cevaplar:	Gösterim:	Son Mesaj
	[FORM] Açılır Menüdeki Veriyi Metin Kutusuna Aktarma	Pasham	1	215	19-02-2026, 21:18 Son Mesaj: adnan
	[FORM] Tarayıcıdan Evrak Tarayarak Ilgili Tabloya Aktarma	kertiller_55	1	345	03-10-2025, 15:32 Son Mesaj: dsezgin
	[FORM] Seçili Tarihe Göre Filtreleme	husem	3	311	25-09-2025, 00:25 Son Mesaj: halily
	Form üzerinde Ikili Filtreleme	osmangezin@gmail.com	1	307	19-06-2025, 00:01 Son Mesaj: dsezgin
	Aynı Günleri Filtreleme	Satir	7	614	30-04-2025, 09:33 Son Mesaj: Satir
	[RAPOR] Formdaki Aynı Rrsmı Baskı ön ızleme ıle Rapora Aktarma	MHMTKY	2	415	11-09-2024, 13:09 Son Mesaj: dsezgin
	Excele Aktarma	evren89	1	360	09-08-2024, 20:50 Son Mesaj: dsezgin
	Filtreleme	evren89	2	328	04-07-2024, 15:58 Son Mesaj: evren89

Oturum Aç




Beni Hatırla Şifremi Unuttum?

Access SQL