本篇经验将通过实例和大家分享,【在EXCEL表格中,正向零宽断言的妙用!】
工具/原料
1
电脑壹台
2
OFFICE办公软件
方法/步骤
1
如图所示,B列单元格中的数据很凌乱,要在凌乱的数据中求金额和,该如何操作呢?
2
在工作表中,点击菜单栏【开发工具】,在其工具栏内,点击【visual basic】!
3
会进入VBA编辑界面!点击菜单栏【插入】,在其下拉菜单中,选择【模块】!
4
会弹出模块编辑窗口!
5
在代码编辑窗口输入以下代码:Sub test()Set regx = CreateObject('vbscript.regexp')With regx .Global = True .Pattern = '\d+\.?\d*(?=[元块])' For Each Rng In Range('b2', Cells(Rows.Count, 'b').End(xlUp)) Set mat = .Execute(Rng) For Each m In mat y = y + m * 1 Next Rng.Offset(0, 1) = y: y = 0 NextEnd WithEnd Sub
6
注意零宽断言的格式:?=...
7
在VBA窗口中,点击【运行】按钮!
8
“总金额”被瞬间求出!
下一篇:Excel中多重筛选小技巧