亚洲乱码中文字幕综合,中国熟女仑乱hd,亚洲精品乱拍国产一区二区三区,一本大道卡一卡二卡三乱码全集资源,又粗又黄又硬又爽的免费视频

正則表達(dá)式直接在EXCEL中使用的詳細(xì)步驟

 更新時間:2021年03月17日 10:55:46   作者:徐-清風(fēng)  
這篇文章主要介紹了正則表達(dá)式直接在EXCEL中使用的詳細(xì)步驟,本文給大家介紹的非常詳細(xì),對大家的學(xué)習(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)文章

最新評論