Excel是否有函數或巨集可一次執行多個”取代”功能? | 一次取代多筆
圖片參考:http://tw.yimg.com/i/tw/blog/rte/smiley_4.gif[1]函數方式假設資料在A欄,則B1公式為=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(A1,"台北市","01"),"台中市","02"),"高雄市","03")往下複製即可巨集方式,程式碼Sub按鈕1_Click()Columns("A").Replace_What:="台北市",Replacement:="01"Columns("A").Replace_What:="台中市",Replacement:="02"Columns("A").Replace_What:="高雄市",Replacement:="03"EndSub圖片參考:http://tw.yimg.com/i/tw/blog/rte/smiley_4.gif[2]這樣可以嗎?Referenceshttp://tw.yimg.com/i/tw/blog/rte/smi...
圖片參考:http://tw.yimg.com/i/tw/blog/rte/smiley_4.gif[1]
函數方式
假設資料在A欄,則B1公式為
=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(A1,"台北市","01"),"台中市","02"),"高雄市","03")
往下複製即可
巨集方式,程式碼
Sub 按鈕1_Click()
Columns("A").Replace _
What:="台北市", Replacement:="01"
Columns("A").Replace _
What:="台中市", Replacement:="02"
Columns("A").Replace _
What:="高雄市", Replacement:="03"
End Sub
圖片參考:http://tw.yimg.com/i/tw/blog/rte/smiley_4.gif[2]
這樣可以嗎?
References http://tw.yimg.com/i/tw/blog/rte/smiley_4.gif (tw.yimg.com) http://tw.yimg.com/i/tw/blog/rte/smiley_4.gif (tw.yimg.com)