Всем большое спасибо! Все работает. Буду разбираться как устроен макрос и буду применять на реальных задачах.

Всем привет! Подскажите, как это можно сделать? Надоело собирать это вручную.
ВПР не подойдет, т.к. данные постоянно добавляются.
Необходимо подтягивать самую актуальную ревизию (наибольшее число это есть актуальная ревизия). После чего необходимо проставлять актуальное действие (если есть поставка то она заменяет предзаказ, если есть утвержден то он заменяет поставку, что следовательно заменяет предзаказ) Но если есть новая ревизия, в которой нет поставки или утверждения, то берем предыдущую ревизую где есть поставка или утвержден и ставим в актуальное, а самую крайнюю версию ставим в блок дополнительно.

Добрый день!
Подскажите, может у кого-то была такая проблема? Используется внешний  SDD накопитель. В день создания файла все работает стабильно, но на следующий день. Он почему-то повреждается (см. скриншот).

Добрый день!
Подскажите, пожалуйста, как сделать чтобы файл ссылался на себя при обновлении данных без пути? Если его переместили на другой ПК или папку. Возможно ли?

Sanja, все подошло. По видео видно, что при закрытии файла эксель, он не запоминает последние действия https://ru.files.me/f/kunx2em2z2

MikeVol, чем дополнить данный код, чтобы при закрытии файла было запоминание? Работает отлично то что надо, но при повторном открытии все приходится вносить данные заново.

Добрый день! Написала макрос на раскрытие/скрытие:



Private Sub CommandButton1_Click()
   Dim ws As Worksheet
   Set ws = ThisWorkbook.Sheets("Реестр MDR")

   ws.Columns("F:K").EntireColumn.Hidden = Not CheckBox1.value
   ws.Columns("M:X").EntireColumn.Hidden = Not CheckBox2.value
   ws.Columns("AB:AD").EntireColumn.Hidden = Not CheckBox3.value
   ws.Columns("AE:AS").EntireColumn.Hidden = Not CheckBox4.value
   ws.Columns("AT:AX").EntireColumn.Hidden = Not CheckBox5.value
   ws.Columns("AZ:BA").EntireColumn.Hidden = Not CheckBox6.value
   ws.Columns("BB").EntireColumn.Hidden = Not CheckBox7.value
   ws.Columns("BC:BM").EntireColumn.Hidden = Not CheckBox8.value
   ws.Columns("BN:BX").EntireColumn.Hidden = Not CheckBox9.value
   ws.Columns("BY:CK").EntireColumn.Hidden = Not CheckBox10.value
   ws.Columns("CL:CX").EntireColumn.Hidden = Not CheckBox11.value
   ws.Columns("CY:DK").EntireColumn.Hidden = Not CheckBox12.value
   ws.Columns("DL:DV").EntireColumn.Hidden = Not CheckBox13.value
   
   MsgBox "Изменения применены!"
End Sub





Добавила запуск через кнопку:



Sub ShowUserForm()
   UserForm2.Show
End Sub



Хочу добавить условие чтобы при повторном открытии макроса через кнопку он запоминал, что было ранее выбрано. Как это сделать? Подскажите, пожалуйста.

Спасибо! Можно попросить в файле эксель скинуть?

Необходимо создать генератор случайных чисел от общей суммы с определенной позицией чисел.
Н-р: надо разбить число 50 на 5 позиций. Он автоматом разбил на эти числа  12 8 16 9 5 (могут быть любые но в сумме должны давать общее, т.е. в данном случае 50)
Или хочу разбить 50 на 3 позиции, тогда 25 14 11 , или 245 на 2 , тогда 156 89.
Числа в позициях не должны быть одинаковыми.

Добрый день!
Подскажите, пожалуйста, как сделать Фильтр для многоуровневой таблицы?

Спасибо! Уже разобралась  

Добрый день!
Подскажите где ошибка в формуле?
Не считает условие если ячейка не пустая, выводит #Н/Д. В ячейке AG стоит дата.

=ЕСЛИМН(AG4="";"";AG4="нет в ГПР";"";AG4="<>";(ЕСЛИ(ПСТР(H4:H2021;39;2)="АС";AG4:AG2021-240;ЕСЛИ(ПСТР(H4:H2021;39;2)="КМ";AG4:AG2021-240;ЕСЛИ(ПСТР(H4:H2021;39;2)="ТК";AG4:AG2021-240;ЕСЛИ(ПСТР(H4:H2021;39;2)="ТХ";H4:H2021-240;AG4:AG2021-150))))))

Добрый день!
Необходимо создать умную систему ведения MDR-реестров. Основные функции:
- Быстрый поиск нужной информации
- Скачивание файлов;
-Сохранение истории вх. файлов по накладным;
-привязка сообщений к файлам.

Подробности могу обсудить в лс.

Спасибо!

Добрый день!
Подскажите, пожалуйста, возможно ли завязать в эксель ссылки на файлы таким образом, чтобы можно было при необходимости вставить из списка нужные файлы и он автоматически скачал их в необходимую папку?

Может кто-то пишет программки на базе эксель, необходимо создать умную систему ведения MDR-реестров, чтобы при одном клике можно было оперативно пользоваться информацией.

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

Добрый день!
Подскажите, пожалуйста, как объединить ячейки?

Пример: У меня имеется 6 столбцов которые необходимо объединить.

Делаю следующим способом:
=СЦЕПИТЬ([@[ГСП-1]];[@[ГСП-6]];[@[ССК Газрегион]];[@ГЭС];[@Дельта];[@[Не распределено]])

Однако данный способ мне не подходит, необходим / между значениями.

Если  я ставлю формулу следующим образом =СЦЕПИТЬ([@[ГСП-1]];"/";[@[ГСП-6]];"/";[@[ССК Газрегион]];"/";[@ГЭС];[@Дельта];"/";[@[Не распределено]])
То если ячейка была пустая получается значение следующим образом ГСП-1////. Лишние / мне не нужны.

Поделитесь, пожалуйста, опытом объединения ячеек. Какое условие необхдимо добавить?