有任何 Excel 函数可以反转字符串吗?

有任何 Excel 函数可以反转字符串吗?

Excel 是否有任何内置函数可以反转字符串?

答案1

据我所知,没有内置函数,但您可以创建自己的自定义函数。

首先——创建一个新模块:

  1. 进入 VBA(按 Alt+F11)
  2. 插入新模块(插入 > 模块)

第二步 - 将以下函数粘贴到新模块中(参考):

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

现在你应该能够使用撤销电子表格中的函数

答案2

当前接受的答案是一种糟糕的反转字符串的方法,尤其是当 VBA 中内置有这种方法时,请改用以下代码(应该起到相同的作用,但运行速度要快得多):

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

答案3

我找到了一种不需要 VBA 的替代方案https://exceljet.net/formula/reverse-text-string

公式是

=TEXTJOIN("",1,MID(B5,ABS(ROW(INDIRECT("1:"&LEN(B5)))-(LEN(B5)+1)),1))

其中 B5 是输入单元格。

答案4

您可以使用这个 LET 公式:

=LET( string, D6,
       L, LEN( string ),
       CONCAT( MID( string, SEQUENCE( 1, L, L, -1), 1) ) )

它将字符串分解为 1 个字符的单元格数组,然后以相反的顺序将它们重新组合成连接的字符串。

相关内容