hücre sonundaki boşluklar

[Jeeday]

Her HÜcrenİn Sonunda 1 Adet BoŞluk Karakterİ Mevcut Ve Onlari Yok Etmek İstİyorum.
Herhangİ Bİrİnde F2 İle Edİtlersenİz Daha Net AnlaŞilir Sanirim
Elİmde Kocaman Bİr Lİste Var… Bu İŞİ Makro İle Yapmayi Denedİm Beceremedİm…

İstedİĞİm TuŞ Kombİnasyonu:

B1 HÜcresİnde İken Önce F2 -> End -> Backspace -> Enter
Enterla Bİr Alt Satira İnİnce Ayni Kombİnasyonu Tekrarlasin Taaaa En Sona Kadar…

 

[Ali]

B sütununu seçin.
CTRL+H tuşuna basın.

Aranan kısmına ~ yazıp ara çubuğu ile bir boşluk bırakın.

Yeni değer kısmına birşey yazmayın ve tümünü değiştiri tıklayınız.

 

[Jeeday]

bu şekilde kelime aralarındaki boşluları da yok ediyor... ben sadece cümle sonundaki boşluklar gitsin istiyorum

 

[Ferhat Pazarçevirdi]

Merhabalar

Aşağıdaki kodu standart bir modül sayfasına kopyalayıp çalıştırınız.

Sub Bosluk_Al()
Dim i%
For i = 1 To Cells(65536, 2).End(xlUp).Row
    Cells(i, 2) = Left(Cells(i, 2), Len(Cells(i, 2)) - 1)
Next i
End Sub

 

[Jeeday]

nası yapıcam bunu?

 

[uzmanamele]

merhaba
ekdeki dosya işinizi görür mü?

 

[Ali]

Sub bosluksil()
For i = 1 To Cells(65536, 2).End(xlUp).Row
        Cells(i, 2) = Trim(Cells(i, 2))
Next i
End Sub