AccessTr.neT

Sayfalar: 1 2

Ö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.

İstediğiniz Ektedir... Kolay Gelsin...

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 Img-grin

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

Hocam tam istediğim gibi oldu. çok işime yaracak
Ellerine sağlık

Sayın Kural;

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

Sayfalar: 1 2

mustafa_atr

Kur@l

mustafa_atr

Kur@l

mustafa_atr

assenucler