Sıfırdan Farklı Değerleri Alma

[tuvons]

Arkadaşlar merhaba,

Aşağıdaki gibi eğer "0" dan farklı ise diye bir kod yazdım ama bu kodda "1,49011611938477E-08" değerindeki ifadeler de geliyor. Sayıların gösterimi "0,00" olmasına rağmen makro bunları sıfırdan farklı olarak görüp koşula kabul ediyor.

Bunu nasıl engelleyebilirim. Benim amacım hücredeki değer "0,00" dan farklı ise işlem yapması.

If Cells(x, 4) <> 0# Then

 

[mancubus]

?

If Format(Cells(x, 4), "0") <> 0

 

[tuvons]

Çok teşekkür ederim @mancubus

 

[mancubus]

Rica ederim.