Arkadaşlar iyi geceler. Sizlerin de yardımıyla programda belli bir yere kadar geldim. Yardımlarınız için çok teşekkür ederim tekrar.

Yardıma ihtiyaç duyduğum noktalar;
1-Filtrelenen listeyi excele at dediğimde liste19 dan hepsi gelmiyor. Listeye yeni sütunlar ekleyip kodları güncellemeye çalıştım ama hata verdi.
2-Arama kriterlerini giriniz kısmında 4 seçenek bulunmaktadır. Sol altta pivot table var (Mavi olan) ve o seçeneklere göre değişiyor; fakat sadece arıza kaydına göre güncelleme yapmıyor. 3 seçeneğe göre güncellemesi oluyor; onda olmuyor. Onu da yapamadım.
3-Bordo renkli pivotta ise İade tarihi 7 gün altı olan firmalar listelenmektedir. Burada da 1 Hafta altı ve altı -- 3 gün ve altı seçeneklerine göre listenin değişmesini ve alttaki kutucukta adet göstermesini istiyorum. Yine aynı şekilde listeyi excele atsın istiyorum.
4-Ayrıca kaydet butonuna basınca Satış diye bir tabloya da kayıt yapmasını istiyorum. Her kayıt işlemini kaydetsin o tabloya. Orası bir arşiv tablosu olacak. Şu anki kaydet butonunun fonksiyonu var ve çalışıyor bu fonksiyona ek olarak yapaılan kayıt işlemlerinin satış tablosuna da gitmesini istiyorum. Fakat şu an var olan bir veri seçilip güncellemesi yapıp kaydete basınca listede güncelleniyor. (Liste19 ve Tbl_Urun de) fakat bu işlem satış exceline yeni kayıt olarak girsin.
Depodaki mal seçilip satışı gerçekleştiğinde firması güncellenip kaydete basınca bu listede ve Tbl_Urun de değişiyor. Bunda problem yok. Bu işlem ayrıca satış tablosuna da kaydolsun. Yani orda güncellemesin, hep yeni kayıt olarak kaydetsin.

Arkadaşlar bu raporda çok fazla emeğiniz var; Lütfen hocalarıma da sesleniyorum. Yardımlarınızı bir kez daha rica ediyorum. Çok uğraştım ama yapamadım. haftayı geçti işten gelince sadece bununla uğraşıyorum arkadaşlar.

Teşekkür ederim.

Sn selim;
Konu baslikgi ARAMA bolumu ile kullanildigindan, ihtiyaciniza yonelik olusturmalisiniz. 1,2,3,4,5 guncellendi
  YARDIM.rar (Boyut: 402,4 KB / İndirilme: 124) inceleyiniz.

Dsezgin hocam yardımlarınız için çok teşekkür ederim. Yalnız dosyayı incelediğimde 2 excele at butonu da çalışmamaktadır. Klasör seçin hatası veriyor. Daha önce olduğu klasörün içine atıyordu. Üstteki exele at klasör hatası , alttaki excele at ise geçici adında dosya zaten var hatası veriyor. İstediğim 2 exceli e olduğu klasöre atsın. Ya da masa üstünde oluşturduğumuz herhangi bir klasöre.

Ayrıca 3. seçenekte pivot kısmını doğru anlatamamışım bir önceki mesahımda.İade tarihine 7 gün ve altı kalan , yine iade tarihine 3 gün ve altı kalanları listesin istiyorum. Ayrıca kutuya da adetini versin. 3 günü tıkladığımda 3 iadesine 3 gün ve altı olanlar gelsin. 1 haftayı tıkladığımda yine aynı şekilde 7 gün ve altı olanlar gelsin istiyorum.

4. seçenek için de ekstra yardımlarınızı istirham ediyorum hocam.Tekrar tekrar yardımlarınızı rica ederim.

4 olayı bitince inşallah çalışmamı halletmiş olacağım

Sn selimglr;

2. Madde
Excel'e at prosedurunde
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "Gecici", CurrentProject.Path & "\Aktar.xls", True
koyu yazan yeri "C:\Users\" & environ("username") & "\Desktop\Aktar.xls" olarak degistirebilir veya bir baska klasor yolu yazabilirsiniz.

3. Madde
Hafta veya gun araligini daha fazla secebilmeniz icin Metin223'e deger girilmesi ile Liste199 verileri daha aktif suzdurme yapabilirsiniz. Kayit sayisini ise Liste19 yontemi gibi bir baska alanda gosterilebilir.

4. Madde
Private Sub Komut21_Click()
....
If IsNull(Me.Metin197) Then MsgBox "Lütfen Birim Fiyat Giriniz'", 48, "Kayýt Ýþlemi": Me.Metin197.SetFocus: Exit Sub

CurrentDb.Execute "INSERT INTO satıs ( [MALZEME KODU], [FIRMA ADI], [MALZEME ADI], BÖLGE, [BIRIM FIYAT], [Veriliş Nedeni], KAPSAM, [Ek Açıklama], [Arıza Kaydı], [Veriliş Tarihi], [Bakım Tarihi], [İade Tarihi] ) " & _
"SELECT '" & Me.Metin2 & "' AS E1, '" & Me.Metin189 & "' AS E2, '" & Me.Metin10 & "' AS E3, 4 AS E4, 5 AS E5, 6 AS E6, 7 AS E7, 10 AS E10, 11 AS E11, 8 AS E8, 9 AS E9, 12 AS E12"
MsgBox ("Kaydedildi")
.......
End sub
Satis tablosu girileek veri alan siralamasi ile SELECT satiri alan siralamasi verilerine ait alanlar ayni olmak suretiyle degistiriniz.

Dsezgin hocam yardımlarınız için çok teşekkür ediyorum.

Madde 2 de geçici nesnesi zaten var diye hata veriyor. (Üstteki excele aktar butonuna tıklayınca)

Alttakine tıklayınca da aynı hatayı veriyor. Birindeki geçicileri iadesi yaklaşan diye adlandırdım yine aynı hatayı alıyorum. Ayrıca hocam bu acces nerde ise exceli de oraya atsın istiyorum. Başlangıçta öyle çalışıyordu.

Madde 3 de sadece gün sayısını yazınca o sayı ve altındakileri getirsin istiyorum hocam. Ayrıca sorgu pivotunda iade tarihinin sorgu bölümüne is not null yazdım. Listeye iade tarihi girilmeyenler gelmesin diye fakat beceremedim.

Madde 4 verdiğin kodaları girdim hocam. Satıs tablosunu da düzenledim. Ellerine sağlık. Yalnız liste 19 daki kayıt işlemini yapmıyor. Satıs tablosuna gidiyor fakat liste 19 daki fonskiyonlarını yapmıyor.

Hocam bunlara da bakabilirsen çok sevinirim.Yardımlarını rica ediyorum.