Головна |
Розробляти програми в редакторі VBA можна і з використанням об'єктів додатків Office (об'єктів EXCEL, WORD та ін.)
Розглянемо розробку програми прикладу 2 з використанням об'єктів EXCEL. Будемо використовувати об'єкти:
- WORKSHEETS () -для позначення листа EXCEL
- RANGE (), або Ctlls () - для позначення діапазону комірок або одного осередку
- Властивість .Value для звернення до значенням осередки.
Тобто, якщо ми хочемо записати в осередок значення F програмним способом, потрібно написати в програмі так:
Worksheets (). Range (). Value = F,де в дужках вказати ім'я або номер листа EXCEL і адреса комірки, абоWorksheets (). Cells (). Value = F . Наприклад, щоб:
виконати | Вирази в процедурі |
Присвоїти осередку С1На аркуші "лист1" значення змінної F | Worksheets ("Лист1"). Range ("C1"). Value = FіліWorksheets ("Лист1"). Cells (1,3) .Value = F |
Присвоїти змінної X значення, що міститься в комірці D2 | X = WorkSheets ("Лист1"). Range ("D2"). ValueіліX = WorkSheets ("Лист1"). Cells (2,4) .Value |
Порядок виконання роботи:
1. Відкрити редактор VBE
2. Виконати команду Insert / Module
3. У вікно введення кодів вставити процедуру Insert / Procedure
Написати програмний код.
Public Sub Pr_1 ()
Dim a As Integer, b As Integer, c As Integer
'Зчитування показників
a = WorkSheets ("Лист1"). Cells (2,1) .Value
b = WorkSheets ("Лист1"). Cells (2,1) .Value
'Формування рядки заголовків
Worksheets ("Лист1"). Cells (1,1) .Value = a
Worksheets ("Лист1"). Cells (1,2) .Value = b
'Обчислення
c = a + b
'Висновок обчисленого значення на лист Excel
Worksheets ("Лист1"). Cells (1,3) .Value = c
End Sub
Пояснення до програми:
2.3. Розглянуту задачу вирішимо, використовуючи функції введення / виводу InputBox (), MsgBox ()
Порядок виконання роботи:
Public Sub Pr_2 ()
'Оголошення змінних
Dim a As Integer, b As Integer, c As Integer, Pr As Integer
'Введення значень змінних
a = CInt (InputBox ("Введіть значення a"))
b = CInt (InputBox ("Введіть b"))
c = a + b 'Обчислення значення з
Pr = MsgBox ("Значення з одно" & c, 35, "Дані введені")
Debug.Print Pr
End Sub
Розглянуту задачу вирішимо, використовуючи введення / виведення з листа / на лист Ехсеl | середа VBA
Елементи об'єктно-орієнтованого програмування в Excel VBA. | Workbooks ("Фінанси"). Worksheets ("Квартал_3"). Activate | Меню і панелі інструментів. | вікно властивостей | Інструменти панелі елементів | Поле зі списком | вимикач | MultiPage | ЗАВДАННЯ ДО ВИКОНАННЯ |