- Katılım
- 18 Şubat 2020
- Mesajlar
- 8
- Excel Vers. ve Dili
- Microsoft Office 2016
- Altın Üyelik Bitiş Tarihi
- 10-02-2024
Herkese merhaba,
aşağıda yer alan excel formülünü vba koduna çevirerek kullanmaya çalıştığımda bazı durumlarda hata veriyor mesela aylık matrah 15.000 süregelen matrah 25.000 olursa hesaplamayı doğru yapıyor fakat aylık matrah 6.079,39 süregelen matrah 0,00 TL ise hata veriyor aynı tutarlar excel formülünde gayet başarılı şekilde sonuç veriyor. Kodu düzenlerken nerede hata yapıyorum?
TextBox13.Value = T9 ve TextBox14.Value = U9 olacak şekilde
Makro Kodu
GV = Evaluate("SUMPRODUCT(--(" & CDbl(TextBox13.Value) & "+" & CDbl(TextBox14.Value) & ">VERGİLER!$D$1:$D$5), (" & CDbl(TextBox13.Value) & " +" & CDbl(TextBox14.Value) & "-VERGİLER!$D$1:$D$5),VERGİLER!$E$2:$E$6-VERGİLER!$E$1:$E$5)-SUMPRODUCT(--(" & CDbl(TextBox14.Value) & ">VERGİLER!$D$1:$D$5), (" & CDbl(TextBox14.Value) & "-VERGİLER!$D$1:$D$5), VERGİLER!$E$2:$E$6-VERGİLER!$E$1:$E$5)")
Excel Formülü :
TOPLA.ÇARPIM(--(T9+U9>VERİLER!$E$1:$E$5); (T9+U9-VERİLER!$E$1:$E$5);VERİLER!$F$2:$F$6-VERİLER!$F$1:$F$5)-TOPLA.ÇARPIM(--(U9>VERİLER!$E$1:$E$5); (U9-VERİLER!$E$1:$E$5); VERİLER!$F$2:$F$6-VERİLER!$F$1:$F$5))
Kullanıcı Adı : admin
Şifre : 1234
VBA kod şifresi : 03mayis1907
EkÖdemeHesaplama Formunda hesaplama butonunda düzenleme yapılması gerekiyor
aşağıda yer alan excel formülünü vba koduna çevirerek kullanmaya çalıştığımda bazı durumlarda hata veriyor mesela aylık matrah 15.000 süregelen matrah 25.000 olursa hesaplamayı doğru yapıyor fakat aylık matrah 6.079,39 süregelen matrah 0,00 TL ise hata veriyor aynı tutarlar excel formülünde gayet başarılı şekilde sonuç veriyor. Kodu düzenlerken nerede hata yapıyorum?
TextBox13.Value = T9 ve TextBox14.Value = U9 olacak şekilde
Makro Kodu
GV = Evaluate("SUMPRODUCT(--(" & CDbl(TextBox13.Value) & "+" & CDbl(TextBox14.Value) & ">VERGİLER!$D$1:$D$5), (" & CDbl(TextBox13.Value) & " +" & CDbl(TextBox14.Value) & "-VERGİLER!$D$1:$D$5),VERGİLER!$E$2:$E$6-VERGİLER!$E$1:$E$5)-SUMPRODUCT(--(" & CDbl(TextBox14.Value) & ">VERGİLER!$D$1:$D$5), (" & CDbl(TextBox14.Value) & "-VERGİLER!$D$1:$D$5), VERGİLER!$E$2:$E$6-VERGİLER!$E$1:$E$5)")
Excel Formülü :
TOPLA.ÇARPIM(--(T9+U9>VERİLER!$E$1:$E$5); (T9+U9-VERİLER!$E$1:$E$5);VERİLER!$F$2:$F$6-VERİLER!$F$1:$F$5)-TOPLA.ÇARPIM(--(U9>VERİLER!$E$1:$E$5); (U9-VERİLER!$E$1:$E$5); VERİLER!$F$2:$F$6-VERİLER!$F$1:$F$5))
Kullanıcı Adı : admin
Şifre : 1234
VBA kod şifresi : 03mayis1907
EkÖdemeHesaplama Formunda hesaplama butonunda düzenleme yapılması gerekiyor
Ekli dosyalar
-
1.1 MB Görüntüleme: 11
Son düzenleme: