Витяг унікальних значень з діапазону комірок або масиву, макроси для excel

Ігор, спасибі!
Підкажіть, як доопрацювати функцію так, щоб унікальні значення переносилися в тому форматі, в якому вони перебували в початковому масиві? У моєму випадку початковий масив - це числа, які вивантажуються з іншої програми і не відформатовані, як числа, в той час, як переносяться вони у вигляді чисел. Через це в подальшому не працює функція ВПР.
Або може бути краще зробити так, щоб функція спочатку перетворювала початковий масив в числа і тільки потім переносила унікальні?

Це тому що ви в інший файл перенесли тільки частина коду (а код функції UniqueValuesFromArray забули скопіювати)

Добридень!
На рідному файлі макрос працює відмінно, на іншому, з тим же розширенням не працює, видає помилку Sub or Function not defined на UniqueValuesFromArray. В чому може бути причина?
Розширення обох файлів поміняв на .xlsm
Дякуємо!

Розібратися.
СПАСИБІ ВЕЛИКЕ ЗА ФУНКЦІЮ1111111

Мабуть, 36-е значення (яке «перше унікальне») - тільки на вигляд схоже на перше
(Наприклад, є зайвий пробіл, або одна російська буква замінена схожою англійської)

Доброго дня.
Відразу скажу, що в макросах НЕ че не розумію.
Мені дуже сподобалася ваша функція, але з'явилася проблема.
Функція вибирає 35 унікальних значень, далі повертає перший унікальне.
В чому проблема?

У статті написано:

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

виділяєте КІЛЬКА осередків, вводите цю формулу, і завершуєте введення натисканням Ctrl + Shift + Enter (замість звичайного Enter)
Тоді буде виводитися кілька унікальних значень

А взагалі, унікальні можна і формулами вивести, без макросів.

Доброго вам дня. Макрос у мене заробив відмінно а ось функція "Унікальні" чому то працює тільки в файлі прикладі Unique.xls. Ситуація така: все як годиться додав функцію в модуль, але вона на відріз відмовляється коректно працювати, замість унікальних значень видає перше-ліпше значення причому воно повертається у всіх осередках де прописана функція. Допоможіть будь ласка розібратися.

Так зробити можна, але.
одна справа - вибрати унікальні значення (тут все ясно, варіантів особливо немає),
і зовсім інше - вибрати рядки з унікальними значеннями в якомусь стовпці.

Наприклад, є у нас 3 рядки з однаковими значеннями в 1-м стовпці.
Яку з цих трьох рядків виводити в результат? Першу, третю, другу?

Приклад її використання для вашого випадку:

Вибачте за надокучливість))
Метушні ще одне питання.

Зараз вибірка унікальний відбувається тільки по стовпчику "A".
Чи можливо зробити вибірку унікальних по стовпчику "A", але з умовою, щоб в діапазон фільтрування потрапляли також стовпці B і C?

Як результат: унікальні значення будуть відібрані по стовпчику "А", але відповідні записи з стовпців B і C будуть також збережені.

Начебто розібрався:
Dim ПервийСтолбец As Range: Set ПервийСтолбец = Range (Sheets ( "дані"). Range ( "A1"), Sheets ( "дані"). Range ( "A" Rows.Count) .End (xlUp))

Підкажіть будь ласка. Зараз макрос спрацьовує в разі якщо активний лист з масивом.
Як правильно додати назву листа в запис, щоб активація листа з масивом була обов'язкової?

Я пробував ось так, але макрос видає помилку:

Dim ПервийСтолбец As Range: Set ПервийСтолбец = Sheets ( "дані"). Range ([A1], Sheets ( "дані"). Range ( "A" Rows.Count) .End (xlUp))

все прекрасно, тільки не зовсім зрозуміло, що відбувається. ото був би файлик з працюючим прикладом, там хоч по результату можна було б обчислити, що-куди

Відмінний приклад використання колекцій для створення масиву унікальних записів. Давно використовую колекції, але до цього сам не додумався. І працює швидко))