Ssk Dan Excele

[yakup70]

Ssk sitesinden borç durumunu gösteren tabloyu Excelin A1 hücresine yapıştırdım.Ve bazı düzenlemeler için ekteki makroyu ve örneği yolluyorum.Tabloda hücre içindeki rakamların sağ ve sollarında boşluklar var.Örneğin bana lazım olan K-O sütunundaki verileri toplayamıyorum.Sayı olarak görmüyor.Bu sütunları kopyalayıp word dosyasına yapıştırıp sonra word dosyasından tekrar kopyalayıp excel K1 hücresine özel yapıştır-metin olarak deyince oluyor.Ama bunu excel makrosu içerisinde yapabilirmiyim.Umarım anlatabilmişimdir.

 

[htsumer]

Ayrı bir hücreye 1 sayısını yazıp kopyala
Daha sonra metin olarak görünen sayıları seç ve üzerinde özel yapıştır>>çarp kısmını işaretle
Olması gerek.Denemedim..

 

[yakup70]

Olmuyor.Sayıların sağında ve solunda boşluk karakterleri hala var.

 

[Necdet]

Merhaba,

Bul Değiştir (Ctrl+H)

Aranana Alt+0160
Değiştirilecek Karaktere hiç bir şey yazmayın

Hepsini değiştir.

 

[yakup70]

Malisef oda olmadı.
http://www.sobolsoft.com bu sitede (Excel Remove (Delete, Replace) Text, Spaces & Characters From Cells Software) programı bu işi yapıyor.Ama makro olarak yapmak istiyorum.

 

[Necdet]

Ben yapıyorum oluyor da siz yapınca neden olmuyor?

 

[Necdet]

Buyrunuz dosyanız hazır.

 

[Necdet]

Bu da sözünü ettiğim işin makro kaydet ile ortaya çıkan makronun düzenlenmiş hali.

Sub BasilmayanKarakterleriSil()
Application.ScreenUpdating = False
ActiveSheet.UsedRange.Replace What:=" ", Replacement:="", LookAt:=xlPart, _
    SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
    ReplaceFormat:=False
Application.ScreenUpdating = True
End Sub

 

[yakup70]

Çok Çok teşekkür ederim Necdet bey.İyiki varsınız.