在excel中标记化以仅提取子字符串

时间:2014-09-01 13:36:21

标签: excel

例如:76-221-161-164.lightspeed.cicril.sbcglobal.net

我想删除主机名:76-221-161-164。 我想删除TLD:.net 我想保留:lightspeed.cicril.sbcglobal

也 在不同的运动中我想

我想保留:sbcglobal.net

其他例子是:

host60-7-dynamic.48-82-r.retail.telecomitalia.it
117.120.132.27.ap.yournet.ne.jp
ip-phone-193-157-180-126.uio.no
host251-107-dynamic.53-82-r.retail.telecomitalia.it
238.sub-97-232-125.myvzw.com
node-5wo.pool-118-174.dynamic.totbb.net
218-172-44-88.dynamic.hinet.net
host-95-196-129-181.mobileonline.telia.com

1 个答案:

答案 0 :(得分:2)

假设您要删除第一个和最后一个文本字符串,请尝试使用以下简单宏:

Sub FixPhrases()
    Dim r As Range, sOut As String
        For Each r In Selection
            ary = Split(r.Value, ".")
            sOut = ary(1)
            For i = 2 To UBound(ary) - 1
                sOut = sOut & "." & ary(i)
            Next i
            r.Value = sOut
        Next r
End Sub