sevgili arkdaşlar,
bir liste sayfasına kayıt edilin kişileri ödeme biligilerini bilgi sayfasındaki listbox ta çağırıldığında ödemelri türlerine göre listelemesini istiyorum bana bu konuda yardımcı olacak arkadaşlara :dua: ederim.
Listbox'ınıza aşağıdaki kodları atayıp bir deneyin.
Sub Makro2()
Range("b9:n20").ClearContents
For k = 9 To 20
For n = 2 To Sheets("LİSTE").Cells(65536, 1).End(xlUp).Row
If Sheets("LİSTE").Cells(n, 3) = Cells(3, 2) And Sheets("LİSTE").Cells(n, 5) = Cells(k, 1) Then
Cells(k, 2) = Cells(k, 2) + Sheets("LİSTE").Cells(n, 6)
End If
Next n
Next k
End Sub
Sizlere daha iyi bir deneyim sunabilmek icin sitemizde çerez konumlandırmaktayız, web sitemizi kullanmaya devam ettiğinizde çerezler ile toplanan kişisel verileriniz Veri Politikamız / Bilgilendirmelerimizde belirtilen amaçlar ve yöntemlerle mevzuatına uygun olarak kullanılacaktır.