Контактный адрес электронной почты:klste@hotmail.de

 

Простая программа управления складом 2046 артиклей в Excel VBA с просмотром фильтра в комбинированном окне и в списке.

 

С помощью этой программы можно управлять складом с 2046 артиклей. В каждом расчётном счёте артикля есть место для 999992 записей. Программа может только вводить приход и отбор, создавать актуальный список артиклей, удалять выбранную запись и удалять все записи.

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

В таблице «Легенда» в области A2: C2047 можно создать 2046 расчётных счета артиклей. Эта область состоит из 2046 строк и трёх столбцов, в столбце «A» - №. артикля, в столбце «B» - наименование, а в столбце «C» - единица измерения. Расчётный счёт артикля создается при заполнении всех трех столбцов строки.

В маске ввода справа вверху есть 2 поля со списком: «№. артикля» и «Наименование», в них можно выбрать нужный артикль. Рядом с ними находятся 2 текстовых поля: «Единица» и «Запас», оба текстовых поля заблокированы, в них ничего не вводится, в них отображается только то, что есть в выбранном счёте артикля.

Когда №. артикля выбран, появляются кнопки: «П» и «О».

Кнопкой «П» вызывается рамка «Приход». В этой рамке заполняются поля «Документ/Текст», «Количество» и «Дата». Кнопкой «Ввести» данные из этих текстовых полей переносятся в выбранный счёт артикля.

С помощью кнопки «О» вызывается рамка «Отбор». Из этой рамки вводится только отбор. Здесь функционирует также как в рамке «Приход», только добавляются два текстовых поля: «Пункт назначения» и «Идентификация».

Ид.-№. записи и дата внесения записи вводятся только программой. Вновь введенная запись видна в поле списка внизу.

Каждую запись можно выбрать в окне списка, дважды щелкнув в неё левой кнопкой мыши, или её также можно выбрать непосредственно в поле со списком «Ид.-№.».

Если необходимо изменить запись, выберите номер записи, измените данные и введите их.

Если необходимо удалить запись, выберите номер записи, очистите все поля и введите их. Выбранная запись удалена.

С помощью кнопки «Счёт» вызывается расчётный счёт артикля. Вызванный счёт находится на листе «Расчётный счёт артикля».

Так вставляется фильтр в листе «Расчётный счёт артикля»: щелкнуть в ячейку A7, выбрать в строке меню «Главная», «Сортировка и фильтр», «Фильтр».

В маске ввода флажком «Просмотр фильтра для №. артикля:» активируется фильтр в поле со списком «Ид.-№.» и в списке. Под флажком стоит №. артикля, для которого был создан фильтр.

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

Ширина столбцов в списке автоматически адаптируется к ширине столбцов показанного листа.

Кнопка «Список» создает актуальный список расчётных счетов артиклей. Созданный список находится на рабочем листе «Список». В списке стоит актуальный запас для каждого расчётного счёта артикля.

В программе в каждый расчётный счёт артикля можно ввести 999992 записей .

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

С помощью кнопки «Удалить всё» можно удалить все записи.

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

Пароль для удаления является число 3.