Я пытаюсь сделать так, чтобы моя пользовательская форма проверяла, есть ли имя человека в моей электронной таблице. - PullRequest
0 голосов
/ 11 июля 2019

Я хочу, чтобы моя пользовательская форма проверила, существует ли имя человека внутри диапазона электронной таблицы.

Private Sub FirstName_Field_Change()

Dim ct As Workbook
Set ct = ThisWorkbook.Sheets("Candidate Tracker")

Dim i As Integer
Set i = WorksheetFunction.CountIf(ct.Range("G7:G2000"), LastName_Field.Value & ", " & FirstName_Field.Value & ",")

If FirstName_Field.Value = "" Then
    Else
    counta.Caption = i
End If

End Sub

Точки отладки на Private Sub FirstName_Field_change()

У меня есть рабочая форма пользователя userform. Он записывает данные, введенные в электронную таблицу. Я хочу, чтобы пользовательская форма изменила метку, которую я поместил на листе, на COUNTIF, когда она обнаружит, что в базе данных уже есть имя, подобное фамилии и имени.

Label6 будет счетчиком количества подобных записей.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...