怎样使用VBA工作表激活事件的运用

1、首先在开发工具中打开VBA编辑器

2、在单元格区域当中输入一些内容作为例子

3、在VBA编辑器中插入模块

4、在模块当中输入如下代码，然后运行Private Sub Worksheet_Act坡纠课柩ivate() Dim rng As RangeFor Each rng In ActiveSheet.UsedRangeIf Left(rng.Formula, 2)="='" Then MsgBox "本工作表存在外部数据引用！", 65, "提示": Exit SubNextMsgBox "本工作表没有外部数据引用！", 65, "提示"End Sub

5、选择“Sheet1”以外的工作表，然后再回到“Sheet1”，程序立即提示“本工作表存在外部数据引用！”，如图