excel - 如何在 VBA 中格式化特定的邮件值
问题描述
我想使用 vba 使用 RegEx 验证特定的邮件值。
例子:aungkoko@desktopfromanoth.com
用户输入的电子邮件必须准确包含@desktopfromanoth.com
. 我可以用 RegEx 验证吗?
我的代码在这里:
Private Function ValidateEmailAddress(ByRef strEmailAddress As String) As Boolean
Dim objRegExp As New RegExp
objRegExp.IgnoreCase = True
objRegExp.pattern = "^[\w-\.]+@([a-z]{16}+\.)+[A-Za-z]{2,3}$"
ValidateEmailAddress = objRegExp.Test(strEmailAddress)
End Function
解决方案
以下将验证任何以结尾的电子邮件@desktopfromanoth.com
^[_a-z0-9-]+(.[a-z0-9-]+)@desktopfromanoth\.com$
有关详细信息,请参阅99.99% 有效的电子邮件地址正则表达式。
如果您想匹配多个电子邮件地址,请改用以下内容:
[_a-z0-9-]+(.[a-z0-9-]+)@desktopfromanoth\.com
推荐阅读
- javascript - 具有特殊 id 的 Vue-js 调用对象
- html - 如何在 swift 中设置超时以尝试捕获 html 代码?
- javascript - 如何检测 sessionStorage 是否会死?
- flutter - 更改切换按钮颤动的图标
- c# - syncfusion DataGridView C#中的彩色文本搜索
- javascript - 防止 Angular 中 .push() 中的元素 id 重复
- python - Python检索文件复制位置的文件路径
- react-native - React-Native 导航无法解析模块
- python - “检查是否断开进程的长时间运行连接”
- python - 使用python解析.xml文件:搜索和复制相关数据