Listbox da toplama cikarma

[enboy81]

Listbox a listelenen müşteri listesindeki alacakların toplanarak aşağı da texbox a yazilmasi ile ilgili makro kodları neler acaba

 

[ÖmerFaruk]

Alacaklarınızın 3.sütun olduğunu varsaydım.

Sub ListeTopla()
    Toplam=0
    For i=0 to ListBox1.ListCount-1
           Toplam=Toplam + ListBox1.List(i,3)
    Next i
    TextBox1=Toplam
End Sub

 

[byfika]

Merhabalar,
Örnek dosyadan yaralanabilirsiniz...

 

[enboy81]

Çok teşekkürler, ellerinize sağlık

 

[byfika]

Harici link yükleyeceğim

 

[byfika]

Harici link

İndir LİSTBOX FİLİTRELİ FİLTRESİZ SÜTUN TOPLAMA

Dosyayı indir LİSTBOX FİLİTRELİ FİLTRESİZ SÜTUN TOPLAMA

dosya.co

iyi çalışmalar...

 

[enboy81]

İki textbox ta gösterilen sayıların farkını yeni bir textbox ta nasıl gösterebiliriz

 

[byfika]

E sütununu filtreli ve filtresiz olarak, alacak toplamına
F sütununu filtreli ve filtresiz olarak, ödeme toplamına
FARK textbox'ına da hem filtreli hemde filtresiz olarak aralarındaki farkı yazmakta.

Hazırladığım klasörde :
CommandButton2 kodlarında altaki kod bu işlemi yapmakta.
TextBox3.Text = FormatNumber(t1) - FormatNumber(t2)

Ayrıca Kodların yanına açıklamaları mevcut.
Dosyayı indirip incelediğiniz de bunu göreceksiniz.

 

[enboy81]

Çok teşekkür ederim

 

[byfika]

Rica ederim
iyi çalışmalar...

 

[enboy81]

Rica ederim
iyi çalışmalar...

Hazırladığınız dosya çok güzel. Bu forma Yeni Kayıt için alan oluşturdum bağlantılarını yapamadım bakabilirmisiniz.
emekleriniz için şimdiden teşekkürler.
https://dosya.co/qk86oy2q7vu4/forma_kayıt_ekleme.xlsm.html

 

[enboy81]

listedeki ücretler 1.500,00 a çıkınca yani bin rakamına çıkınca toplamada hata veriyor.