[已解决]Target的意义

向前650809 · 发表于 2011-5-20 21:12

各位网友好，在VBA中常见到代码Target，这个代码的意义是什么，请给举个应用的例子
谢谢

最佳答案

兰色幻想

2011-5-20 21:32

这是事件程序的一个传递参数，比如：
Private Sub Worksheet_Change(ByVal Target As Range)
End Sub
这是一个单元格编辑的事件程序，target就是你正在编辑的单元格，你编辑A1，target就是A1,你编辑A2,在程序中使用target时就代表a2单元格，也就是说它是传递你操作的单元格对象到事件中的一个中介。

跳转到最佳答案楼层

兰色幻想 · 发表于 2011-5-20 21:32

这是事件程序的一个传递参数，比如：
Private Sub Worksheet_Change(ByVal Target As Range)
End Sub
这是一个单元格编辑的事件程序，target就是你正在编辑的单元格，你编辑A1，target就是A1,你编辑A2,在程序中使用target时就代表a2单元格，也就是说它是传递你操作的单元格对象到事件中的一个中介。

macky591 · 发表于 2011-5-20 21:39

回复向前650809 的帖子

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(0, 0) = "A1" Then ’A1单元格
      If Target.Value = 123 Then ‘单元格数值等于123
         Call aa ‘调用宏aa
      End If
End If
End Sub
插入一个模块，输入些列宏代码。
Sub aa()
MsgBox "1"
End Sub
你自己试一下

流云QQ33319779 · 发表于 2012-3-25 12:33

学习了，明白target了

流云QQ33319779 · 发表于 2012-3-25 12:37

这是一个单元格编辑的事件程序，target就是你正在编辑的单元格，你编辑A1，target就是A1,你编辑A2,在程序中使用target时就代表a2单元格，也就是说它是传递你操作的单元格对象到事件中的一个中介。

pandengyisun · 发表于 2012-8-5 15:54

专门过来学习下的。

gdsgzhrsh · 发表于 2012-8-6 11:01

来看看校长的精辟讲解

maxiwen007 · 发表于 2013-2-22 08:40

看明白了，正需要这个解释

shidongshan · 发表于 2015-5-23 12:43

谢谢,
在SelectionChange事件中,有代码如下.
Set myarea = Application.Intersect(Target, Range("B4:I6"))
'定义myarea为当前选择区域Target与数据区域(B4:I6)相交的部分.

我的理解对否?

		自动登录	找回密码
密码			注册

[已解决]Target的意义

评分