Sub?測試()
暗淡?regX?作為?對象,?s?作為?字符串,?我,?j
設置?regX?=?CreateObject("vbscript.regeXP ")
為了什麽?我?=?1?去哪?單元格(行。數數,?1).結束(3)。排
用什麽?regX
。全球?=?真實的
為了什麽?j?=?2?去哪?五
選擇?案子?j
案子?2
s?=?“[^\u4e00-\u9fa5]”?以漢字為例
案子?三
s?=?" \D "?取壹個號碼
案子?四
s?=?“[^a-zA-Z]”?拿信件
案子?五
s?=?"[\u4e00-\u9fa50-9a-zA-Z]"?拿著這個符號
結束?挑選
。格局?=?s
細胞(我,?j)?=?。替換(單元格(I,1),?"")
下壹個?j
結束?隨著
然後
結束?潛水艇