Form Üzerinde İskontolu toplam.

[alpay1]

Form Üzerinde Ýskontolu toplam.

Değerli arkadaşlar,
Ben form üzerinde Ürün Adedi, Birim Fiyatı yazan TextBox lar var.Başka bir TBox ta toplam alıyorum.Fakat bazı ürünler iskontolu geliyor.İskontoyu düşüptoplamı almak istiyorum.Yardımcı olursanız sevinirim.Ã?ernek dosya ekte.
Teşekkürler.

 

[alpay1]

Ã?rnek Dosya:

 

[Levent Menteşoğlu]

Textbox7'ye yazılı makroyu aşağıdaki gibi değiştirin. Burada iskonto oranın 10 veya 20 gibi yüze bölünmeden yazıldığı kabul edilmiştir.

[vb:1:32d9e3ec64]Private Sub TextBox7_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox7 = Format(TextBox7.Value, "#,##0.00")
If IsNumeric(TextBox7) And IsNumeric(TextBox6) Then
If TextBox11 <> "" Then
TextBox8 = (CCur(TextBox7) - CCur(TextBox7) * CCur(TextBox11) / 100) * CCur(TextBox6)
Exit Sub
End If
TextBox8 = CCur(TextBox7) * CCur(TextBox6)
End If
End Sub
[/vb:1:32d9e3ec64]

 

[cihatkanbur]

iskontoyu yüzde( % ) olarak nasil aldirabiliriz

yani ben urunu yazacagim atiyorum

Cikolatali gofret 10 milyon iskonto kismina 2 yazacagim o otomatikman % olark algilayacak ve normal fiyattan %2 iskonto dusecek ..