当选择的任何一个单元格包含定义的字符串时,触发VBA脚本



只要"MainSubroutine";只需要在点击单元格G14时触发,但现在我需要将触发事件扩大到每当点击页面上的任何目标单元格时,它都有特定的字符串";单击以了解更多信息;。

那我该怎么写呢?我试着把第2行改成";如果Selection.Count=1 AND Selection.value="0";单击以了解更多信息";然后"但很明显,这并没有奏效。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Selection.Count = 1 Then
If Not Intersect(Target, Range("G14")) Is Nothing Then
Call MainSubroutine
End If
End If
End Sub

应该这样做吗?如果它可以包含字符串,请使用Instr或类似程序。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If target.Count = 1 Then
If Target.value="Click to learn more" Then
Call MainSubroutine
End If
End If
End Sub

相关内容

  • 没有找到相关文章

最新更新