Page 168 - Bửu Ngôn Du Lịch Ba Miền Tập 1

cần Import rồi chọn button Next, Finish để import các
thông tin từ file văn bản vào.
Cách thêm môt sô lênh thường dùng vào nút phải
chuôt trong Excel
Excel (hay các ứng dụng khác trong bộ Microsoít
Office) quản lý nhiều menu khác nhau, mỗi menu được
nhận dạng thông qua tên riêng. Ví dụ menu pop-up được
hiển thị mỗi khi bạn ấn phải chuột trên 1 cell bảng tính có
tên là menu "Cell". Microsoft cho phép người dùng được
toàn quyền truy xuất, hiệu chỉnh nội dung của từng menu.
Ví dụ macro VBA sau đây cho phép bạn thêm 1 lệnh
(control) mới vào menu pop-up "Cell":
Sub AddMenuItemQ
'định nghĩa biến tham khảo đến menu.
Dim objCommandBar As Office.CommandBar
'định nghĩa biến tham khảo đến control option.
Dim objCommandBarButton As
Office.CommandBarButton
'Xác định menu "Cell"
Set objCommandBar =
Application. CommandBars.Item("Cell")
'thêm 1 option (lệnh) mới vào menu "Cell"
Set objCommandBarButton =
objCommandBar. Controls. Add(msoControlButton)
'thiết lập các thuộc tính cho option mới
With objCommandBarButton
• Caption = "Chuc nang 1"
.Eaceld = 43
•Style = msoButtonlconAndCaption
.OnActian = "OnChucNangl"
End With

170