metin olarak saklanan sayı hatası..

[mecnun24_]

ekteki dosya bir proğramdan excele aktarılmış veriler. ancak verilerdeki boşluklar nedeniyle sayı olarak algılanmıyor.boşlukları kaldırmayı gene bu forumdan faydalanarak hallettim. ancak bu seferde metin olarak saklanan sayı hatası veriyor.hepsini tek seferde yapma yolu varmıdır.yardım edersiniz sevinirim. tşkrler.

 

[Orion1]

Dosyanız ekte.

Cells.Replace Chr(160), ""
    For Each huc In ActiveSheet.UsedRange
        huc.Value = RTrim(huc.Value)
        huc.Value = LTrim(huc.Value)
       [B][COLOR="Red"] huc.Value = CDbl(huc.Value)[/COLOR][/B]
    Next

 

[Orion1]

Dosyanız ekte.

Cells.Replace Chr(160), ""
    For Each huc In ActiveSheet.UsedRange
        huc.Value = RTrim(huc.Value)
        huc.Value = LTrim(huc.Value)
        [B][COLOR="Red"]huc.Value = CDbl(huc.Value)[/COLOR][/B]
    Next

 

[mecnun24_]

tşkrler ellerinize sağlık..