我想在excle中编一段vba程序，但是我对vba了解很少，请各位给个提示

Question

我想在excle中编一段vba程序，但是我对vba了解很少，请各位给个提示。
思路是这样的。
1、提示用户选择一个区域，可以是一列。
2、将用户选择的区域拿到程序里进行判断，使用countif命令，找出用户选择区域中重复的单元格，并用黄色标识。请各位给个提示，谢谢

Answer 1

Sub Macro1()
For Each c In Worksheets("Sheet1").Range("A1:A10")
    If c.Value = 1 Then
        c.Interior.ColorIndex = 3
    End If
Next
End Sub

Answer 2

countif命令是计算个数的不能定位，用2007有颜色条件功能。另外你也可以不用VBA就可以达到目的，用什么函数自己可以参考帮助文件用些圈套函数。

Answer 3

需要的话发邮件给我，我给你源代码！
[email protected]