我的Excel內容如圖所示,我想把B欄內多餘的字元 /vc 還有 / 都給移除
1.資料要像這樣
A9102000
A9201230
A9301330
A940143
A9501530
A9601630
A9701730
2.我知道可以用搜尋及取代的方式，但我想用VBA寫，請各位大大教導我。
如何用Excel VBA寫一個移除欄位裡指定的字元?
回答 (3)
2017-01-16 6:15 pm
✔ 最佳答案
1.選B欄Columns("B:B").Select
2.把/vc 取代
Selection.Replace What:="/vc", Replacement:="", LookAt:=xlPart, SearchOrder:=xlByColumns, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
3.把/取代
Selection.Replace What:="/", Replacement:="", LookAt:=xlPart, SearchOrder:=xlByColumns, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
2017-01-16 12:43 pm
.
若要使用VBA，簡單的寫法:
Sub TT()
For Each c In [B2].Resize([B65536].End(3).Row)
c.Value = Application.Substitute(c, "/vc", "")
c.Value = Application.Substitute(c, "/", "")
Next
End Sub
若要使用VBA，簡單的寫法:
Sub TT()
For Each c In [B2].Resize([B65536].End(3).Row)
c.Value = Application.Substitute(c, "/vc", "")
c.Value = Application.Substitute(c, "/", "")
Next
End Sub
2017-01-16 10:42 am
用兩次的取代即可,第一次尋找目標輸入/vc,按全部取代.第二次尋找目標輸入/,按全部取代.
收錄日期: 2021-04-28 17:14:19
原文連結 [永久失效]:
https://hk.answers.yahoo.com/question/index?qid=20170115030026AAFz7LR