Goldmaster tablet Goldmaster tablet

Announcement

Collapse
No announcement yet.

Excel de metni tersine çevirmek

Collapse
X
  • Filtre
  • Zaman
  • Gösterim
Clear All
yeni mesajlar

  • Excel de metni tersine çevirmek

    Goldmaster Elektronik  Goldmaster tablet 
    Bunun için uzun uzun kod yazmaya gerek yok.

    Excel i açın

    alt + F11 tuşu ile VBA yı açın solda kutuya yeni modül ekleme seçin (Insert > Module)

    Alttaki kodları oraya yapıştırın...

    Function Reverse(Text As String) As String
    Dim i As Integer
    Dim StrNew As String
    Dim strOld As String
    strOld = Trim(Text)

    For i = 1 To Len(strOld)

    StrNew = Mid(strOld, i, 1) & StrNew

    Next i

    Reverse = StrNew

    End Function

    Hepsi bu kadar, daha sonra yapacağınız ise , tersine çevirmek istediğiniz metin örneğin A1 de olsun

    B1 e gelerek =reverse(A1) yazıp enterladığınızda metnin terse çevrildiğini göreceksiniz.



    İkinci yöntem ise ;

    Function Reverse(str As String) As String
    Reverse = StrReverse(Trim(str))
    End Function

    Önceki gibi fonksiyn yaratıp bunu aynı şekilde kullanmaktır.




    Yabana atmayın gün gelir lazım olur.
    Son düzenleme ozkandonmez; 22-04-2016, 12:31.
    Üyelere Özel Konuları Görebilmek İçin Lütfen ÜYE GİRİŞİ Yapınız



    HAYDI IPTV YAPALIM

    TBS 6991 Dual Tuner Dual CI Tv kartı linux sürücü yükleme

    LÜTFEN OKUYUN


Working...
X