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

在excel中标记以仅提取子字符串,excel,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-

例如: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.编号
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

如果要删除第一个和最后一个文本字符串,请尝试以下简单宏:

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

我有一个100万行的列表,其中包含不同数量的dots更多示例:host60-7-dynamic.48-82-r.retail.teleconitalia.it 117.120.132.27.ap.yournet.ne.jp ip-phone-193-157-180-126.uio.no host251-107-dynamic.53-82-r.retail.teleconitalia.it 238.sub-97-232-125.myvzw.com node-5wo.pool-118-174.dynamic.totbb.net 218-172-44-88.hinethost-95-196-129-181.mobileonline.telia.com我想删除以“.”结尾的第一个子字符串,最后一个子字符串以“.”开头并保留中间的字符串。请阅读以了解为什么会有反对票。谢谢您的评论