гою даного коду можна створити гістограму зарплати по різних посадах. Дана гістограма збережеться як картинка і експортується в Picturebox-е. Код цих операцій наведено на лістингу 2.6. Результат наведено на малюнку 2.3.
Рис.2.3 Результат лістингу 2.5
Дані ввели і гістограма з'явилася на формі.
Висновок. У результаті можна сказати, що макроси полегшують здійснення операцій в Excel-е. Також за допомогою коду VB.Net не створюючи лист Excel можна створити гістограму на аркуші або ввести дані на ньому. На інших відомих нам платформах, наприклад, як Access неможливо створити гістограму для БД. На гістограмі показується зарплата працівників за посадами. Проект наводиться в папці Yusupova Z_den2.
3. СТВОРЕННЯ ТА ОБРОБКА електронних таблиць MS EXCEL
. 1 Складні об'єкти VBA MS Excel
У Excel-е була створена робоча книга. На аркуші вводили дані відповідно предметної області (Відділ кадрів). Створена табель зарплати співробітників. Також в модулі була створена форма, за допомогою якої можна вводити дані в цей табель. Код даної операції наведено на лістингу 3.1.
Лістинг 3.1. Код введення даних за допомогою форми
Private Sub CommandButton1_Click () r As Integer=Application.CountA (ActiveSheet.Columns (1)) + 1
Вищенаведений код дозволяє вводити дані в окремих стовпцях.
Лістинг 3.12 Присвоєння значень до текстових полів
ActiveSheet.Cells (r, 1) .Value=TextBox1.Text.Cells (r, 2) .Value=TextBox2.Text.Cells (r, 3) .Value=TextBox3.Text
End Sub
Можна вводити дані в текстових полях
Дана форма наведена на малюнку 3.1.
Рис.3.1 Форма для введення даних
Дані цього співробітника ввелись в таблицю.
Також можна захистити лист для збереження інформації з вкладки «Рецензування», «Захист аркуша». Також дозволити зміни на аркуші. Все це можна зробити з паролем або без пароля. Також був заданий пароль для приховування коду в модулі.
3.2 Створення звітів та офіційних документів
У середовищі VBA MS Excel можна створювати користувацькі функції для обробки даних, в нашому випадку для обчислення заробітної плати за посадами. Код наведено на лістингу 3.2.
Лістинг 3.2 Код обчислення зарплати
Function zp (chasi As Double, ch_plata As Double) As Double
zp=chasi * ch_plataFunction
Для обчислення спочатку потрібно знайти суму робочих годин співробітників, потім в окремій таблиці вводимо погодинну плату за кожним посадам. Результат наведено на малюнку 3.2.
Рис.3.2 Результат лістингу 3.1
Як вже видно з малюнка зарплата обчислюється з двох таблиць по різних посадах. На основі даних зарплати співробітників за допомогою макросу була створена гістограма Також на проекті є функції обчислюють прибутковий податок і суму робочих годин.
Висновок. Мета роботи в тому, що можна застосовувати ці функції при створенні табелі про зарплату. Щоб кожен раз не вводити одні й ті ж дані можна використовувати шаблон цієї відомості і поставити захист в потрібних полях. А також скласти рейтинг працівників за допомогою гістограм.
4. Об'єктна модель VBA MS ACCESS
. 1 Мова програмування VBA MS Access
Програмування на VBA в СУБД Access використовують в основному розробники (програмісти) в процесі створення додатків (різних баз даних, БД), з якими працюють користувачі.
Для програмування в Access використовується не додаток Visual Basic, а вбудована в Microsoft Office система програмування Visual Basic for Applications (VBA - Visual Basic для додатків). Система програмування VBA є невід'ємною частиною додатків Microsoft Office і призначена для візуального програмування в таких додатках як Word, Excel, PowerPoint, Access і т.д. У VBA мовою програмування є VB, а інструментальна середу програмування реалізована у вигляді редактора VB, який може активізуватися з усіх програм MS Office.
Програмні модулі в VBA MS Access
Спочатку з вкладки «Проекти», «Додати посилання» підключимо середу Microsoft ActiveX Data Objects. Після цього можна буде працювати з Ms Access. Тепер можна з допомогою коду створити таблиці в Ms Access, а також вказати зв'язки між ними. Була створена 5 таблиць і зв'язку між ними. Код наведено...
