2014-07-17 74 views
0

我想查找並替換excel中的大量單詞列表;如果我有一組單詞,我希望在Sheet1,ColumnA中查找/搜索,然後如果Sheet2中的ColumnA反映了要找到的內容,並且ColumnB包含用來替換髮現的單詞的單詞(所有逗號分隔值),我該如何去做這件事,以便替代品在Sheet1 ColumnA中結束?在Excel中查找並替換大的列表

我懷疑這需要一個宏,我不是很熟悉。

非常感謝您的時間和幫助!

+0

你是否研究過或嘗試過任何東西? –

+0

我確實在這個網站上發現了一些線索,似乎指向了我所需要的東西,但我仍然在圍繞着我的特定用途的代碼努力工作。 – user3850410

+0

他們爲什麼逗號分開而不是在單獨的單元格中? – tigeravatar

回答

0

這不是超高效,但它會完成工作。您將不得不考慮您的兩個列表的長度以及您是否更改工作表名稱。

Public Sub findsometext() 

For i = 1 To 10 
' change 10 to however many items are in your replacement list 
' start at 2 if your data has headers 
Worksheets("Sheet2").Activate 
target = Cells(i, 1) 
replacer = Cells(i, 2) 
Worksheets("Sheet1").Activate 


    For j = 1 To 10 
' change 10 to however many items are in your data list to be processed 
' start at 2 if your data has headers 
     Cells(j, 1) = Replace(Cells(j, 1), target, replacer) 
    Next j 

Next i 


End Sub 
+0

謝謝,Myles。我想我得到了這個工作。我感謝幫助! – user3850410