Excelで表記によってドメイン名を逆にする方法は？

以下のスクリーンショットに示すように、表記法でドメイン名を逆にする作業に遭遇することがありますが、それをすばやく解決するためのトリックはありますか？ この記事では、それをすばやく処理するためのXNUMXつの方法を紹介します。

VBAで表記してドメイン名を逆にする

テキストの順序が逆の区切り文字で文字列を逆にする

VBAで表記してドメイン名を逆にする

これがあなたを助けることができるマクロコードです、Excelで次のようにしてください：

1。 押す Altキー+ F11 を有効にするためのキー アプリケーション向け Microsoft Visual Basic 窓。

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。 クリック OK.

テキストの順序が逆の区切り文字で文字列を逆にする

Kutools for Excel をお持ちの場合は、テキストの順序を逆にする機能を使用すると、必要に応じて文字列を逆にすることができます。

インストールした後 Kutools for Excel、以下のようにしてください： （今すぐExcel用のKutoolsを無料でダウンロードしてください！）

1. 使用する文字列を選択し、 クツール > テキスト > テキストの順序を逆にする.

2。 の中に リバーステキスト ダイアログで、テキストを反転するために必要なオプションを XNUMX つ選択します。

3。 クリック Ok, 文字列が反転されています。