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

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

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

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

4、在模块当中输入如下代码，然后运行

Private Sub Worksheet_Activate()

    Dim rng As Range
For Each rng In ActiveSheet.UsedRange
If Left(rng.Formula, 2)="='" Then MsgBox "本工作表存在外部数据引用！", 65,
  "提示": Exit Sub
Next
MsgBox "本工作表没有外部数据引用！", 65, "提示"
End Sub

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