A1 Hücresindeki Yazıyı B1 Sütununda Değiştirme

[TEGCreative]

Arkadaşlarım s.a ;

Bu benim için şuan çok önemli ve acele. Yardımlarınızı bekliyorum.

A1 hücresinde Tayfun Emre GULEC yazdığını düşünelim.
Nasıl bir fonksiyon yazmalıyım ki A1 deki bu yazı B1'de "Tayfun-Emre-GULEC" gibi gözüksün ?

Lütfen yardım. Çok acil

 

[vardar07]

B1 e aşağıdaki gibi yapabilirsiniz.

=YERİNEKOY(YERİNEKOY(A1;" ";"-");" ";"-";1)

 

[TEGCreative]

Sayın vardar cevap için teşekkür ederim fakat benim bunu formül ile değil de worksheet change olayında yapmam lazım. Direk metin olarak oraya kopyalaması lazım.

 

[YUSUF44]

Sorularımızı tam olarak ne istediğimzi belirterek sorarsak daha çabuk sonuç alırız. Aşağıdaki kodları sayfanın kod bölümüne yapıştırın, son istediğinizi karşılıyor ancak içimden bir ses bunu sadece A1 hücresinde değil başka hücrelerde de uygulamak istediğinizi söylüyor

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("a1")) Is Nothing Then Exit Sub
Target.Offset(0, 1) = WorksheetFunction.Substitute(Target, " ", "-")
End Sub

Eğer A1 dışındaki başka hücrelerde de kullanmak istiyorsanız Range("a1") kısmını istediğinize göre değiştirin.