Выбрать дату в календареВыбрать дату в календаре

Страницы: 1
VBA - Excel - защита макроса, Поставленный пароль на редактирование VBA через Project Properties, но на другом компьютере открывается полностью дерево проекта без пароля
 
Приветствую уважаемые форумчане.

Сделал файл с макросом для работы с коммерческой тайной, идея в следующем:
Запускается окно с названиями вкладок и только при введении пароля вкладка открывается, при закрытии файла все изменения сохраняются во вкладках и при повторном запуске файла, вкладки не откроются пока заново не введешь пароль.

Поставил пароль через Project Properties на VBA, установил галочку на Lock project for viewing, при повторном открытии галочка стоит и дерево проекта (включая вкладки) без введения пароля не показываются.

Дал знакомому на тест, присылает прям видео с экрана, как он открывает этот файл, заходит в VBA (ни какого пароля у него не запрашивало) и просто через Visible открывает все вкладки (но заметил, что созданные модули у него на дереве проекта видны небыли, только вкладки), хотя у меня и у коллеги так сделать без пароля (поменять свойство вкладки через  Visible, да и просто увидеть вкладки) не получается, знакомый объяснить ни чего не смог, просто открыл и все, подскажите где слабое место, файл прилагаю, спасибо.

P.S.
У файла на вкладки и на VBA везде стоит пароль: 123
У меня, у коллеги и у знакомого, который тестировал Excel 2021
Уникальные значения с нескольких столбцов в один столбец
 
Здравствуйте уважаемые форумчане.

Работаю с большим кол-вом данных (версия Excel 2021), необходимо решить задачу:
В прикрепленном файле в столбце "Результат" собран список уникальных значений из предыдущих 6-ти столбцов,
формулами типа: ввести в G2

=ЕСЛИОШИБКА(ИНДЕКС($A$2:$F$10000;ОКРВНИЗ((МАКС((СЧЁТЕСЛИ($G$1:G1;$A$2:$F$10000)=0)*((СТРОКА($A$2:$F$10000)-2)*6+СТОЛБЕЦ($A$2:$F$10000)))-1)/6;1)+1;(ОСТАТ(МАКС((СЧЁТЕСЛИ($G$1:G1;$A$2:$F$10000)=0)*((СТРОКА($A$2:$F$10000)-2)*6+СТОЛБЕЦ($A$2:$F$10000)))-1;6)+1));"") или подобные ей

задачу решить не помогут, т.к. кол-во столбцов может быть много, строк более 10000, таблица начинает сильно тормозить, данные в первых 6-ти столбцах, как в примере, будут меняться автоматически и хотелось бы найти возможно макрос-функцию или простую формулу как типа "=УНИК" но чтоб работала на много столбцов, для получения автоматического единого уникального списка в одном столбце (а в идеале еще и чтоб в ней была встроена при необходимости функция "=СОРТ", ну если возможно :) )

Так же читал про функцию "=TOCOL", но в моей лицензированной версии Excel 2021 ее тоже нет, но есть приобретенный PLEX. Еще задавал вопрос в чат Джи Пи Ти, на что был получен ответ: ввести в G1 формулу: "=UNIQUE(FILTER({A:A; B:B; C:C; D:D; E:E; F:F}, {A:A; B:B; C:C; D:D; E:E; F:F}<>""))", конечно поменял эту формулу на "=УНИК(ФИЛЬТР....". менял запятые на точки с запятыми, пробовал вставлять точки с запятыми перед знаками <>  - формула не работает.
Может кто подскажет как решить данный вопрос (можно прямо в моем примере  :) ), за ранее благодарю.
Изменено: Максим Кухальский - 10.06.2024 03:49:37
Страницы: 1
Наверх