ters yazı

[ahmet uguz]

kolay gelsin arkadaşlar.daha önce sitede a1 hücresine isim yazıldığında b1 hücresine o ismin tersinden yazılan bir excel dosyası örneği görmüştüm.aramada ters yazı diye yazdım bulamadım.bu dosyayı bulabilirmiyiz.teşekkürler

 

[Kemal Demir]

Sub tersyaz()
For i = 2 To 500
    Cells(i, 2) = StrReverse(Cells(i, 1))
Next
End Sub

Yukarıdaki kod A sutunu için geçerlidir.Ters yazıları B sutununa yazar.

 

[ahmet uguz]

sayın rakkas;verdiğiniz yanıt için teşekkür ederim. makroyu çalıştıramadım.belki benim bilğisayarımda bir problem olabilir. ne yapabili
rim. teşekkürler...

 

[Qene]

KTF ile basit bir çözüm...

Function tersyazı(Metin As String)
Metin = StrReverse(Metin)
tersyazı = Metin
End Function

Kullanımı :

=tersyazı(Düz Yazının Bulunduğu Hücre)

 

[Ali]

Sn Ahmet..

Kelimelerin tersine çevrilmesi istediğiniz sayfanın sekmesini,sağ tuş ile tıklayıp,kod görüntüle kısmını seçtikten sonra aşağıdaki kodları yapıştırın.

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [a:a]) Is Nothing Then Exit Sub
deger = Target.Row
Cells(deger, "b") = StrReverse(Cells(deger, "a"))
End Sub

 

[ahmet uguz]

sayın gene ve ali;verdiğiniz yanıtlar için teşekkür ederim.sorun çözüldü.
kolay gelsin arkadaşlar...

 

[Qene]

Rica ederim. Size de kolay gelsin..

 

[xlsx]

Düz yazıyı Terse çevirme

Selam
Benim daha önce bana lazım olan bir dosya da kullanmak üzere yaptıgım bir formülü geliştirmek amacıyla aşağıdaki linkte uygulama kodlarını ya da ilgili dosyayı bulabilirsiniz.

http://www.excel.web.tr/showthread.php?t=14912

 

[ahmet uguz]

sayın falconia verdiğin yanıt teşekkür ederim.

 

[baydeniro]

Paylaşım için çok teşekkürler.

 

[baydeniro]

Merhaba. Sayın Ali'nin yazdığı makro ile A kolonuna yazılan yazılar, B kolonunda anında sağdan sola doğru ters çevrilerek yazılabiliyor.

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [a:a]) Is Nothing Then Exit Sub
deger = Target.Row
Cells(deger, "b") = StrReverse(Cells(deger, "a"))
End Sub

Makrosunu nasıl revize edelim ki, bu işlem her yazı yazıldığında değil de sadece makro butonuna basıldığında olsun.

 

[Ali]

Serdar Bey eğer değişimi change olayına bağlamak istemiyorsanız,istediğiniz durumu ikinci mesajda Sn Rakkas yazmış.