Диспозиционную программу в Excel VBA самим создать

Excel VBA. Диспозиционная программа с картинками и просмотром фильтра в полях со списками

Эта программа показывает текущий запас всех артиклей (Диспозиционный материал) и позволяет быстро и легко находить артикли (Диспозиционный материал) на складе (Диспозиционное место).

Файл Excel имеет 4 листа: «Маска», «Диспозиционный материал», «Диспозиционное место» и «Лист».

В программе все делается из маски ввода. Маска ввода активируется на рабочем листе «Маска» с помощью кнопки «Маска».

Лист «Диспозиционный материал» состоит из 5 столбцов: Номер материала, Наименование, Единица, Количество, URL. Три первых столбца (Номер материала, Наименование, Единица) вводятся непосредственно на листе, а остальные 2 столбца заполняются программой.

Этот рабочий лист заблокирован и защищен паролем (пароль - цифра 3). Если его нужно разблокировать, выберите в строке меню «Рецензирование» «Снять защиту листа», введите цифру 3 в поле ввода „Пароль“ и нажмите «ОК».

Лист «Диспозиционное место» состоит из 6 столбцов: Номер места, Диспозиционное место, Количество, Номер материала, Наименование, Единица. Два первых столбца (Номер места, Диспозиционное место) вводятся непосредственно на листе, а остальные 2 столбца заполняются программой.

Этот рабочий лист заблокирован и защищен паролем (пароль - цифра 3). Если его нужно разблокировать, выберите в строке меню «Рецензирование» «Снять защиту листа», введите цифру 3 в поле ввода „Пароль“ и нажмите «ОК».

В листе «Лист» могут стоять копии журнала, диспозиционного материала, или диспозиционного места.

Маска ввода состоит из двух рамок: «Увеличение материала», «Уменьшение материала» и пять кнопок: «Удалить запись», «Удалить журнал», «Лист», «Вставить картинку», «Удалить картинку», из шести полей со списком: «Ид.-№», «Номер материала/Лист», «Наименование/Лист», «Номер места/Лист», «Диспозиционное место/Лист», «Ид.-№/Лист», из одного флажка «Лист» из одной картинки и из одного списка.

В рамке «Увеличение материала» вносится только увеличение количества диспозиционного материала. В записи программа всегда записывает дату, которая находится в поле «Дата», если это поле пусто,  вводится актуальная дата. Цифра из поля «Количество» добавляется к количеству выбранного диспозиционного материала. Количество и выбранный диспозиционный материал добавляются к выбранному диспозиционному месту. Программа создает 1048500 записей.

В рамке «Уменьшение материала» вносится только уменьшение количества диспозиционного материала. В этой рамке все работает так же, как и в рамке «Увеличение материала», только цифра количества вычитается или заносится как отрицательное число.

Идентификационные номера всех записей находятся в поле «Ид.-№».

Если в рамке «Увеличение материала» стоит номер материала, то кнопки «Вставить картинку» и «Удалить картинку» видны. Каждому артиклю можно вставить картинку или её удалить. Паролем для удаления является число 3.

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

При двойном щелчке правой кнопкой мыши в поле списка выбранная строка отображается в активном поле: если цвет фона белый, выбранный Ид.-№ переносится в поле «Ид.-№», если цвет фона синий, выбранный номер материала переносится в поле «Номер материала», если цвет фона жёлтый, выбранный номер места переносится в поле «Номер места». В поле списка ширина столбцов автоматически адаптируется к ширине столбцов отображаемого листа.

Кнопка «Лист активирует лист «Лист», создает копию листа, отображаемого в поле списка, и отключает маску ввода. В листе «Лист» вы можете вставить фильтры, щелкнуть в ячейку A1, выберите в строке меню «Главная», «Сортировка и фильтр», «Фильтр».

Флажок «Лист» активирует просмотр фильтра в полях: «Номер материала/Лист», «Наименование/Лист», «Номер места/Лист», «Диспозиционное место/Лист», «Ид.-№/Лист». Если копия листа «Диспозиционный материал» отфильтрована, видны только два верхних поля. Если копия листа «Диспозиционное место» отфильтрована, видны только четыре верхних поля. Если копия журнала отфильтрована, видны все пять полей.

Все выбранные значения, в этих  пять полях, отображаются в активных полях (Combobox) того же цвета в рамках «Увеличение материала» и «Уменьшение материала».

Каждая запись, если она ещё актуальна, может быть удалена с помощью кнопки «Удалить запись», пароль для удаления - это цифра 3.

Кнопка «Удалить журнал» удаляет содержимое журнала. Пароль - это цифра 3.