Hücre icindeki degeri degistirme

[muratsedef]

Merhaba arkadaslar,

Hücre icindeki degerleri otomatik degistirtirmeye calisiyorum.

Örnek:

Hücrede bulunan deger: DK Malatya
Olmasi gereken deger: Malatya

Hücrede bulunan deger: DK Manisa
Olmasi gereken deger: Manisa

Yani eger basta "DK " varsa silinmesi gerekiyor.


Daha önce sayin zaferin verdigi kod "/" isaretinden önceki verileri ve kendisini silmesini sagliyor, fakat benim örnegime uyarlayamadim.

Sub ayir()
For i = 1 To Cells(65536, 1).End(xlUp).Row
a = Split(Cells(i, 1), "/")
Cells(i, 1) = a(UBound(a))
Next i
End Sub

Bu kodu gerektigi sekilde düzeltebilecek veya baska bir cözüm sunabileceklere cok teskkürler.

Saygilarimla
Murat

P.S: Lütfen kodu mesajin icerisinde gönderin. Dosyalari acmakta sorun yasiyorum.

 

[Recep İpek]

Aşağıdaki şekilde deneyiniz.

Sub ayir()
For i = 1 To Cells(65536, 1).End(xlUp).Row
a = Split(Cells(i, 1), " ")
Cells(i, 1) = a(UBound(a))
Next i
End Sub

 

[hamitcan]

Bul ve değiştiri kullarak yapabilirsiniz.

 

[fercan]

Control+H yaparak üste DK yazıp ve replace all dersen olur.

 

[muratsedef]

Cevaplara tesekkürler, cözdüm ben sorunu.
Ayrica soruyu makro bölümüne yazmamin sebebi makrolu bir cözüme ihtiyac duymam, bul-degistire degil.