从InStr函数返回True / False布尔值？ VBA

我想用if函数做一个循环。 如果函数需要是包含“*”的活动单元格，则此条件。

– 如果像function不起作用，因为类似的function不能识别“*”的数字，因为它使用这些来定义string的部分。

• 我认为结合一个规则，如果function与InStr函数可以工作，但我不知道如何结合这些。

如何从InStr函数返回True / False布尔值？

Answer 1

Do While ActiveCell.Value <>"" If InStr(ActiveCell.Value, "*") Then MsgBox("Cell contains at least one "*") Else: End if ActiveCell.Offset(1,0) Loop 

Answer 2

 Do While ActiveCell.Value <> "" If InStr(ActiveCell.Value, "*") <> 0 Then MsgBox("Cell contains at least one "*") Else MsgBox("Cell does not contain at least one "*") End if ActiveCell.Offset(1,0) Loop 

stringexpression式包含或不包含特殊字符的位置。 如果不是，则Instr返回值将为0。