(26/11/2020, 14:48)berduş yazdı: kodu aşağıdakiyle değiştirip dener misiniz?
yine fonksiyon gerekti ama daha basit gibi geldi.
Public Function fNewRound(mikSayi As Double, kusurat As Integer)
fNewRound = Format(mikSayi, "0." & String(kusurat, "0"))
End Function
Bu arada kod içerisindeki ifadeyi sorguda alan formülü olarak denedim, çalıştı.
Bu şekilde çok daha iyi oldu.