I 13 HÜCRESİ BARAJ TABLODA SONDA OLACAK
Günlük Haftalık Aylık Yıllık Raporlama İçin İlgili Hücrelere Verileri Yazma
yapılanlar:
1 - aylıkk.accdb accesse gün/hafta/ay/yıl sorguları eklendi isimleri önemli değiştirilmemeli
2 - Excel dosyasına TmpRapor adlı sayfa eklendi
3 - Excel dosyasına MdlRapor adlı Modül eklendi
modüldeki fonksiyon kodu:
excel/pdf yapma kodları yok
ListView deki başlıklar tablodan geldiği için biraz uyumsuz ama o kısım başlık adlarından replace ile toplam yazan kısım çıkarılarak halledilebilir
1 - aylıkk.accdb accesse gün/hafta/ay/yıl sorguları eklendi isimleri önemli değiştirilmemeli
2 - Excel dosyasına TmpRapor adlı sayfa eklendi
3 - Excel dosyasına MdlRapor adlı Modül eklendi
modüldeki fonksiyon kodu:
Function RaporKaynak(xSorgu As String, xKriter As String)
connection_open
sql1 = "select * from TumTbl" & xSorgu & " where TrhKrt='" & xKriter & "';"
rsGrf.Open sql1, conn, adOpenKeyset, adLockPessimistic
Worksheets("TmpRapor").Cells.Clear
Worksheets("TmpRapor").Range("A1").CopyFromRecordset rsGrf
rsGrf.Close
conn.Close
End Function
veri getieme butonlara ilgili kodlar eklendiexcel/pdf yapma kodları yok
ListView deki başlıklar tablodan geldiği için biraz uyumsuz ama o kısım başlık adlarından replace ile toplam yazan kısım çıkarılarak halledilebilir
Excel değil de Access tarafında tablolara ait yıl ve aylara ait verileri ile Günlük rapor alımını da excele atabileceğiniz şekilde düzenlendi.
"Dünyayı fazla düşünme."
(20/08/2020, 18:13)berduş yazdı: yapılanlar:Kolay gelsin teşekkürler hiç bir sıkıntı yok sorun çözülmüştür.Tek texbox olduğu için soruyorum .Haftalık veri almak için o haftanın içerisindeki bir tarihi girmemiz yeterli oluyor sanırım. Aylık ise her hangi bir tarihi girdiğimizde direk aylık toplamı getiriyor. Yılda ise sadece girilen yılı baza alarak veriyi getiriyor değil mi ?
1 - aylıkk.accdb accesse gün/hafta/ay/yıl sorguları eklendi isimleri önemli değiştirilmemeli
2 - Excel dosyasına TmpRapor adlı sayfa eklendi
3 - Excel dosyasına MdlRapor adlı Modül eklendi
modüldeki fonksiyon kodu:
veri getieme butonlara ilgili kodlar eklendiFunction RaporKaynak(xSorgu As String, xKriter As String)
connection_open
sql1 = "select * from TumTbl" & xSorgu & " where TrhKrt='" & xKriter & "';"
rsGrf.Open sql1, conn, adOpenKeyset, adLockPessimistic
Worksheets("TmpRapor").Cells.Clear
Worksheets("TmpRapor").Range("A1").CopyFromRecordset rsGrf
rsGrf.Close
conn.Close
End Function
excel/pdf yapma kodları yok
ListView deki başlıklar tablodan geldiği için biraz uyumsuz ama o kısım başlık adlarından replace ile toplam yazan kısım çıkarılarak halledilebilir
(20/08/2020, 18:39)userx yazdı: Excel değil de Access tarafında tablolara ait yıl ve aylara ait verileri ile Günlük rapor alımını da excele atabileceğiniz şekilde düzenlendi.Access açısından çoğu arkadaşın işine yarayacak bir çalışma elinize sağlık kolay gelsin.
Son Düzenleme: 21/08/2020, 08:53, Düzenleyen: merttr07.
evet ilgili aralıktaki 1 günü girmeniz yeterli
haftalık istediğinizde günü girerseniz o haftanın pazartesi-pazar arasını alır
ay istediğinizde ayın ilk ve son günü arasını alır
ufak 1kaç düzeltme yapmıştım dosyayı güncelleyeceğim
şu an için dikkatiniizi çeken bir sorun var mı?
haftalık istediğinizde günü girerseniz o haftanın pazartesi-pazar arasını alır
ay istediğinizde ayın ilk ve son günü arasını alır
ufak 1kaç düzeltme yapmıştım dosyayı güncelleyeceğim
şu an için dikkatiniizi çeken bir sorun var mı?
dilerim işinize yarar Access dosyasına yeni bir sorgu eklendi, başlıklar düzenlendi
Konuyu Okuyanlar: 3 Ziyaretçi