Hesaplama

Katılım
7 Eylül 2005
Mesajlar
112
Merhaba arkadaşlar,

adet = 4
tür = R
ise
sonuç= 4,5 yazacak bir formül..

Arkadaşlar, şimdi benim yapmak istediğim, kullanıcı farklı türlerden R'yi seçsin, adeti'de 4 olarak girirse sonuç'a 4,5 yazsın..

Örnekler ise;

Adet:1 ise Tür:R ise sonuç 2
Adet:2 ise Tür:R ise sonuç 2,5
Adet:3 ise Tür:R ise sonuç 3 vs.

kullanıcı aşağıdaki türü seçersede;
Adet:1 ise Tür:BR ise sonuç 1
Adet:2 ise Tür:BR ise sonuç 1,5
Adet:2 ise Tür:BR ise sonuç 1,5

gibi bu şekilde bir hesaplatma yapmak istiyorum.
 
Katılım
25 Aralık 2005
Mesajlar
4,160
Excel Vers. ve Dili
MS Office 2010 Pro Türkçe
Sayın zafer007,

Küçük bir örnek ekleyin üstünde yapayım.

Çünkü adet ve türün alındığı yere göre yazılması gerekir. Ayrıca tabi özel bir fonksiyon da yazılabilir.

İyi çalışmalar
 
Katılım
25 Aralık 2005
Mesajlar
4,160
Excel Vers. ve Dili
MS Office 2010 Pro Türkçe
Kod:
Adet:1 ise Tür:R ise sonuç 2
Adet:2 ise Tür:R ise sonuç 2,5
Adet:3 ise Tür:R ise sonuç 3 vs.
demişsiniz adet 4 ise 3,5 mu demek yoksa adet enfazla 3 mü dır?

Eğer yukarıdaki mantıkla haraket ediliyorsa şu fonksiyon işinize yarar.

Public Function sonuc(adet As Integer, tur As String) As Variant
If tur = "R" Then
sonuc = 1.5 + adet * 0.5
Else
sonuc = 0.5 + adet * 0.5
End If
End Function


Sorguda kullanacaksanız sorgu sütununa
Deyim1:sonuc([adetalanadı];[türalanadı])

olarak, formda ise sonucun yazılacağı metin kutusunun veri alanına.

=sonuc([adetmetinkutusuadı];[türmetinkutusuadı])

olarak kullanın.
 
Son düzenleme:
Katılım
7 Eylül 2005
Mesajlar
112
Sn, modalı

ilginize ilk önce teşekkür ederim..

Benim burda yapmak istediğim, kritere göre hesaplama yapmak.
Adet istediğiniz kadar girebilrsiniz.

TÜR R ise, Adet'de 1 ise, Sonuç 3'dür Her artan adet için 0,5 eklemeli
TÜR BR ise, Adet'de 1 ise, Sonuç 1'dir. Her artan adet için 0,75 eklemeli gibi.
 
Katılım
25 Aralık 2005
Mesajlar
4,160
Excel Vers. ve Dili
MS Office 2010 Pro Türkçe
O zaman yukarıdaki fonksiyonu bir modüle kopyalayıp yapıştırın.

Güle güle kullanın.

İyi çalışmalar
 
Katılım
25 Aralık 2005
Mesajlar
4,160
Excel Vers. ve Dili
MS Office 2010 Pro Türkçe
Tabi 0,75 en başta verdiğiniz örneğe uymuyor.
 
Üst