检查字符串是否遵循格式

时间:2014-04-08 10:36:11

标签: vba vbscript ms-word

基本上我已经创建了一个首字母缩略词查找宏,除了包含我们所有的参考编号外,它运行良好。现在不幸的是,更改搜索参数将无法正常工作,因为许多首字母缩略词包括字母和数字。

我的想法是比较字符串,一旦找到,如果它是参考数字格式,例如

LetterNumberNumberLetterLetterNumberNumberNumberNumber

我不会包含它。

我确信必须有一种简单的方法可以做到这一点而我无法找到它是一个不知道要搜索什么的情况,但无论如何都要提前感谢您的帮助。

1 个答案:

答案 0 :(得分:2)

使用LIKE

'//LetterNumberNumberLetterLetterNumberNumberNumberNumber

if ucase$("A12BC3456") like "[A-Z][0-9][0-9][A-Z][A-Z][0-9][0-9][0-9][0-9]" then 
  msgbox "is ref no."