[已解决]请老师帮忙指点一下

hackcan

Target.Column = 2 And Target.Row > 2 And Target.Row <= 100

这句意思是指 B列2行至100行的意思吧？

那想改成B2至E100怎么做

是不是 target.column >2 and target.column <= 5 and Target.Row > 2 And Target.Row <= 100

我是新手，别笑我。。。

最佳答案

月排行榜 / 总排行榜

我心飞翔410

2013-9-27 13:52

target.column >=2 and target.column <= 5 and Target.Row > =2 And Target.Row <= 100
这是事件程序的一个传递参数，比如：
Private Sub Worksheet_Change(ByVal Target As Range)
End Sub
这是一个单元格编辑的事件程序，target就是你正在编辑的单元格，你编辑A1，target就是A1,你编辑A2,在程序中使用target时就代表a2单元格，也就是说它是传递你操作的单元格对象到事件中的一个中介。
用了两个AND的意思，要三个条件同时满足）。
Target.Row=1               第一行
Target.Column = 1　第一列
Target.Count = 1　数量为1
Target <> "" 　不等于空

跳转到最佳答案楼层

我心飞翔410

target.column >=2 and target.column <= 5 and Target.Row > =2 And Target.Row <= 100
这是事件程序的一个传递参数，比如：
Private Sub Worksheet_Change(ByVal Target As Range)
End Sub
这是一个单元格编辑的事件程序，target就是你正在编辑的单元格，你编辑A1，target就是A1,你编辑A2,在程序中使用target时就代表a2单元格，也就是说它是传递你操作的单元格对象到事件中的一个中介。
用了两个AND的意思，要三个条件同时满足）。
Target.Row=1               第一行
Target.Column = 1　第一列
Target.Count = 1　数量为1
Target <> "" 　不等于空

ppp710715

target.column >=2 and target.column <= 5 and Target.Row > =2 And Target.Row <= 100

xdragon

target.column >=2 and target.column <= 5 and Target.Row >= 2 And Target.Row <= 100
或者
Intersect(Range("B2:D100"), Cells(Target.Row, Target.Column))取交集的方式来判断也可以的

hackcan

ppp710715 发表于 2013-9-27 13:56
target.column >=2 and target.column  =2 And Target.Row

谢谢大哥，我刚才搞出来了

hackcan

我心飞翔410 发表于 2013-9-27 13:52
target.column >=2 and target.column  =2 And Target.Row

谢谢大哥，学习了

hackcan

xdragon 发表于 2013-9-27 13:56
target.column >=2 and target.column = 2 And Target.Row

谢谢，学习了！