Sütunlarda eşleşen değerleri toplama

[emrecansss]

Merhbalar,

Resimde görülen sütunlardan, Eğer B ve C sütununda bulunan iki değer birbiryle eşleşiyor ise, bu değerlerin D satırında bulunan rakamları birbirleriyle toplamak istiyorum.

örnek olarak; C sutünunun herhangi bir satırındaki (KM0040100100544) değerinin aynısı B sütununda var ise bu satırların D sütunu değerlerini (2+25) toplamak istiyorum.

yardımlarınız için teşekkürler..

 

[Ömer BARAN]

Merhaba, foruma hoşgeldiniz.

İsterseniz sorunuzu gerçek belgenizle aynı yapıda ve olması gereken sonuçların elle yazıldığı bir örnek belge ile destekleyin.
Böylece daha hızlı ve kesin sonuca ulaşabilirsiniz.

Örnek belge özelikleri ve örnek belge yükleme yöntemine ilişkin açıklama, cevabımın altındaki İMZA bölümünde var.
.

 

[emrecansss]

http://s4.dosya.tc/server4/xe0tml/km1.xlsx.html

Teşekkürler bilgilendirme için. Excel linkini yükledim.

Excele bakıldığında, B ve C sütunlarında eşleşen ürün kodu var ise (Sarı ile işaretlide olduğu gibi), bu kodların D ve E sütünlarında yer alan verilerinin birbirleriyle toplamını elde edebilir miyim? (total sold ve Gross da olduğu gibi)

Teşekkürler.

 

[Mustafa MUTLU]

Macro olur mu ?

 

[Mustafa MUTLU]

Macro istersen buyur..

Sub KONTROL_ET()
Dim MSTF, MSTF1
Range("F2:G65536").ClearContents
For MSTF = 2 To Cells(65536, "C").End(xlUp).Row
For MSTF1 = 2 To Cells(65536, "B").End(xlUp).Row
If Cells(MSTF, "C") = Cells(MSTF1, "B") Then
Cells(MSTF, "F") = Cells(MSTF, "F") + Cells(MSTF, "D") + Cells(MSTF1, "D")
Cells(MSTF, "G") = Cells(MSTF, "G") + Cells(MSTF, "E") + Cells(MSTF1, "E")
End If
Next
Next
MsgBox " İşlem Tamam", vbExclamation, "Mustafa MUTLU Tel: 0 533 740 45 49"
End Sub

 

[resvan]

Merhabalar. Benzer bir uygulamaya benimde ihtiyacım var. Sayfa1 deki A, sütununda ürün ismi bulunmakta sütunda birkaç isim var. Bu isimlerin karşısındaki rakamları Sayfa2 de belirlediğim hücrenin içine toplayarak nasıl atabilirim. Yardımlarınızı rica eder şimdiden teşekkür ederim.

 

[Korhan Ayhan]

Merhabalar. Benzer bir uygulamaya benimde ihtiyacım var. Sayfa1 deki A, sütununda ürün ismi bulunmakta sütunda birkaç isim var. Bu isimlerin karşısındaki rakamları Sayfa2 de belirlediğim hücrenin içine toplayarak nasıl atabilirim. Yardımlarınızı rica eder şimdiden teşekkür ederim.

Merhaba,

ETOPLA+ÇOKETOPLA+TOPLA.ÇARPIM fonksiyonları işinize yarayabilir.

Ek olarak ÖZET TABLO kullanabilirsiniz.

 

[Korhan Ayhan]

http://s4.dosya.tc/server4/xe0tml/km1.xlsx.html

Teşekkürler bilgilendirme için. Excel linkini yükledim.

Excele bakıldığında, B ve C sütunlarında eşleşen ürün kodu var ise (Sarı ile işaretlide olduğu gibi), bu kodların D ve E sütünlarında yer alan verilerinin birbirleriyle toplamını elde edebilir miyim? (total sold ve Gross da olduğu gibi)

Teşekkürler.

Merhaba,

Aşağıdaki formülleri deneyiniz.

F2;

=EĞER(EĞERSAY(C:C;B2)=0;0;ETOPLA(B:B;B2;D:D)+ETOPLA(C:C;B2;D:D))

G2;

=EĞER(EĞERSAY(C:C;B2)=0;0;ETOPLA(B:B;B2;E:E)+ETOPLA(C:C;B2;E:E))

 

[emrecansss]

Macro istersen buyur..

Sub KONTROL_ET()
Dim MSTF, MSTF1
Range("F2:G65536").ClearContents
For MSTF = 2 To Cells(65536, "C").End(xlUp).Row
For MSTF1 = 2 To Cells(65536, "B").End(xlUp).Row
If Cells(MSTF, "C") = Cells(MSTF1, "B") Then
Cells(MSTF, "F") = Cells(MSTF, "F") + Cells(MSTF, "D") + Cells(MSTF1, "D")
Cells(MSTF, "G") = Cells(MSTF, "G") + Cells(MSTF, "E") + Cells(MSTF1, "E")
End If
Next
Next
MsgBox " İşlem Tamam", vbExclamation, "Mustafa MUTLU Tel: 0 533 740 45 49"
End Sub

Çok teşekkürler, işimi gördü elinize sağlık

 

[Mustafa MUTLU]

Çok teşekkürler, işimi gördü elinize sağlık

Rica ederim.
İşinizi gördü ise ne mutlu..