正則表達(dá)式直接在EXCEL中使用的詳細(xì)步驟
正則表達(dá)式,相信大家都不陌生。但在我們最常用的辦公軟件EXCEL中,目前沒有可直接使用正則表達(dá)式的函數(shù)(至少10版本的EXCEL沒有),那么今天我就分享下如何在EXCEL中自定義正則函數(shù)。
一、提需求
比如,我要拆分下面的字符串:
顯然這樣的需求,用正則表達(dá)式再合適不過了。
二、解決步驟
下面我們使用的這個方法,定義出的函數(shù)將長期有效:
1、新建一個EXCEL文件,我這里命名為RE,隨后按ALT+F11打開宏編輯器,選中任意一個sheet,右鍵,選擇插入模塊:
2、雙擊模塊1,編輯如下VBA自定義函數(shù)代碼:
Function RE(OriText As String, ReRule As String, ReplaceYesOrNo As Boolean) ''' 'OriText:待匹配的字符串 'ReRule:正則表達(dá)式 'ReplaceYesOrNo:是否采用替換方法,1表示替換,0表示不替換,默認(rèn)為不替換 ''' '創(chuàng)建一個正則表達(dá)式實例對象 Set ReObject = CreateObject("vbscript.regexp") With ReObject '是否區(qū)分大小寫,一般需求是不用區(qū)分大小寫,因此這里為True .IgnoreCase = True '是否匹配所有,一般需求也都是匹配所有,這里也就默認(rèn)是True,如果為False表示只匹配第一次出現(xiàn)的 .Global = True '匹配時所用到的正則表達(dá)式 .Pattern = ReRule If ReplaceYesOrNo Then '如果使用替換方法,則將正則表達(dá)式匹配到的項替換為空 RE = .Replace(OriText, "") Else '否則,返回可迭代對象的第一項 RE = .Execute(OriText)(0) End If End With End Function
3、另存為加載宏格式:
4、點(diǎn)擊下方的加載項:
5、點(diǎn)擊瀏覽:
6、選擇我們剛保存的加載宏格式文件,結(jié)果如下圖:
好了,到這里我們的正則函數(shù)就創(chuàng)建好了,隨后每次打開EXCEL都可以直接使用定義的RE函數(shù),按照需求來敲出合適的正則表達(dá)式。
三、結(jié)果呈現(xiàn)
到此這篇關(guān)于正則表達(dá)式直接在EXCEL中使用的詳細(xì)步驟的文章就介紹到這了,更多相關(guān)正則表達(dá)式EXCEL使用內(nèi)容請搜索腳本之家以前的文章或繼續(xù)瀏覽下面的相關(guān)文章希望大家以后多多支持腳本之家!
相關(guān)文章
根據(jù)身份證號碼計算出生日期、年齡、性別(18位) 根據(jù)入職時間計算工齡。
適用于OA項目中這些對檔案的管理,需要的朋友可以參考下2012-08-08JavaScript正則表達(dá)式校驗非零的正整數(shù)實例
本文分享了JavaScript正則表達(dá)式(^[1-9]\d*$ 或 ^([1-9][0-9]*){1,3}$ 或 ^\+?[1-9][0-9]*$)校驗非零的正整數(shù)實例代碼,代碼簡單易懂,需要的朋友可以看下2016-12-12