如何在Excel中通过符号反转域名？

有时，您可能会遇到需要按符号反转域名的工作，如下截图所示，您有什么快速解决的技巧吗？本文中，我将介绍两种快速处理它的方法。

使用VBA按符号反转域名

通过分隔符使用“反转文本顺序”功能反转字符串

使用VBA按符号反转域名

这里有一个宏代码可以帮助您，请按照以下步骤在Excel中操作：

1. 按 Alt + F11 键打开 Microsoft Visual Basic for Applications 窗口。

2. 单击 插入 > 模块，复制并将代码粘贴到空白脚本中。

VBA：按符号反转域名

Sub Reverse()
'UpdatebyExtendoffice2017115
    Dim xArr() As String
    Dim xSplitStr As String
    Dim xVal As String
    Dim xRg As Range
    Dim xCell As Range
    Dim xIndex As Long
    On Error Resume Next
    Set xRg = Application.InputBox("Select cells:", "KuTools For Excel", Selection.Address, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Application.ScreenUpdating = False
    xSplitStr = "."
    For Each xCell In xRg
        If InStr(xCell.Value, xSplitStr) = 0 Then GoTo xBreak
        xVal = ""
        xArr = Split(xCell.Value, xSplitStr)
        xIndex = UBound(xArr)
        xVal = xArr(xIndex)
        Do
            xIndex = xIndex - 1
            xVal = xVal & xSplitStr & xArr(xIndex)
        Loop While xIndex > 0
        xCell.Value = xVal
xBreak:
    Next
    Application.ScreenUpdating = True
End Sub

3. 按 F5 键，弹出一个对话框提醒您选择要操作的区域。

4. 单击 确定。

通过分隔符使用“反转文本顺序”功能反转字符串

如果您安装了 Kutools for Excel，“反转文本顺序”功能可以帮助您根据需要反转字符串。

安装 Kutools for Excel 后，请按照以下步骤操作： （立即免费下载 Kutools for Excel！）

1. 选择您使用的字符串，单击 Kutools > 文本 > 反转文本顺序.

2. 在 反转文本 对话框中，选择一个选项以基于该选项反转文本。

3. 单击 确定，文本字符串已被反转。