Sorgu Sonuçlarının Toplanması

Ay ay göstertmek istiyorum bu durumda kriter_Adi kısmına ne yazmam gerekmektedir?

aygoster: mid([tarih;4;2])

bu şekilde tarihin 31.12.2013 ise sadece 12 rakamını alacak bu şekilde ay ay gösterebilirsin. bu seferde yıllar karışacak onuda

yilgoster:mid([tarih;7;4])

yapıp süzdürürsün. fakat bunlar ölçüte değil. yeni alan olarak yazılacak. bu şekilde işini fazlası ile görecektir. bunlara ay seçimlerini 01, 02, 03 yerine ocak, şubat, mart şeklinde yapmak istersen vb kod yazmak gerekir veya Sql bölümünde IIF döngüsünü döndürmek gerekir. bununla ilgili yeni bir soruya küçük bir örnek ekler isen. yardımcı oluruz.

Konuyu toparlamak gerekir ise ;
Aşağıdaki kodta Kriter_Adi yazan yerlere
aygoster: mid([tarih;4;2])

kodlarınımı kopyalayacağım?

daha sonra bana ay ay adetleri verecek değilmi?Birde Benim alan adım DT mesela ancak 4 sorgunun birleşimindede var bu 4 adet DT yi kendimi toplayacak

Kusura bakmayın kod bilgim olmadığı için soruyorum.

teşekkürler şimdiden


Public Function Toplam_Al()
Dim KS As Recordset
Set KS = CurrentDb.OpenRecordset("SELECT Sum(Alan_Adi) AS Toplam FROM Tablo WHERE Kriter_Adi = " & Me.Kriter_Adi & "")
Toplam_Al = KS!Toplam
KS.Close
Set KS = Nothing
End Function