Aynı hücrede iki rakam arasındaki boşluğun silinmesi

[ferhatca]

Merhabalar,
Elimde 3600 satırlık veri dosyası var ve sütunların birinde rakamlar altalta 125 325 111, 1245 325 11 , 12 1253 141 vs. şeklinde yazılı.Bu işi fonksiyon kullanarak (sonuç 125325111, 124532511, 121253141 vs. olacak şekilde) aralarındaki boşlukları yokedebilir miyim?
Saygılarımla,

:yardim: :yardim:

 

[Zeki Gürsoy]

Verileriniz hangi sütunda? Hangi hücreden başlıyor?

 

[Ali]

=YERİNEKOY(A1;" ";"") kullanabilirsiniz. Hücre başındada boşluk olabilir diye

=KIRP(YERİNEKOY(A1;" ";"")) şeklindede kullanabilirsiniz.

Makro ile isterseniz. Boşlukların yok sayılacağı hücreleri seçip

Sub boşluksil()
Selection.Replace What:=" ", Replacement:="", _
LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False
End Sub

makrosunu çalıştırabilirsiniz.

 

[Leoncio]

Alternatif olması açısından; Sayısal hale getirilebilir.

Sub BoşluklarıKaldır()
Cells.Replace What:=" ", Replacement:=""
Selection.NumberFormat = "#,##0"
End Sub

 

[Suskun]

Eğer rakam girişlerinin tamamı sayısalsa Hücre biçimlendirden "### ### ###" formatı uygulanmış olabilir.Sayı formatını genel olarak ayarlarsanız fonksiyonlara gerek kalmayabilir.