[已解决]谢谢mxg825和wayy老师。下面的意思如何表示？

lhj323323

老师：
我想把下面这一句分别改成如下两种意思
If Target.Row = 1 Then

一、将行改为列
If Target.Column = 1 Then还是If Target.Column = a Then

二、将行改为一个区域比如[b2:c6]
更不知该怎么改了，

最佳答案

月排行榜 / 总排行榜

mxg825

2011-10-7 15:52

一、将行改为列
If Target.Column = 1 Then '说明：A列就是1列！
二、将行改为一个区域比如[b2:c6]
答：If  Target.Row >1 and  Target.Row <7  and Target.Column >1 and  Target.Column <4  Then
'说明：大于1行 小于7行，大于1列 ，小于4列！四个条件限制在 B2:C6 区域内！

跳转到最佳答案楼层

mxg825

一、将行改为列
If Target.Column = 1 Then '说明：A列就是1列！
二、将行改为一个区域比如[b2:c6]
答：If  Target.Row >1 and  Target.Row <7  and Target.Column >1 and  Target.Column <4  Then
'说明：大于1行 小于7行，大于1列 ，小于4列！四个条件限制在 B2:C6 区域内！

lhj323323

回复 mxg825 的帖子

那如果想表示[A2：A65536]呢，
能不能表示成第1列，除了第一行
If Target.Column = 1 Then

VBA语句中，有没有“除了”这种表示。如有的话，该如何表示呢？

wayy

lhj323323 发表于 2011-10-7 16:04
回复 mxg825 的帖子

那如果想表示[A2：A65536]呢，

能不能表示成第1列，除了第一行
If Target.Column = 1 and target.row >1 Then

mxg825

正常写法是 WAYY 的写法！
但如果是中间行或列的话，可以用不等于法！
能不能表示成第1列，除了第5行
If Target.Column = 1 and target.row <>5 Then

windimi007

回复 mxg825 的帖子

刚想到，可以用两个条件表示：{:3912:}

1. If Abs(Target.Row - 4) < 3 And Abs(Target.Column - 2.5) < 1 Then ……

复制代码

lhj323323

回复 wayy 的帖子

wayy老师:
因二楼以下是延伸出的问题，故唯设二楼为最佳答案了。