Подсчет кол-ва физ.лиц по персональному идентификационному номеру

[master_vel]

Здравствуйте уважаемые программисты. Убедительная прошу вас помочь мне решить данную задачу, нужно посчитать кол-во физических лиц в столбце по записанным в ячейках персональным идентификационным номерам (ПИН). В таблице может быть несколько одинаковых номеров принадлежащих одному физическому лицу. Задача посчитать не кол-во номеров а кол-во физических лиц которым принадлежат эти (ПИН) номера. У меня Excel 2007. Образец таблицы прилагаю..Книга002.rar. Помогите.

[RAN.]

Сообщение от master_vel

В таблице может быть несколько одинаковых номеров принадлежащих одному физическому лицу. Задача посчитать не кол-во номеров а кол-во физических лиц которым принадлежат эти (ПИН) номера.

Помогаю.
ДВА!
И попробуйте убедить в обратном!

А точнее - одному физическому лицу может принадлежать один номер, или несколько?
Если один - в чем разница между количеством номеров и физ. лиц?
А если несколько - где связь?

[IgorGO]

18
формула массива:
=СУММ(1/СЧЁТЕСЛИ(D4:D33;D4:D33))

[doober]

Там некоторые хитрые получают несколько раз

[master_vel]

Сообщение от RAN.

Помогаю.
ДВА!
И попробуйте убедить в обратном!

А точнее - одному физическому лицу может принадлежать один номер, или несколько?
Если один - в чем разница между количеством номеров и физ. лиц?
А если несколько - где связь?

Да Вы правы одному физическому лицу принадлежит один ПИН код. Я возможно неправильно описала свой вопрос. Дело в том , что в даной таблице ведется учет выданной материальной помощи членам профсоюза. А запись ведется не по фамилии а по ПИН коду. А так как каждый член профсоюза в течении нескольких месяцев может получать помощь несколько раз, то и его ПИН код может быть записан в таблице несколько раз. Учет в таблице ведется не по количеству ПИН кодов а по количеству физических лиц. Пример ПИН 1111111119 встречается в таблице 4 раза но это 1 физическое лицо, ПИН 1111111118 встречается 2 раза 1 физ. лицо. Можно конечно все посчитать и в ручную, но у нас очень большой коллектив (несколько тысячь) и на подсчет уходит огромное колличество времени и нервов.

[master_vel]

Сообщение от doober

Там некоторые хитрые получают несколько раз

Уважаемый DOOBER ,благодарна за формулу. Но есть одно маленькое но. Когда я ввела вашу формулу в действующюю таблицу, то Excel выдал такую ошибку #ИМЯ? формула содержит нераспознанный текст. Ошибка - недопустимое имя. Подскажите пожалуста в чем моя ошибка в написании формулы. Заранее благодарна.

[doober]

Если вы откроете проект VBA,то увидите Модуль ,в нем пользовательская функция

Public Function физ_лиц(rng As Range)
Dim rr As New Collection, Sl As String
For Each cel In rng
On Error Resume Next
 Sl = cel.Value
rr.Add Sl, Sl
Next
физ_лиц = rr.Count
End Function

В действующем файле вы должны добавить модуль и вставить в него
этот код ,как в видеоинструкции Функция.
Файл сохранить с поддержкой макросов
Но один минус-максимальное количество ПИН 255

[kuklp]

Сообщение от doober

Но один минус-максимальное количество ПИН 255

Это почему, Серег? Сколько у тебя памяти хватит. Ограничений на count нет.

[Watcher_1]

А можно вообще без формул и без кодинга!
В Excel есть прекрасная возможность удалять повторяющиеся строки(Удаление Дубликатов на вкладке Данные), просто надо выставить удаление строк по ПИН..... просто потом книгу надо под другим именем сохранить чтобы данные не потерялись!!!

[Hugo121]

Формула IgorGO работает отлично, совсем нет нужды в UDF (я тоже бы стал свою аналогичную функцию писать, на словаре вероятно).
Но как работает формула Игоря, мне не понять... Ведь
{=COUNTIF(D4:D33;D4:D33)}
выдаёт 4?