• DİKKAT !

    Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı ya da giriş yapmalısınız. Foruma üye olmak Dosya Yükleme tamamen ücretsizdir.

Çözüldü If yapısı hatası

Bu konu çözüldü olarak işaretlenmiştir. Çözülmediğini düşünüyorsanız konuyu rapor edebilirsiniz.
Durum
Konu Çözümlendiği İçin Kapatılmıştır.

gultekinkaymaz

Yeni Üye
Katılım
7 Şub 2022
Mesajlar
124
Aldığı beğeni
17
Excel V
Office 2016 TR
Konu Sahibi
If Format(CDbl(TextBox14.Value), "#,##0.00") < Format(CDbl(TextBox34.Value), "#,##0.00") And Format(CDbl(TextBox33.Value), "#,##0.00") < Format(CDbl(TextBox34.Value), "#,##0.00") Then

TextBox27.Value = Format(CDbl(TextBox13.Value) * (CDbl(TextBox39.Value) / 100), "#,##0.00")

ElseIf Format(CDbl(TextBox14.Value), "#,##0.00") < Format(CDbl(TextBox34.Value), "#,##0.00") And Format(CDbl(TextBox33.Value), "#,##0.00") > Format(CDbl(TextBox34.Value), "#,##0.00") And Format(CDbl(TextBox33.Value), "#,##0.00") < Format(CDbl(TextBox35.Value), "#,##0.00") Then

TextBox27.Value = Format(((CDbl(TextBox34.Value) - CDbl(TextBox14.Value)) * (CDbl(TextBox39.Value) / 100)) + ((CDbl(TextBox33.Value) - CDbl(TextBox34.Value)) * (CDbl(TextBox40.Value) / 100)), "#,##0.00")

Yukarıdaki formülde ilk şart sağlanıyorsa hesaplamayı yapıyor fakat ikinci şart için işlem yapmıyor hata veriyor nerede hata yapıyorum?
 
Çözüm
Örneğinizi eklerseniz çözüm net olur..
Yine de;
If ifadesindeki 'Format' kullanımı sonucu etkiliyor olabilir
If Format(CDbl(TextBox14.Value), "#,##0.00") < Format(CDbl(TextBox34.Value), "#,##0.00") yerine
If CDbl(TextBox14.Value)<CDbl(TextBox34.Value) şeklinde kullanmanızı öneririm.
Örneğinizi eklerseniz çözüm net olur..
Örneğinizi eklerseniz çözüm net olur..
Yine de;
If ifadesindeki 'Format' kullanımı sonucu etkiliyor olabilir
If Format(CDbl(TextBox14.Value), "#,##0.00") < Format(CDbl(TextBox34.Value), "#,##0.00") yerine
If CDbl(TextBox14.Value)<CDbl(TextBox34.Value) şeklinde kullanmanızı öneririm.
Örneğinizi eklerseniz çözüm net olur..
 
Çözüm
Konu Sahibi
Örneğinizi eklerseniz çözüm net olur..
Yine de;
If ifadesindeki 'Format' kullanımı sonucu etkiliyor olabilir
If Format(CDbl(TextBox14.Value), "#,##0.00") < Format(CDbl(TextBox34.Value), "#,##0.00") yerine
If CDbl(TextBox14.Value)<CDbl(TextBox34.Value) şeklinde kullanmanızı öneririm.
Örneğinizi eklerseniz çözüm net olur..
Aynen dediğiniz gibi format kullanımını kaldırınca sorun çözüldü hesaplamayı yaptı. Çok teşekkür ederim
 
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
Geri
Üst