Ondalıklı Sayıyı Yazıya Çevirme

(13/12/2019, 17:44)berduş yazdı:

Sayiyi_Metne_CevirKr = mtnTL & " TL " & mtnKr & " Kuruş "

kodunu aşağıdakiyle değiştirip deneyin

Sayiyi_Metne_CevirKr = mtnTL & " TL " & IIf(CLng(TlKr(1)) <> 0, mtnKr & " Kuruş ", "")