Page 74 - 6735

книги)
Private Sub Workbook_BeforeClose(Cancel As Boolean)
MsgBox "VBA - найлегше програмування!"
End Sub

'Процедура обробки події SheetSelectionChange (зміна
виділення на листі)
Private Sub Workbook_SheetSelectionChange(ByVal sh As
Object, ByVal Target As Range)
Debug.Print "Зміна виділення " & Target.Address
End Sub

'Процедура обробки події SheetChange (зміна на листі)
Private Sub Workbook_SheetChange(ByVal sh As Object, ByVal
Target As Range)
Debug.Print "Зміна у " & Target.Address
End Sub

'Процедура обробки події SheetBeforeRightClick (натиск
правої кнопки міші на листі)
Private Sub Workbook_SheetBeforeRightClick(ByVal sh As
Object, ByVal Target As Range, Cancel As Boolean)
Debug.Print "Правий натиск на " & Target.Address
End Sub

Клас Chart – діаграма Excel

Клас Chart описує поняття діаграми Excel [19]. Об’єкт активної
діаграми можна отримати за допомогою властивості ActiveChart.
Наступний приклад додає дані на лист Excel і за цими даними будує
діаграму з логарифмічною регресією (рис. 3.1).

Public Sub main()
'Додати дані на лист:
Range("A1:A6")=Application.Transpose(Array(1,2,3,4,5,6))
Range("B1:B6")=Application.Transpose(Array(0,3,6,7,9,11))
Charts.Add 'додати діаграму
74