此为工作表事件,需要放在对应工作表写才会执行
参考版本:2013(其他版本操作基本无差异)
具体操作步骤:
1、ALT+F11,找到对应做工作表,双击
2、粘贴代码
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$3" Then
Range("c3").Select
End If
End Sub
3、返回工作表测试
此为工作表事件,需要放在对应工作表写才会执行
参考版本:2013(其他版本操作基本无差异)
具体操作步骤:
1、ALT+F11,找到对应做工作表,双击
2、粘贴代码
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$3" Then
Range("c3").Select
End If
End Sub
3、返回工作表测试