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



133

Trường hợp nếu muốn tham chiếu đến một vùng dữ liệu, người lập trình có thể dựa trên địa chỉ
của hai ô, ô ở góc trên bên trái và ô ở góc đưới bên phải. Ví dụ sau sẽ tham chiếu đến vùng dữ
liệu từ ô B2 đến ô C3 theo nhiều cách khác nhau:
Worksheets("Sheet1").Range("B2:C3") = 9 ‘Cách thứ nhất

Phương thức
AddComment cho phép thêm chú thích vào vùng được tham chiếu. Vùng dữ liệu
này chỉ được phép là một ô, và ô đó phải chưa có chú thích, nếu không sẽ làm phát sinh lỗi.
Còn phương thức
ClearComments cho phép xoá tất cả các chú thích của các vùng dữ liệu.
Khác với phương thức
AddComment, phương thức này có thể là một vùng bất kỳ.
Range("A1:C3").ClearComments ‘Xoá chú thích vùng A1:C3
Range("B2").AddComment "Chu thich moi" ‘Thêm chú thích ô B2
Address
Thuộc tính này trả về địa chỉ của vùng dữ liệu được tham chiếu. Ví dụ sau sẽ hiển thị một vùng
dữ liệu đã được đặt tên là
SoLieu trong Sheet1:
MsgBox Worksheets("Sheet1").Range("SoLieu").Address
BorderAround
Phương thức này thực hiện vẽ đường biên xung quanh vùng dữ liệu được tham chiếu. Người
lập trình có thể thiết lập kiểu đường, bề dày nét vẽ và màu của đường.
Worksheets("Sheet1").Range("A1:D4").BorderAround _
LineStyle:=xlDashDot, ColorIndex:=3, Weight:=xlThick
Calculate
Phương thức này thực hiện tính toán cho vùng dữ liệu được tham chiếu, áp dụng trong trường
hợp chế độ tính trong Excel được thiết lập thành tính toán thủ công (Manual).
Cells
Cells là tập đối tượng tham chiếu đến tất cả các ô nằm trong vùng dữ liệu được tham chiếu. Chi
tiết xem thêm mục “Tập đối tượng Cells” trang 137.
Clear,ClearContentsvàClearFormats
Phương thức Clear xoá tất cả những gì có trong vùng dữ liệu
được tham chiếu: nội dung, định
dạng, chú thích…
Phương thức ClearContents chỉ xoá nội dung được lưu trữ trong vùng dữ liệu. Còn phương

Ậ
Ậ
P
P


T
T
R
R
Ì
Ì
N
N
H
H


T
T
R
R
Ê
Ê
N
N


M
M


135

Hai phương thức này trả về số thứ tự của cột và hàng của ô đầu tiên của vùng dữ liệu được
tham chiếu.
MsgBox Worksheets("Sheet1").Range("B3:D12").Column ‘Hiển thị giá trị
2
MsgBox Worksheets("Sheet1").Range("B3:D12").Row ‘Hiển thị giá trị
3
ColumnsvàRows
Thuộc tính Columns và Rows thực chất là tập đối tượng kiểu Range chứa các cột và các hàng
nằm trong phạm vi vùng dữ liệu được tham chiếu. Ví dụ sau sử dụng vòng lặp
For Each …
Next
để đổi màu và điền số thứ tự cột vào các cột trong vùng dữ liệu được tham chiếu.
Public Sub VD_Columns()
Dim myColumns As Range
For Each myColumns In Range("B3:C4,E2:F6").Columns
myColumns.Interior.Color = RGB(0, 255, 0) ‘Đổi màu
myColumns.Value = myColumns.Column ‘Điền số thứ tự
cột
Next myColumns
End Sub

GỢI Ý Có thể sử dụng tập đối tượng Columns và Rows để truy cập đến cả một hàng hay
một cột nào đó trong worksheet. Ví dụ sau sẽ điền giá trị 9 vào tất cả các ô trong cột C và
các ô trong hàng 3:
Worksheets("Sheet1").Columns("C") = 9
Worksheets("Sheet1").Rows("3") = 9
ColumnWidthvàRowHeight

Value
Thuộc tính này chứa giá trị của vùng dữ liệu. Cần phải lưu ý rằng khi đọc giá trị của vùng dữ
liệu thì vùng dữ liệu đó bắt buộc phải là một ô đơn nhất, còn khi gán giá trị thì vùng dữ liệu có
thể là một ô hoặc một vùng dữ liệu gồm nhiều ô và trong trường hợp đó tất cả các ô đều có
cùng một giá trị.
MsgBox Range("A1").Value ‘Đọc và hiển thị giá trị ô A1
Range("B2:C3").Value = 9 ‘Gán giá trị cho vùng dữ liệu B2:C3
GỢI Ý Trong khi làm việc với đối tượng Range, đối tượng tham chiếu đến một vùng dữ
liệu, cần lưu ý những điểm sau:
✦Việc thao tác với Excel bằng mã lệnh không cần phải thực hiện lựa chọn vùng dữ liệu, vì
thế nên hạn chế sử dụng các phương thức như Activate hoặc Select.
✦Trong trường hợp bắt buộc phải sử dụng các phương thức này, cần phải kích hoạt
worksheet có chứa vùng dữ liệu làm worksheet hiện hành bằng phương thức Activate của
worksheet đó.
✦Nên sử dụng các vùng dữ liệu được đặt tên, chẳng hạn như nên sử dụng
Range(“KetQua”) thay vì sử dụng Range(“D45”). Vì khi sử dụng Range(“D45”), nếu người
dùng chèn thêm một hàng ở phía trên hàng 45 thì địa chỉ của ô cần tham chiếu sẽ thay
đổi, và cần phải thay đổi mã lệnh thành Range(“D46”). Nhưng nếu sử dụng vùng dữ liệu
có đặt tên thì không cần phải thay đổi mã lệnh.
C
C
H
H
Ư
Ư
Ơ
Ơ
N
N
G


T
T
R
R
Ê
Ê
N
N


M
M
I
I
C
C
R
R
O
O
S
S
O
O
F
F
T
T


Ø
Øobject.Cells(chỉ_số_hàng, chỉ_số_cột)
Ø
Øobject.Cells(chỉ_số_ô)
Ø
Øobject.Cells
Object là đối tượng có chứa thuộc tính Cells, có thể là đối tượng kiểu Worksheet hoặc kiểu
Range. Các tham số
chỉ_số_hàng và chỉ_số_cột là chỉ số tương đối trong phạm vi của vùng
dữ liệu được tham chiếu.
Chỉ_số_ô là số thứ tự của ô trong tập đối tượng Cells, số thứ tự được
đánh số theo từng hàng, từ trái sang phải và từ trên xuống dưới.
Xét đoạn mã sau:
Worksheets(“Sheet1”).Range("B2:E4").Cells(2, 3).Value = 9

Đoạn mã trên sử dụng cách thứ nhất để gán giá trị 9 cho một ô nằm trong vùng B2:E4. Object ở
đây chính là đối tượng kiểu Range, vì vậy tập đối tượng Cells là tập đối tượng chứa các ô trong
vùng B2:E4. Chỉ số hàng và cột sẽ được tính tương đối so với ô đầu tiên của vùng dữ liệu, là ô
B2. Vì vậy, Cells(1,1) là ô đầu tiên của vùng dữ liệu, còn Cells(2,3) tương ứng với ô D3.
Xét đoạn mã thứ 2:
Worksheets("Sheet1").Cells(257).Value = 9

có các sự kiện mà người lập trình có thể viết mã lệnh để thực hiện một số thao tác mỗi khi sự
kiện đó xảy ra (còn gọi là bộ xử lý sự kiện – event handler). Những hộp thông báo như “Would
you like to save changes?” khi ta
đóng bảng tính mà chưa lưu dữ liệu là minh hoạ rõ nhất việc
sử dụng các sự kiện trong Excel.
Thực chất, mỗi bộ xử lý sự kiện là một chương trình con dạng thủ tục. Khi sự kiện xảy ra,
chương trình con tương ứng sẽ được tự động thực thi. Excel có khả năng giám sát nhiều loại sự
kiện khác nhau. Các sự kiện có thể được phân loại như sau:
Ø
Ø

Sự kiện của Workbook (sự kiện mức Workbook): các sự kiện xảy ra trong một workbook
nào đó. Chẳng hạn như các sự kiện Open (khi mở hoặc tạo workbook), BeforeSave (trước
khi lưu workbook), NewSheet (một sheet mới vừa được thêm),…
Ø
Ø

Sự kiện của Worksheet (sự kiện mức Worksheet): các sự kiện xảy ra trong một worksheet
nào đó. Ví dụ như các sự kiện Change (khi một ô trong sheet bị thay đổi),
SelectionChange (người dùng chuy
ển sang vùng được chọn khác), Calculate (khi một
worksheet được tính toán lại),…
Ø
Ø

Sự kiện của đối tượng Chart: các sự kiện xảy ra trên một đối tượng chart nào đó. Chẳng
hạn như các sự kiện Select (khi một đối tượng Chart được chọn), sự kiện SeriesChange
(khi có một giá trị nào đó trong chuỗi số liệu bị thay đổi).
Ø
Ø

Ậ
Ậ
P
P


T
T
R
R
Ì
Ì
N
N
H
H


T
T
R
R
Ê
Ê
N
N


M
M


139

Ø
Ø

Các sự kiện trong UserForm: là các sự kiện xảy ra trong UserForm hoặc trong một đối
tượng nằm trên UserForm. Ví dụ như UserForm có sự kiện Initialize (xảy ra trước khi
UserForm được hiển thị), hoặc đối tượng CommandButton trên UserForm có sự kiện
Click (xảy ra khi người dùng kích chuột vào nút lệnh).
Ø
Ø

Các sự kiện không gắn với đối tượng: nhóm sự kiện này có hai sự kiện rất hữu dụng: sự
kiện OnTime và sự
kiện OnKey. Những sự kiện này có cách thức hoạt động không giống
như những sự kiện khác.
Có một số thao tác trong Excel có thể làm xảy ra nhiều sự kiện khác nhau. Ví dụ như khi người
dùng chèn một worksheet mới vào trong workbook sẽ làm phát sinh các sự kiện ở mức ứng
dụng như sau:
Ø
Ø

Sự kiện WorkbookNewSheet: xảy ra khi tạo mới worksheet.
Ø
Ø

Sự kiện SheetDeactivate: xảy ra khi worksheet hiện hành không còn hiện hành nữa.
Ø
Ø

Private Sub Worksheet_Change(ByVal Target As Range)
MsgBox(“Ô đã bị thay đổi: ” & Target.Address)
End Sub
Mỗi bộ xử lý sự kiện đều có các tham số riêng. Ý nghĩa và số lượng các tham số phụ thuộc vào
từng loại sự kiện. Để hiểu rõ thêm về các tham số của mỗi sự kiện, tham khảo thêm trong tài
liệu trợ giúp của VBA trong Excel.
CHÚ Ý Excel còn cho phép người dùng tắt các sự kiện trong ứng dụng, khi đó, các bộ xử
lý sự kiện sẽ không được thực thi mỗi khi người dùng thực hiện các thao tác tương ứng
nữa. Để tắt các sự kiện, chỉ cần gán thuộc tính
EnableEvents của đối tượng bằng
FALSE (Application.EnableEvents=FALSE). Và ngược lại, để bật lại các sự kiện,
chỉ cần gán thuộc tính
EnableEvents bằng TRUE
(
Application.EnableEvents=TRUE)
6.2. Sự kiện trong Workbook
Các sự kiện mức workbook xảy ra trong một workbook nào đó. Các bộ xử lý sự kiện của đối
tượng workbook được lưu trong mô-đun mã lệnh của workbook tương ứng. Dưới đây là danh
sách các sự kiện trong workbook:
Sự kiện Thao tác làm phát sinh sự kiện
Activate Workbook được chọn làm workbook hiện hành
AddinInstall Workbook được cài đặt làm Add-In
AddinUninstall Workbook bị gỡ cài đặt, không còn là Add-In nữa
BeforeClose Ngay trước khi workbook bị đóng lại
BeforePrint Ngay trước khi workbook được in hoặc xem trước khi in
BeforeSave Ngay trước khi lưu workbook
Deactivate Workbook không còn hiện hành
C
C
H

R
Ì
Ì
N
N
H
H


T
T
R
R
Ê
Ê
N
N


M
M
I
I
C
C
R
R
O
O
S

SheetCalculate Khi trên workshet có thực hiện tính toán nào đó
SheetChange Khi worksheet bị thay đổi
SheetDeactivate Khi một worksheet nào đó không còn là sheet hiện hành nữa
SheetSelectionChange Khi người dùng thay đổi vùng lựa chọn trên worksheet
WindowActivate Khi một cửa sổ được chọn là cửa sổ hiện hành
WindowDeactivate Khi một cửa sổ không còn là cửa sổ hiện hành
WindowResize Khi một cửa sổ bị thay đổi kích thước
SựkiệnOpen
Một trong những sự kiện phổ biến nhất trong Workbook chính là sự kiện Open. Sự kiện này
được kích hoạt mỗi khi workbook (hoặc add-in) được mở, và sẽ kích hoạt bộ xử lý sự kiện
tương ứng có tên là Workbook_Open. Bên trong thủ tục này, người lập trình có thể thực hiện
nhiều thao tác khác nhau, chẳng hạn như các thao tác phổ biến sau:
Ø
Ø

Hiển thị một thông báo chào mừng
Ø
Ø

Mở một workbook khác
Ø
Ø

Thiết lập, tạo thanh trình đơn hoặc thanh công cụ
Ø
Ø

Kích hoạt một sheet hoặc một ô nào đó
Ø
Ø

Khuôn mẫu của bộ xử lý sự kiện BeforeClose như sau:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
‘Mã lệnh sẽ được đặt ở đây
End Sub
Tham số Giải thích
Cancel Mặc định, tham số này bằng FALSE khi xảy ra sự kiện. Nếu trong bộ xử lý sự kiện có
gán giá trị cho tham số Cancel=TRUE thì Excel sẽ dừng quá trình đóng workbook lại,
workbook sẽ vẫn còn được mở trong Excel.
Ví dụ sau sẽ minh hoạ cách thao tác với sự kiện BeforeClose. Ví dụ này sẽ kiểm tra xem khi sự
kiện BeforeClose xảy ra, workbook đã được lưu hay chưa. Nếu chưa lưu sẽ hiển thị một hộp
thoại yêu cầu người dùng lựa chọn các phương án: lưu – không lưu – quay trở lại workbook
(không đóng workbook nữa bằng cách gán tham số Cancel = TRUE):
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim Msg As String
Dim Ans As Integer
If Not (Me.Saved) Then
Msg = "Bạn có muốn lưu workbook: "
Msg = Msg & Me.Name & "không ?"
Ans = MsgBox(Msg, vbQuestion + vbYesNoCancel)
Select Case Ans
Case vbYes
Me.Save
Case vbNo
Me.Saved = True
Case vbCancel
Cancel = True
End Select
End If
End Sub
Trong đoạn mã trên, khi người dùng chọn Yes thì sẽ thực hiện phương thức Save có trong đối