C
C
H
H
Ư
Ư
Ơ
Ơ
N
N
G
G


I
I
V
V
:
:


L
L
Ậ
Ậ
P
P


T

O
S
S
O
O
F
F
T
T


E
E
X
X
C
C
E
E
L
L



113

Exit Function
End If

If (DiemTB < 5) Then

một thông báo lỗi là
“#N/A”. Mặc dù trông rất giống lỗi trong Excel, nhưng thực chất đây vẫn
chỉ là một chuỗi thông thường.
Để trả về giá trị lỗi thực sự, VBA đã cung cấp thêm một hàm tên là CVErr, hàm này sẽ chuyển
đổi một số thành một giá trị lỗi tương ứng. Với giá trị lỗi thực sự như thế, tất cả những hàm có
tham chiếu ô chứa giá trị lỗi cũng sẽ tr
ả về giá trị lỗi tương tự. Và như vậy, người dùng chỉ cần
thay đổi câu lệnh
PhanLoai = “#N/A” bằng câu lệnh PhanLoai = CVErr(xlErrNA). Cần
lưu ý là kiểu trả về của hàm
CVErr là kiểu Variant, do vậy cũng cần phải thay đổi kiểu giá trị
trả về của hàm là Variant.
Hàm sẽ được hiệu chỉnh lại như sau:
Function PhanLoai(DiemTB) As Variant
If (DiemTB < 0) Or (DiemTB > 10) Then
PhanLoai = CVErr(xlErrNA)
Exit Function
End If
If (DiemTB >= 5) Then
PhanLoai = "Do"
Exit Function
End If 114
If (DiemTB < 5) Then
PhanLoai = "Truot"
Exit Function
End If
End Function

Ư
Ư
Ơ
Ơ
N
N
G
G


I
I
V
V
:
:


L
L
Ậ
Ậ
P
P


T
T
R
R

O
O
F
F
T
T


E
E
X
X
C
C
E
E
L
L



115

4.1. Khái niệm về Add-In
Add-In là một chương trình gắn thêm vào Excel nhằm bổ sung thêm tính năng cho Excel.
Thông thường, các tệp chứa Add-In có phần mở rộng là XLA và có cấu trúc tương tự như các
workbook của Excel.
So với các ứng dụng trong tệp XLS của Excel, việc sử dụng Add-In có một số ưu điểm sau:
Ø
Ø

ệm, họ sẽ không phải thắc mắc hay
cảm thấy khó hiểu khi không nhìn thấy những dữ liệu này.
Ø
Ø

Ngăn chặn việc truy cập vào mã lệnh. Khi phân phối ứng dụng dạng Add-In có đặt chế độ
bảo mật bằng mật khẩu, người dùng không thể xem hoặc thay đổi mã lệnh của ứng dụng.
Điều này tránh được việc sao chép mã lệnh của chương trình.
4.2. Trình quản lý Add-In
Việc quản lý các Add-In trong Excel được thực hiện rất đơn giản thông qua trình quản lý Add-
In. Để hiển thị trình quản lý Add-In, chọn trình đơn ToolsÖAdd-Ins… 116

Hình IV-10: Trình quản lý Add-In
Ø
Ø

Để tải/dỡ bỏ Add-In trong Excel: kích chuột vào hộp kiểm ở bên trái tên của Add-In.
Ø
Ø

Để mở một Add-In: chọn nút lệnh Browse… Ö Chọn Add-In cần mở.
GỢI Ý Thông thường, tệp Add-In sẽ có phần mở rộng là XLA và được lưu trữ trong thư
mục %UserProfile%\Application Data\Microsoft\AddIns.
4.3. Tạo Add-In
Nhìn chung, việc tạo Add-In được thực hiện rất dễ dàng bằng cách chuyển từ workbook thông
thường sang dạng Add-In. Đương nhiên, không phải workbook nào cũng thích hợp để chuyển
thành Add-In. Nhìn chung, workbook thích hợp nhất để chuyển thành Add-In là workbook có

G
G


I
I
V
V
:
:


L
L
Ậ
Ậ
P
P


T
T
R
R
Ì
Ì
N
N
H
H



E
E
X
X
C
C
E
E
L
L



117

Protection. Tích vào ô Lock project for viewing, và nhập vào mật khẩu (2 lần) Ö chọn
OK.

Hình IV-11: Hộp thoại Project Properties
4. Kích hoạt lại Excel, chọn trình đơn File Ö Properties, sau đó chọn thẻ Summary. Nhập
vào các thông tin cho Add-In để hiển thị trong trình quản lý Add-In. Mục Title sẽ là tên
của Add-In, nếu không nhập vào mục này, tên của Add-In sẽ là tên tệp Add-In. Mục
Comments sẽ là phần mô tả về Add-In.
5. Chọn trình đơn File Ö Save As…
6. Trong hộp thoại Save As, chọn Microsoft Excel add-in (*.xla) trong mục Save as type.

Hình IV-12: Hộp thoại Save As
7. Chọn Save. Một bản sao của workbook đã được lưu (với phần mở rộng là *.xla), và tệp