Excel 2010 從 1 個單元宏中拆分文本

Question

好的，這里有個快速的問題，我在尋找可靠的解決方案時也遇到了問題。假設我有兩列； A 和 B。在“A”列中會有包含名稱的單元格，例如“項目名稱 AZ673”，然后在“B”列中會有 ID 號，例如“AZ673”。 如果我想從 A 列中的每個名稱中快速刪除該 ID 號，我該怎么做？ 請記住，名稱和 ID 之間沒有逗號或符號，只有一個空格。但列彼此相鄰，單元格並排包含相同的 ID。執行此操作的宏將太棒了，非常感謝您提供任何解決方案！

Answer 1

一個簡單的循環通過細胞就可以了

Set cl = [A1]
Do While cl <> ""
    cl = Trim(Replace(cl, cl.Offset(0, 1), ""))
    Set cl = cl.Offset(1, 0)
Loop

注意：如果您有很多行（讀取 10 行或 100 行）來處理這樣的迭代單元格可能會很慢。 如果您需要，有很多方法可以加快速度

Answer 2

創建另一列並使用此公式：

=LEFT(A1,FIND(B1,A1)-1) & RIGHT(A1,LEN(A1)-FIND(B1,A1)-LEN(B1)+1)