mrb
taruz hocamın cok önceleri çözmüş olduğu bir konuda farklı bir problemim var.

http://www.access-sql.com/Konu-liste-kut...ami?page=3

problemim form üzerindeki listbox daki rakamsal değerler ado ile toplanıp metin kutularuna yazdırılabiliyor.buraya kadar herşey normal .
listbox forum üzerine yerleştirilen bir combobox ile ölçütlendirildiğinde hesaplama işlemi çalışmamaktadır. şimdiden teşekkürler.

sorgu1'in ad & " " & soyad arasindaki " isaretini '(kesme) isareti ile degistirin ve VBA da sorgu1 satirini asagida ki gibi degistirin.
private sub Komut6_Click()
.....
sorgu1 = Replace(Liste0.RowSource, "[Forms]![Form1]![AK1]", [Forms]![Form1]![AK1])
.....
end sub

teşekkürler sayın sezgin.



Bu şekilde çalıştı.

Durumu biraz daha zorlayayım dedim.

TRH1 ve TRH2

2 adet metin kutumuz var form üzerinde.
Tablomuza ve listboxa tarih alanı ekledik iki tarih aralığında filtreledik.
Bu durumda kodda nasıl bir değişiklik yapmak gerekecek.

mesela



Gibi denedim olmadı. acaba kodda ne gibi bir değişiklik gerekli şimdiden teşekkürler.

sorgu1 = Replace(Replace(Liste0.RowSource, "[Forms]![Form1]![TRH1]", "#" & Format(Me.TRH1, "mm\/dd\/yyyy") & "#"), "[Forms]![Form1]![TRH2]", "#" & Format(Me.TRH2, "mm\/dd\/yyyy") & "#")

olabilir.

teşekkür ederim sayın sezgin. bu kod çalıştı.

sorgu1 = Replace(Replace(Liste0.RowSource, "[Forms]![Form1]![TRH1]", "#" & Format(Me.TRH1, "mm\/dd\/yyyy") & "#"), "[Forms]![Form1]![TRH2]", "#" & Format(Me.TRH2, "mm\/dd\/yyyy") & "#")