一个关于重复值的VBA

qujing342 · 发表于 2023-11-4 23:41

在指定C2:C100区域中，任意点击某一单元格，同时选择2个或2个以上单元格，下面功能无效。
当活动单元格为C2时，判断C2:C100区域中所有单元格与C2是否重复，如果有重复，则将所有重复的单元格底色标红色；其余单元格底色不变
当活动单元格为C7时，判断C2:C100区域中所有单元格与C7是否重复，如果重复，则将所有重复的单元格底色标红色；其余单元格底色恢复原属性。
……
实现如下功能

蓝桥玄霜 · 发表于 2023-11-5 09:38

重复的例子：

无关岁月 · 发表于 2023-11-5 09:53

C列查重.7z (12.96 KB, 下载次数: 13)

gwjkkkkk · 发表于 2023-11-5 10:00

请参考。。。

qujing342 · 发表于 2023-11-5 13:31

蓝桥玄霜发表于 2023-11-5 09:38
重复的例子：

请版主看看，哪里出了问题:
提示子过程或函数未定义
Create0bject

qujing342 · 发表于 2023-11-5 13:32

gwjkkkkk 发表于 2023-11-5 10:00
请参考。。。

谢谢老师

qujing342 · 发表于 2023-11-5 13:46

无关岁月发表于 2023-11-5 09:53

谢谢大师

蓝桥玄霜 · 发表于 2023-11-6 09:30

qujing342 发表于 2023-11-5 13:31
请版主看看，哪里出了问题:
提示子过程或函数未定义
Create0bject

CreateObject中的"O"是英文字母O，不是数字零

qujing342 · 发表于 2024-7-22 23:13

CreateObject中的"O"是英文字母O，不是数字零

谢谢
蓝桥玄霜版主，已将CreateObject中的"O"更改为大写英文字母O，达到效果。
不过仅对于单元内容是文本可以，若单元格内容是数字或者是日期时，则无效

ykcbf1100 · 发表于 2024-7-23 09:15

qujing342 发表于 2024-7-22 23:13
谢谢
蓝桥玄霜版主，已将CreateObject中的"O"更改为大写英文字母O，达到效果。
不过仅对于单元内容是文 ...

工作表事件，附件供参考。。。

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

[求助] 一个关于重复值的VBA

评分

评分

评分

评分