excel当首次查找某个值时,另外一个单元格值加1,再次输入时提示重复输入

姓名性别年龄张三男25李四男28王二女27麻子男26。。。如上表,如果我用vup通过查找张三的年龄,当第一次输入张三时,源数据张三就变色(只要有标记出来就行了),且某个单... 姓名 性别 年龄
张三 男 25
李四 男 28
王二 女 27
麻子 男 26




如上表,如果我用vup通过查找张三的年龄,当第一次输入张三时,源数据张三就变色(只要有标记出来就行了),且某个单元值的值加1(当张三没有时,不加1),当第二,三,四,,次输入张三,某个单元格提示重复输入

感谢亲们,若有方法对的,再追加100分
展开
 我来答
姓王的wy451

推荐于2016-08-31 · TA获得超过48.3万个赞
知道大有可为答主
回答量:8万
采纳率:78%
帮助的人:8929万
展开全部

下载附件试试, 在F1输入姓名,看看是不是你要的结果。

Private Sub Worksheet_Change(ByVal Target As Range)
   Dim Ra As Range
   If Target.Address = "$F$1" Then
      Application.EnableEvents = False
      If Not IsEmpty(Target) Then
         Set Ra = Columns("A").Find(Target)
         If Not Ra Is Nothing Then
            If Ra.Font.ColorIndex = 3 Then
               [F3] = "有重复"
            Else
                Ra.Font.ColorIndex = 3
                Range("F3").ClearContents
                [F2] = [F2] + 1
            End If
            [F5] = Ra.Offset(, 2)
         Else
            [F3:F5].ClearContents
         End If
      Else
         [F3:F5].ClearContents
      End If
      Application.EnableEvents = True
   End If
End Sub


更多追问追答
追问
没错,就是这种效果,可是如果 我要自己做一个呢,上面这些代码要怎么用呢,能不能解释 下
追答
一下也说不清楚,你自己慢慢琢磨琢磨吧,如果不行,把你具体的表结构发来我帮你。
赵小梦啊赵小梦c9175
2014-08-15 · TA获得超过417个赞
知道小有建树答主
回答量:1299
采纳率:48%
帮助的人:257万
展开全部
什么是vup?
某个单元值的值加1,是哪个单元格?
某个单元格提示重复输入,是哪个单元格?
第一,第二,三,四,,次输入,是在哪里输入?
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
knowdetail
2014-08-14 · TA获得超过156个赞
知道小有建树答主
回答量:342
采纳率:0%
帮助的人:267万
展开全部
VUP是什么意思?
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 1条折叠回答
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式