軟體:
Microsoft Excel
版本:
2010
問題:
小弟整理檔案時發現有先編碼有重複,故想錄製巨集用VBA來取代字串
例如:我想找到儲存格完全等於"Sales - Andy Collins"
然後在其對應的E36欄位,將字串取代為"ACA"
接著繼續找其他儲存格完全等於另一字串如"Marc Bull - Sales"
然後在其對應的E39欄位將字串取代為"MBA"
依此類推
由於錄製的巨集會只有取最後的欄位如E36,如下:
Cells.Find(What:="Sales - Andy Collins", After:=ActiveCell, LookIn:= _
xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:= _
xlNext, MatchCase:=False, MatchByte:=False,
SearchFormat:=False).Activate
Cells.FindNext(After:=ActiveCell).Activate
Range("E36").Select
ActiveCell.FormulaR1C1 = "ACA"
Range("E37").Select
但之後檔案若有改變欄位則無法使用
故想請教一下這邊要如何改才能是對應完"Sales - Andy Collins"
之後取代他對應那欄的字串
請高手指導一下
非常感謝各位的協助~~
檔案如連結https://www.sendspace.com/file/7hg64d