AccessTr.neTMicrosoft AccessAccess Cevaplanmış Soruları

Liste kutusunda belirli bir sutundaki verilerin toplamı

1 2
27/04/2010, 10:56

mustafa_atr

Öncelikle herkese selamlar.
Formumda, açılan kutular vasıtasıyla liste kutusuna çekmiş olduğum verilerden süzme yapıyorum. liste kutusunda yaklaşık 10 tane sutunum var. ben 5. sutunda yer alan rakamsal verilerin toplamını yine aynı form üzerinde bir metin kutusunda göstermek istiyorum. Bunu nasıl yapacağım hakkında bir fikriniz varmıdır? Bunu rapor hazırlayarak yapabiliyorum ancak, hiç rapor açtırmadan direk filtreleme ekranında bazı alanlara ait veri toplamlarını görebilmem gerekiyor.
27/04/2010, 11:53

Kur@l

İstediğiniz Ektedir... Kolay Gelsin...
27/04/2010, 12:19

mustafa_atr

Kural hocam vakit ayırdığın için , emeğin için sağol.
çok güzel bir uygulama. Aklıma takıldı acaba seçim yaptırmadan nasıl toplata biliriz. şimdi tırmalama modundayım
27/04/2010, 12:49

Kur@l

Hallettim... kodu bu şekilde değiştirin işlem tamam olacaktır. ozaman seçmeye gerek kalmıyor. kolay gelsin...
Kod:
Private Sub Komut4_Click()
Dim i, say, toplam As Integer
Dim toplamm As Variant
say = Me.Liste0.ListCount
for i = 0 To say - 1
toplam = toplam + Me.Liste0.Column(3, i)
Next
Me.Metin2.Value = toplam
End Sub
27/04/2010, 13:47

mustafa_atr

Hocam tam istediğim gibi oldu. çok işime yaracak
Ellerine sağlık
27/04/2010, 14:14

assenucler

Sayın Kural;

Katkınız için çok teşekkür...
1 2