[已解决]求助:如何寻找相同值并标示?

wuxingai

sunjing-zxl 发表于 2012-1-15 21:55

arr = Range(Cells(2, "F"), Cells([F65536].End(xlUp).Row, [F2].End(xlToRight)))
是不是需要在后面 加column : arr = Range(Cells(2, "F"), Cells([F65536].End(xlUp).Row, [F2].End(xlToRight).column))

sunjing-zxl

是的，写掉了                       

zhouxingyu

wuxingai 发表于 2012-1-16 07:53
arr = Range(Cells(2, "F"), Cells([F65536].End(xlUp).Row, [F2].End(xlToRight)))
是不是需要在后面 加 ...

二位老师:在你们的帮助完善下,终于搞定了.反复测试了,任何数字,包括负数都能寻找出并且标示,常规和数值型均可.
万分的感谢二位老师的帮助!
还有一个突发奇想:假如配对的数字上下颠倒能实现吗?比如86-97和97-86也归为相同的组合.

zhouxingyu

sunjing-zxl 发表于 2012-1-16 08:04
是的，写掉了

非常感谢老师,补上这条后可以了.

清风云子

厉害啊，学习了……，谢谢