Есть рабочая таблица, с множеством формул и макросов, и с организованным одновременным доступом нескольких пользователей. Организована она так – я каждый день вношу информацию на первую страницу (номер заказа, его данные и тд...) и создаю именованный диапазон каждого заказа. На второй странице каждый работник отмечает что он взял в работу (и макрос фиксирует время начала), сколько выполнил (фиксируется время окончания работы по этому заказу) и рассчитывается затраченное время, затем отображает на первой странице статус заказа «в работе», «готов».
Для удобства работы, на второй странице сделаны зависящие выпадающие списки из именованных диапазонов с первой страницы. Через формулу ВПР подтягиваются данные из первой таблицы, и заполняются ячейки – кол-во в заказе, оставщееся кол-во. Те рабочий выбирает номер заказа, затем из выпадающего списка выбирает что конкретно он будет собирать, и в конце работы ставит сколько он сделал за смену. Все остальное делает ексель.
Мне кажется я перемудрила с защитами листа: у меня разрешено изменять конкретные диапазоны на второй странице, страница защищена, книга вроде тоже ставится на защиту когда открываешь "Общий доступ". Может быть поэтому у меня возникли следующие проблемы? Или я куда-то не туда вставляю макросы? Или я что-то упускаю из вида? Макросы до этого в предыдущей версии документа работали отлично. Почему сейчас от них нет никакой реакции - не понятно... Из трех макросов работает только один.
Столкнулась с трудностью:
1) Когда к книге открыт одновременный доступ, я могу делать именованные диапазоны на первой странице, но на второй странице чтобы нажать «Проверка данных», мне нужно снять общий доступ, снять защиту страницы, и только тогда я могу внести новые данные в «Проверку Данных». И получается, что теряется смысл от этого «Общего доступа», тк приходится всех обзванивать и просить закрыть документ. Можно ли как-то усовершенствовать макрос, который у меня уже есть, чтобы «Проверка данных» была открыта?
Сейчас макрос такой:
| Код |
|---|
Sub Protect_for_User_Non_for_VBA()
Sheets("Сборка").Protect Password:="6585", UserInterfaceOnly:=True
Sheets("Сборка").Protect Password:="6585", AllowFiltering:=True, UserInterfaceOnly:=True
End Sub |
Я пользовалась этим макросом в другом документе, также с общим доступом, и он отлично работал. Но сейчас, при открытии документа, он ругается. Чтобы макросы работали, я с ячеек, в которых происходит макрос, сняла защиту, хотя точно помню, что в прошлом документе ничего подобного я не делала. Также в предыдущем документе у меня была организована подсветка всей строки, в которой выделена ячейка. В этом документе – этот макрос не работает ни в режиме «общего доступа», ни в обычном режиме.
| Код |
|---|
Function АктивнаяСтрока() As Long
Application.Volatile АктивнаяСтрока = ActiveCell.Row
End Function |
2) Почему-то не работает макрос, который должен очищать ячейку В, если в ячейке А поменялись данные.
| Код |
|---|
Private Sub изменения(ByVal Target As Excel.Range)
If Target.Address(False, False) = "A2" Then Range("B2").ClearContents
If Target.Address(False, False) = "B2" Then Range("A2").ClearContents
End Sub |
3) Есть графа «подготовлено в работу», хотелось бы сделать её автоматической. Например. В заказе всего 5 шт сборок, в первый день Иванов сделал 2 сборки, остальные подготовил, но собрать не успел. Когда пришел его сменщик Петров и продолжил собирать этот заказ, чтобы эта графа у Иванова уменьшилась на количество, собранное Петровым. И открыв таблицу, было четко видно, сколько есть готовой продукции, сколько заготовок. Или чтобы когда эта позиция полностью собрана, чтобы эта графа очищалась.
Как это можно организовать? Через макрос? Или через формулы?
Прикладываю пример. Пароль - 6585.
