Answers:
我没有内置函数,但是您可以创建自己的自定义函数。
首先-创建一个新模块:
第二-将以下函数粘贴到新模块(参考)中:
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
现在您应该可以在电子表格中使用反向功能
在目前接受的答案是扭转一个字符串一个贫穷的方式,尤其是当有一个内置VBA,使用下面的代码代替(应采取行动相同,但运行速度快了很多):
Function Reverse(str As String) As String
Reverse = StrReverse(Trim(str))
End Function
TRIM
要添加,因为问题中未指定多余的空格。对于“巨大”的数据集,TRIM
如果不需要则将其删除。