vbada yazdigim programda ondalikli saylari excelde tanimiyor

[sarper]

Function modul(a As Integer)
If a < 0 Then modul = "modül değeri sıfırdan küçük olamaz"
If a > 0 And a <= 1.125 Then modul = "1"
If a > 1.125 And a <= 1.375 Then modul = "1.25"
If a > 1.375 And a <= 1.625 Then modul = "1.5"
If a > 1.625 And a <= 1.875 Then modul = "1.75"
If a > 1.875 And a <= 2.125 Then modul = "2"
If a > 2.125 And a <= 2.375 Then modul = "2.25"
If a > 2.375 And a <= 2.625 Then modul = "2.5"
If a > 2.625 And a <= 2.875 Then modul = "2.75"
If a > 2.875 And a <= 3.125 Then modul = "3"
If a > 3.125 And a <= 3.375 Then modul = "3.25"
If a > 3.375 And a <= 3.625 Then modul = "3.5"
If a > 3.625 And a <= 3.875 Then modul = "3.75"
If a > 3.875 And a <= 4.25 Then modul = "4"
If a > 4.25 And a <= 4.75 Then modul = "4.5"
If a > 4.75 And a <= 5.25 Then modul = "5"
If a > 5.25 And a <= 5.75 Then modul = "5.5"
If a > 5.75 And a <= 6.25 Then modul = "6"
If a > 6.25 And a <= 6.75 Then modul = "6.5"
If a > 6.75 And a <= 7.5 Then modul = "7"
If a > 7.5 And a <= 8.5 Then modul = "8"
If a > 8.5 And a <= 9.5 Then modul = "9"
If a > 9.5 And a <= 10.5 Then modul = "10"
If a > 10.5 And a <= 11.5 Then modul = "11"
If a > 11.5 And a <= 12.5 Then modul = "12"
If a > 12.5 And a <= 13.5 Then modul = "13"
If a > 13.5 And a <= 14.5 Then modul = "14"
If a > 14.5 And a <= 15.5 Then modul = "15"
If a > 15.5 And a <= 17 Then modul = "16"
If a > 17 And a <= 19 Then modul = "18"
If a > 19 And a <= 21 Then modul = "20"
If a > 21 And a <= 23.5 Then modul = "22"
If a > 23.5 And a <= 26.5 Then modul = "25"
If a > 26.5 And a <= 30 Then modul = "28"
If a > 30 And a <= 34 Then modul = "32"
If a > 34 And a <= 38 Then modul = "36"
If a > 38 And a <= 50 Then modul = "40"
If a > 50 Then modul = "modulün bu kadar büyük olduğuna emin misiniz?"
End Function

------
bu komutlar1 yaz1yorum ard1ndan
hücreye=modul(b1)
b1 e 1.24 yazigimda kabul etmiyo(tarihe çeviriyo)
virgüllüde de(1,24) yine dogru çalismiyo...
:agla: yarddiimmm eddiiinnn

 

[Levent Menteşoğlu]

modul = "1.25" şeklinde yazarsanız bu metin yada tarih olarak kabul edebilir. modul=1,25 olarak yazarak deneyin. Sanırım meslektaşız dişli çark hesabındamı kullanıyorsunuz.

 

[danersin]

Function modul(a As Integer)


a'yı integer olarak tanımlamışsınız ama gördüğüm kadarı ile kesirli satırlar ile ilgileniyorsunuz :? , variant yapınca fonksiyon istediğiniz gibi çalışıyormu bir deneyin isterseniz.

 

[sarper]

ewet mak müh .öğrencisiyim. ve redüktör hesabını excel ile yapmaya çalışıyorum. 1.25 yazdığım zaman metin veya tarih olarak algılamaması mükünmü ;nasıl?

 

[sarper]

cevaplarınız için çok teşekkürler .. daha önerileri deneyemedim . eğer problem çıkarsa yine kapınızdayım...ii çalışmalar

 

[veyselemre]

bölge ve dil seçeneklerinden

başlat>denetim masası>bölge ve dil seçenekleri>bölgesel seçenekler>özelleştir>
ondalık simgesi . seç