在VBA中,正則表達(dá)式實(shí)例應(yīng)用(8)——符合條件人員篩選
本篇經(jīng)驗(yàn)將和大家分享如何在VBA中使用正則表達(dá)式實(shí)現(xiàn)符合條件的人員篩選。 首先,在工作表中,我們需要篩選出同年入職和離職的人員。請(qǐng)參考下圖進(jìn)行操作: 步驟一:點(diǎn)擊菜單欄【開發(fā)工具】,在其工具欄內(nèi),
本篇經(jīng)驗(yàn)將和大家分享如何在VBA中使用正則表達(dá)式實(shí)現(xiàn)符合條件的人員篩選。
首先,在工作表中,我們需要篩選出同年入職和離職的人員。請(qǐng)參考下圖進(jìn)行操作:
步驟一:點(diǎn)擊菜單欄【開發(fā)工具】,在其工具欄內(nèi),點(diǎn)擊【Visual Basic】。
步驟二:進(jìn)入VBA編輯界面后,點(diǎn)擊菜單欄【插入】,選擇【模塊】。
步驟三:在代碼編輯窗口輸入以下代碼:
Sub 后向引用()
Set regx CreateObject("")
With regx
.Global True
.Pattern "(d{4}).*1.*"
For Each Rng In Range([B2], Cells(, 2).End(xlUp))
If .test(Rng) Then
n n 1
Cells(n, 4) Cells(, 1)
End If
Next
End With
Set rg [D1].CurrentRegion
With rg
1
.HorizontalAlignment xlCenter
8
End With
End Sub
步驟四:在工作表界面的【開發(fā)工具】菜單下,點(diǎn)擊【插入】按鈕,插入表單控件,并與上述代碼關(guān)聯(lián)。將表單控件命名為【人員篩選】。
步驟五:點(diǎn)擊【人員篩選】按鈕,符合條件的人員將被立即篩選出來。
通過以上步驟,你可以輕松利用VBA中的正則表達(dá)式功能,快速篩選出同年入職和離職的人員。這對(duì)于數(shù)據(jù)分析和人事管理非常有幫助!