楼主: 江夏雁
1729 4

[问答] 如何写“某一单元格不是正被选中的单元格” [推广有奖]

  • 20关注
  • 2粉丝

朋友

教授

57%

还不是VIP/贵宾

-

威望
0
论坛币
565 个
通用积分
5.4453
学术水平
8 点
热心指数
9 点
信用等级
-4 点
经验
40942 点
帖子
843
精华
0
在线时间
613 小时
注册时间
2010-6-24
最后登录
2025-2-26

楼主
江夏雁 在职认证  发表于 2014-7-21 18:15:35 |AI写论文

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群
赵安豆老师微信:zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

感谢您参与论坛问题回答

经管之家送您两个论坛币!

+2 论坛币

如何写某一单元格(行、列)不是正被选中(激活)的单元格(行、列)


多谢!


二维码

扫码加我 拉你入群

请注明:姓名-公司-职位

以便审核进群资格,未注明则拒绝

关键词:单元格 如何写 如何

若无人伴你 愿你成你自己的太阳

沙发
芐雨 发表于 2014-7-21 22:49:46
不明白,你想要什么,举个实例吧

藤椅
江夏雁 在职认证  发表于 2014-7-22 08:03:11
芐雨 发表于 2014-7-21 22:49
不明白,你想要什么,举个实例吧
比如,如果cells(2,2)不是正在被选中的单元格,则cells(2,2).value=100

板凳
芐雨 发表于 2014-7-22 08:52:17
用Intersect,取两者的交集,若交集为空,则无重叠,反之,则有重叠部分。
  1. Sub test()
  2.     If Application.Intersect(Selection, Cells(2, 2)) Is Nothing Then
  3.         Cells(2, 2) = 100
  4.         MsgBox "There is no intersection!"  '无交集
  5.     Else
  6.         MsgBox "Overlap!"    '重叠
  7.     End If
  8. End Sub
复制代码
已有 1 人评分学术水平 热心指数 收起 理由
江夏雁 + 1 + 1 精彩帖子

总评分: 学术水平 + 1  热心指数 + 1   查看全部评分

报纸
江夏雁 在职认证  发表于 2014-7-22 08:58:23
芐雨 发表于 2014-7-22 08:52
用Intersect,取两者的交集,若交集为空,则无重叠,反之,则有重叠部分。
intersect是不是内容上的有相同?
其实……我是想判断“假如某单元格不是被选中的”比如
if NOT cells(3,3)=selection  
这样的……
多谢!

您需要登录后才可以回帖 登录 | 我要注册

本版微信群
加好友,备注cda
拉您进交流群
GMT+8, 2025-12-9 15:39