Все варианты работают, спасибо всем!

Почти реальный: по факту лист 1 в другой книге

Добрый день.
помогите, пожалуйста, для определенной даты найти максимальное значение из другого столбца на соседнем листе (не формулой массива, если можно). Пример во вложении.
Спасибо.

Вроде работает как надо!)
Спасибо!

Неужели нету решения?

Добрый день.
Помогите, пожалуйста, с файлом. Необходимо сделать выпадающий список из значений, оставшихся после фильтров по четырем столбцам. Формулы, макросы - приветствуются любые варианты.
Пример с описанием прикреплен.
Спасибо!

Добрый день.
Помогите, пожалуйста, подправить макрос, файл во вложении:

Принцип работы таков: при запуске открывается userform, куда человек заносит данные. После этого начинается проверка:
1. Если значение из textbox есть на листе "Список", то появляется сообщение "Такой тир уже есть" и выход из обработки;
2. Если нет этого значения - то оно добавляется на лист "Список", сортируется по возрастанию, затем добавляется на лист "Карта" и также сортируется по возрастанию.

По факту происходит следующее: если при проверке значение на листе "Список" не находится, то макрос выдает ошибку Object variable or with block variable not set и ругается на строку:Подскажите, пожалуйста, что не так в коде?
Спасибо.

Объявил как Double, ошибки те же.

Я хочу получить следующее:
1. Если текст "Введите номер тира", то выход из обработки - сейчас не работает, убрал из кода;
2. Про "Введите номер тира123" я, честно говоря, не подумал... Можно как-нибудь выделить весь текст в textbox при щелчке мыши на него? Но пропускать такие нельзя
3. Далее проверка: если значение из textbox есть на листе "Список", то выдать сообщение "Такой тир уже есть" и выйти из обработки - работает;
4. Если нет этого значения - то надо добавить его на лист "Список" (и отсортировать о возрастанию), затем добавить на лист "Карта" и также отсортировать по возрастанию - не работает, выдает ошибку "Object variable or with block variable not set" для строки:

Спасибо!

Спасибо всем.
добавил
varX =CDbl(UserForm1.TextBox1.Value), но тогда слетает проверка на повторения в листе "Список".

Как можно обойти ошибку "object variable or with block variable not set" в 7-ой строке "If varX <> Worksheets("СПИСОК_ТИРОВ").Range("A:A").Find(varX, LookIn:=xlValues).Offset(, 0)"?

Добрый день.
Помогите, пожалуйста, решить вот такую задачу: во вложенном файле макрос добавляет значение из textbox в списки на двух листах. Перед тем как добавить число, проверяет, есть ли уже такое число на листе "Список". И если находит там совпадение - выдает сообщение и останавливается.
Проблема в том, что число из textbox добавляется как текст. А нужно как число (для сортировки), причем часто это число не целое, а с один-тремя знаками после запятой. Я менял типы переменных (double, string), но тогда либо не срабатывала проверка, либо выскакивала ошибка type mismatch.
Может и не в типах дело? Нужна Ваша помощь.

Спасибо всем, все супер!

Прошу прощения, забыл убрать. Пароль Mukovnin
Файл на работе остался

Добрый день.
Прошу прощения, пересмотрел много тем по разграничению доступа, но похожего примера не нашел, прошу помощи.
Нужен макрос для следующей схемы: на листе "2" в ячейке B4 есть имя пользователя. По клику на кнопку макрос должен найти имя этого пользователя на листе "1", проверить в соседнем столбце его права доступа и открыть соответствующий лист. Если это "Администратор" - лист USER_PROFILE_ADV, если "Пользователь" - USER_PROFILE, если "Гость" - какой-нибудь саркастический msgbox

Пример во вложении.
Спасибо!

Отлично, супер!
Спасибо огромное

Добрый день.
Проблема в следующем: появилась потребность запретить пользователям вставлять путем копирования данные в столбцах I и K. Туда данные должны добавлятся только из выпадающего списка. Здесь я воспользовался вот этим примером. Но беда в том, что новые строки в таблице добавляются макросом, и при добавлении срабатывает private sub, который запрещает копировать в указанный диапазон
Посоветуйте, пожалуйста, как можно выкрутится из этой ситуации? Можно ли добавить в макрос условие, по которому будет игнорироваться private sub?
Пример прилагаю

добрый день. Проблема в следующем: после установки обновлений безопасности слетели все выпадающие списки (именнованные диапазоны), и при переходе на лист с динамической таблицей сразу же выдает ошибку "Нельзя найти 'Имя листа!Диапазон'
Подскажите, пожалуйста, кто знает как можно быстро вернуть все обратно?
Спасибо

Нужно делить по честному.
Сначала определяем, сколько единиц объема производится в минуту, за весь период от старта до финиша. Затем, если старт в дневную смену, а финиш в ночную - то полученное значение умножаем на оставшиеся минуты, от старта до 20:00.
Если старт в ночную, а финиш в дневную, то полученное значение умножаем на оставшиеся минуты до 08:00

Спасибо
Но считает некорректно. Например LINE 8 - формула недосчитала 700 единиц объема, которые переходят из дневной смены на ночную

Добрый день. Граждане, помогите, пожалуйста, решить следующую задачку: необходимо из одной таблицы с вертикально расположенными данными, эти самые данные перести в горизонтальную таблицу, параллельно пересчитав их по определенному условию.
Пример во вложении

Спасибо! Второй вариант работает правильно!
Спасибо огромное!

Отлично, спасибо всем!

На любое значение. Например "ок".
Пример прилагаю

Добрый день. Подскажите, пожалуйста. Есть такой вот код:Что нужно в нем поменять, чтобы менялся не цвет ячейки, а ее значение?
Спасибо!

Максим, спасибо!

Я видимо, не так выразился - имел в виду чтобы на Sheet2 новые данные добавлялись всегда со второй строки.
Для того, чтобы новые данные всегда были вначале списка и чтобы при их добавлении не прокручивать каждый раз весь список вниз.

Супер, спасибо!
А можете сделать так, чтобы весь цикл всегда начинался со второй строки?
Заранее благодарю

Нарисовал )

Добрый день. Помогите, пожалуйста, данные расположенные в строках с помощью макроса перенести на другой лист по определенным столбцам. Подробнее в приложенном файле.
Заранее спасибо!

Спасибо! То что нужно

Добрый день. Подскажите, пожалуйста, решение: использую UDF SumByColor, но подсчет необходим одновременно и по второму условию - текстовому значению в ячейке. Значений всего два: "Д" и "Н". Пример прилагаю