Sonucu Sıfıra Yada Beşe Yuvarla

1 2
14/02/2022, 13:01

husem

merhaba arkadaşlar,
fiyat artırımı yaparken artırılan miktarın virgülden sonraki değeri : 0,75    -  0,80    - 0,85    1,25    -  1,30    -  3,55  - 3,60 gibi olacak,  kusurat olmayacak, nasıl yukarı yuvarlayabilirim acaba?
rakamın sonu hep 5 yada 0 sıfır olacak.

örnek:
1,67==>> 1,70
1,71==>> 1,75
0,63==>> 0,65
0,52==>> 0,55
0,49==>> 0,50
1,96==>> 2,00
3,72==>> 3,75
2,51==>> 2,55 gibi olacak.

yardımlarınız için şimdiden çok teşekkür ederim,
14/02/2022, 13:32

berduş

bu işlemi nerede yapmak istediğinizi tam anlamadım ama bir modüle aşağıdaki fonksiyonu ekleyip sorgu içinden çağırabilirsiniz?
Function Yuvarla(byval Sayi As Double) As Double
    Yuvarla = -Int(-Sayi * 100 / 5) * 5 / 100
End Function
RENK_FIYATI İstenen
0,3900 ==>> 0,40
0,4400 ==>> 0,45
0,4725 ==>> 0,50
0,4900 ==>> 0,50
0,5000 ==>> 0,50
0,5200 ==>> 0,55
0,5250 ==>> 0,55
0,6300 ==>> 0,65
0,6700 ==>> 0,70
0,6825 ==>> 0,70
0,7350 ==>> 0,75
0,8400 ==>> 0,85
0,8400 ==>> 0,85
1,6700 ==>> 1,70
1,6800 ==>> 1,70
1,7100 ==>> 1,75
1,8375 ==>> 1,85
1,9600 ==>> 2,00
2,5100 ==>> 2,55
3,7200 ==>> 3,75
14/02/2022, 14:22

husem

eklemiş olduğum formda, fiyat değişikliği yapılmak istendiğinde kullanacağım.
fonksiyon doğru çalışıyor,
yapmak istediğim de buydu,
çok teşekkür ederim,
14/02/2022, 14:23

berduş

kendi çalışmanıza uyarlayabildiniz mi?
çözülmüşlere taşıyalım mı?
14/02/2022, 14:26

husem

uyguladım,
süper oldu.
14/02/2022, 14:27

berduş

iyi çalışmalar
kolay gelsin
1 2