Excel-VBA-Collection

1
VERSION 1.0 CLASS
2
BEGIN
3
  MultiUse = -1  'True
4
END
5
Attribute VB_Name = "ЭтаКнига"
6
Attribute VB_GlobalNameSpace = False
7
Attribute VB_Creatable = False
8
Attribute VB_PredeclaredId = True
9
Attribute VB_Exposed = True
10
0 Option Explicit
11
Option Compare Text
12
Option Base 1
13
DefLng A-Z
14

15
Private Sub Workbook_BeforeClose(Cancel As Boolean)
16
    CloseBar
17
End Sub
18

19
Private Sub Workbook_Open()
20
    AddBar
21
End Sub
22