公式搜索记录，如果发现它添加1否则它创造了一个新记录

Question

我是新来的Excel，对此抱歉抱歉，但你能帮我解决我的问题的资源吗？

我想一个简单的公式，该用户将在所有A输入用户名

的forumla将搜索用户名：一个细胞，如果能找到它，它会增加1对细胞对，如果没有，它会在底部的开放单元格上创建一个用户名。

example here

Answer 1

这是一个宏，会做同样的事情，作为一个公式：

在您的工作表的代码

Private Sub Worksheet_Change(ByVal Target As Range) 

If Target.Address = "$F$4" Then 'assuming the name you are searching is in F4 
    Dim i As Integer 
    Dim check As Integer 

    Dim LastRow As Long 
    With ActiveSheet 
     LastRow = .Cells(.Rows.Count, "A").End(xlUp).Row 
    End With 

    For i = 2 To LastRow 
     If Cells(i, 1).Value = Target.Value Then 
      Cells(i, 1).Offset(0, 1).Value = 1 
      check = 1 
     End If 
    Next i 

    If check > 0 Then 
     Exit Sub 
    Else 
     LastRow = LastRow + 1 
     Cells(LastRow, 1).Value = Target.Value 
    End If 
End If 
End Sub