宏来替换excel中的列

Question

您好我有专栏＆＃34; B＆＃34;使用某些链接，我想编辑链接并将列B替换为那些编辑过的链接。我希望用VBA来做到这一点。

B栏中的数据是

http://www.econone.com/staff_view.php?e=117&s=28 http://www.econone.com/staff_view.php?e=164&s=28

我需要删除＆＃34;＆amp; s = 28＆＃34;从链接中，有时它表示＆amp; s = 100或＆amp; s = 4。它可能是任何东西。我正在使用这个功能 =IFERROR(REPLACE(B123,SEARCH("&s",B123),10,""),B123)  删除＆amp; s = 28。

如何在宏中使用它，这样它就可以用编辑的链接替换B列中的所有单元格内容

Answer 1

如果&s=x始终位于URL字符串的末尾，则类似

=LEFT(A1,FIND("&s",A1)-1)

应该有用。

Answer 2

你可以使用mid函数：

=MID(B1,1,SEARCH("&s=",B1,1)-1)