Sub litre_Kg_Maliyetleri_Getir(ByVal syf As Worksheet) içindeki alttaki yeri gabiba siz eklediniz.Bilmiyorum doğrumu ve yanlışsa resimdek, verilern geldiği şekilde dosyayı ekleyin test edeyim.
Kod:
.Cells(araToplamLT, "D").Value = .Cells(araToplamLT, "D").Value + .Cells(araToplamLT, "D").Value * .Cells(araEkgider, "D")
