Adakah fungsi Excel yang akan membalik string?


Jawaban:


9

Tidak ada fungsi bawaan yang saya ketahui, tetapi Anda dapat membuat fungsi kustom Anda sendiri.

Pertama - buat modul baru:

  1. Masuk ke VBA (Tekan Alt + F11)
  2. Sisipkan modul baru (Sisipkan> Modul)

Kedua - rekatkan fungsi berikut dalam modul baru Anda ( Referensi ):

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

Sekarang Anda harus dapat menggunakan fungsi Reverse di spreadsheet Anda


62

The jawaban yang diterima saat ini adalah cara yang buruk untuk membalikkan string, terutama ketika ada satu dibangun ke VBA, gunakan kode berikut bukan (harus bertindak sama tetapi menjalankan BANYAK lebih cepat):

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

@ n00b - "cara membuat modul" bukan pertanyaan. :) Solusi ini jauh lebih efisien / lebih cepat / lebih mudah, meskipun saya tidak yakin mengapa TRIMditambahkan, karena spasi tambahan tidak ditentukan dalam pertanyaan. Untuk kumpulan data "besar", hapus TRIMjika Anda tidak membutuhkannya.
ashleedawg
Dengan menggunakan situs kami, Anda mengakui telah membaca dan memahami Kebijakan Cookie dan Kebijakan Privasi kami.
Licensed under cc by-sa 3.0 with attribution required.