卖逼视频免费看片|狼人就干网中文字慕|成人av影院导航|人妻少妇精品无码专区二区妖婧|亚洲丝袜视频玖玖|一区二区免费中文|日本高清无码一区|国产91无码小说|国产黄片子视频91sese日韩|免费高清无码成人网站入口

Excel VBA利用正則表達式實現(xiàn)取字符串中數(shù)字并求和的方法

在Excel VBA中,我們可以利用正則表達式來實現(xiàn)取字符串中數(shù)字并求和的方法。下面將介紹具體操作步驟。步驟一:打開VBE編輯器并添加引用首先,我們需要打開Excel VBA的編輯器,也就是ALT F

在Excel VBA中,我們可以利用正則表達式來實現(xiàn)取字符串中數(shù)字并求和的方法。下面將介紹具體操作步驟。

步驟一:打開VBE編輯器并添加引用

首先,我們需要打開Excel VBA的編輯器,也就是ALT F11快捷鍵打開的VBE編輯器。然后單擊菜單欄的“工具”,再選擇“引用”。

彈出“引用-VBAProject”對話框后,勾選“Microsoft VBScript Regular Expressions 1.0”,最后點擊“確定”按鈕。

步驟二:新建一個模塊并輸入代碼

接下來,在VBE編輯器中新建一個模塊。輸入如下代碼:

Sub tsszstrqh()

Dim reg As New RegExp

Dim str As String, t, s, arrstr Range("A1").Value

With reg

.Global True

.Pattern "[^0-9.%]"

arr "" Right(.Replace(str, " "), Len(.Replace(str, " "))) - 1

.Pattern " "

Range("B1") .Replace(arr, " ")

End With

End Sub

這段代碼的作用是將A1單元格中的字符串中的數(shù)字提取出來并求和,然后將結果輸出到B1單元格中。

步驟三:運行宏并查看結果

最后,在VBE編輯器中按下ALT F8,運行剛剛編寫的宏。此時,我們可以在B1單元格中看到提取出來的數(shù)字的求和結果。

綜上所述,利用Excel VBA的正則表達式功能可以方便地取出字符串中的數(shù)字并進行計算。以上就是本文的全部內容,希望對大家有所幫助。

標簽: