Регистрация часов Приложение VBA
Приложение Excel VBA для еженедельной регистрации часов с защитой и паролем. Приложение позволяет сохранять данные в отдельный файл базы данных, добавлять новые имена, сохранять PDF-файлы и изменять даты.
Функционал приложения:
1 – защита паролем, поэтому люди не могут манипулировать ранее заполненными часами и только текущей датой.
2 - Функциональность для добавления большего количества людей в приложение.
3 - Ограничение по времени, чтобы приложение закрывалось через определенное время.
4 - Сохранение файла PDF с часами за неделю
5 - Сохранение часов в отдельной базе данных
Компоненты приложения:
1 urenReg.xlsb: это целевая страница, на которой люди могут получить доступ к элементам управления приложением (например, добавлять пользователей и регистрировать часы). Кроме того, здесь же расположены основные органы управления.
2 masterData.xlsb: отдельный файл базы данных, в котором хранятся ежедневные часы.
Скрипт urenReg.xlsb:
Модули рабочей книги
Workbook_Open() : заблокируйте определенные столбцы паролем при открытии книги и разрешите редактирование только текущего дня недели. Workbook_BeforeClose(): заблокировать все столбцы Workbook_SheetChange(): вызов действия по времени, которое закрывает книгу через 10 минут. Модули
dataTrans(): общая функция, которая требует пароля и выполняет передачу файлов в базу данных, сохраняет pdf-файл за неделю и очищает текущую неделю. ClearfillinData(): Функция очистки данных. Speed(): функция для ускорения выполнения кода за счет отключения определенных визуальных функций. медленный(): Функция возврата к настройкам по умолчанию. TimeSetting(): функция закрытия и сохранения книги через указанное время. SelectSheetsToPrint(): функция сохраняет текущий текущий лист в формате PDF с именем соответствующей недели. savewb(): функция, используемая для сохранения книги и сохранения введенного имени в журнале аудита. createOutputSheet(): Функция создает лист с данными, подготовленными в таблице для передачи во внешнюю базу данных. deleteDataInput(): функция, удаляющая лист переноса. add_name(): функция, позволяющая пользователям добавлять новые имена в форму регистрации часов. Button6_Click(): функция для перехода на 1 неделю вперед по датам. Button7_Click(): функция возврата на 1 неделю назад с датами. Скрипт masterData.xlsb:
Модули рабочей книги
Workbook_Open(): функция скрытия панели инструментов. Модули
getDataUrenregColumns(): функция для получения данных, созданных в листе передачи, и выполнения поиска и вставки значения на основе имени. LookupInnervalue(): функция для форматирования данных, используемая для отображения почасовых данных. удалитьDataInput(): Speed(): функция для ускорения выполнения кода за счет отключения определенных визуальных функций. медленный(): Функция возврата к настройкам по умолчанию.
