任何将反转字符串的Excel函数?


Answers:


9

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

首先-创建一个新模块:

  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

现在您应该可以在电子表格中使用反向功能


62

目前接受的答案是扭转一个字符串一个贫穷的方式,尤其是当有一个内置VBA,使用下面的代码代替(应采取行动相同,但运行速度快了很多):

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

@ n00b-“如何创建模块”不是问题。:)这种解决方案效率更高/更快/更容易,尽管我不确定为什么TRIM要添加,因为问题中未指定多余的空格。对于“巨大”的数据集,TRIM如果不需要则将其删除。
ashleedawg '18 -10-28
By using our site, you acknowledge that you have read and understand our Cookie Policy and Privacy Policy.
Licensed under cc by-sa 3.0 with attribution required.