Đảo ngược chuỗi kí tự trong Excel

Làm thế nào để đảo ngược một chuỗi kí tự trong một ô trong Excel ? Excel không có sẵn tính năng này vì thế bạn cần phải tạo một hàm như vậy , cách thức như sau

 

  1. Bạn bấm phím Alt-F11 --> xuất hiện cửa sổ Microsoft Visual Basic
  2. Bấm menu Insert --> chọn Module
  3. Bạn gõ như sau :

Function ReverseText(text) As String

            Dim TextLen As Integer

            Dim i As Integer

            TextLen = Len(text)

            For i = TextLen To 1 Step -1

                        ReverseText = ReverseText & Mid(text, i, 1)

            Next i

End Function

 

Thoát khỏi cửa sổ Visual Basic

Cách sử dụng : tại ô kết quả bạn gõ

 

=ReverseText(A3) - A3 là ô mà có chứa chuỗi kí tự bạn muốn đảo ngược .