excel – 将电子邮件和url分开
我在Excel中有一个列表，如下所示：
Column A skfjkdf@kasldfj.com fjls@fdkjd.comhttp://www.kdfj.com dfkjdf@kdlfj.eshttp://djfkdsf dkfjs@kljf.com kjsfld@klfjlf.cahttp://www... 有单元格只有电子邮件地址，并有单元格与电子邮件和URL在一起（总是没有空间）
我希望单个电子邮件留在列A和分开的电子邮件列A，URL列B
我已经试过修剪，左，右和替代，但我无法弄清楚。
非常感谢您的帮助！
我find了两种方法来做到这一点。一个没有公式和一个
-
在Excel中按下Ctrl + H来调出“查找和replace”对话框。 将“http”replace为“http”（注意空格）
然后select要拆分的单元格，然后转到“ 数据”>“文本到列” 。 确保在空间上划定界限。
-
只提取电子邮件的使用
=LEFT(A1,SEARCH("http",A1,1)-1)提取只是网站的使用
=RIGHT(A1,LEN(A1)-SEARCH("http",A1,1)+1)这假设你所有的网站都以“http”
现在应该拆分电子邮件和URL。
这是快速和肮脏，我敢肯定会受到批评，我欢迎它:)
Sub test() Range("A1").Select Do Until ActiveCell = "" this = ActiveCell.Value iLen = Len(this) charnum = InStr(this, "http") If charnum <> 0 Then iLen2 = iLen - charnum + 1 iLen3 = charnum - 1 ActiveCell.Offset(0, 1).Value = Mid(ActiveCell.Value, charnum, iLen2) ActiveCell.Value = Left(ActiveCell, iLen3) Else ActiveCell.Offset(1, 0).Select End If Loop End Sub