例如: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
答案 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