Minh họa cách tạo, nạp và sử dụng Add-Ins trong MS Excel

Với những người thường xuyên phải sử dụng nhiều đến Excel hoặc các nhân viên kế toán họ muốn một số hàm riêng biệt để tính toán, chuyển đổi mà trong Excel không hỗ trợ. Đơn giản, giả dụ như bạn muốn in ấn một bảng kê có ghi tiền bằng chữ cho các bảng kê hoặc có thể sử dụng để tính cước phí chỉ cần thông qua một cột đơn vị, dung lượng, thời lượng sử dụng thì chẳng có hàm (function) nào trong Excel hỗ trợ. Lúc đó bạn sẽ phải lập trình cho mình một...
Nội dung trích xuất từ tài liệu:
Minh họa cách tạo, nạp và sử dụng Add-Ins trong MS Excel Minh họa cách tạo, nạp và sử dụng Add-Ins trong MS ExcelVới những người thường xuyên phải sử dụng nhiều đến Excel hoặc các nhân viênkế toán họ muốn một số hàm riêng biệt để tính toán, chuyển đổi mà trong Excelkhông hỗ trợ. Đơn giản, giả dụ như bạn muốn in ấn một bảng kê có ghi tiền bằngchữ cho các bảng kê hoặc có thể sử dụng để tính cước phí chỉ cần thông qua mộtcột đơn vị, dung lượng, thời lượng sử dụng thì chẳng có hàm (function) nào trongExcel hỗ trợ. Lúc đó bạn sẽ phải lập trình cho mình một số hàm riêng trong côngviệc của mình. Các bước thực hiện bạn sẽ phải làm như sau.Tạo các macro cho worksheet.Vào Excel sau đó bạn tạo một worksheet mới. Sau đó vào menu Tools -> Macro -> Visual Basic Editor.Sau khi cửa sổ chương trình Visual Basic Editor được mở ra bạn hãy chọn menuInsert -> Module. Tại đây bạn có thể khai báo các hàm riêng cho bạn. Chúng tathử làm ví dụ cho một bài toán đơn giản như sau: Một công ty bán phần mềm, nếungười mua mua của công ty các phiên bản đăng ký bản quyền thì dưới 10 phiênbản giá 5.000.000đ/phiên bản, nếu trên 10 bản thì giá từ bản thứ 11 trở đi là4.000.000đ/phiên bản và từ bản thứ 31 trở đi thì giá là 2.500.000đ/phiên bản.Trong cửa sổ module của bạn hãy nhập đoạn code như dưới đây để tạo functiontính tiền theo số lượng:Public Function Tinhtien(soluong As Integer) As DoubleTinhtien = 0If soluong > 30 Then Tinhtien = 2.5 * (soluong - 30)If soluong > 10 ThenIf soluong > 30 Then Tinhtien = Tinhtien + 80do tu phien ban 11 den 20 gia la 4tr/1 phien ban = 80trIf soluong Tinhtien = Tinhtien + soluong * 5End IfTinhtien = Tinhtien * 10 ^ 6 quy ra tien trieuEnd FunctionSau đó bạn hãy lưu công việc của bạn, chọn menu File sau đó chọn Save, trongmục lưu giữ bạn hãy chọn tại FileType là Microsoft Office Excel Add-In (*.xla)rồi lưu lại với một tên file nào đó có thể lưu với tên Test.xla rồi nhấn Save.Kích hoạt functions riêng của bạnSau khi lưu giữ xong file Test.xla bạn hãy quay trở lại cửa sổ của Excel, chọnmenu Tools -> Add-Ins, cửa sổ Add-Ins xuất hiện:Nhấn Browse rồi chọn tới file Test.xla của bạn vừa được lưu giữ khi đó trên cửasổ hộp thoại sẽ xuất hiện Test ở trong danh sách. Đánh dấu vào ô vuông phía trướcTest để kích hoạt các hàm có trong file đó. Nhấn OK để thoát.Sử dụng hàm của bạnVào cell nào đó trong worksheet để thử nghiệm kết quả của bạn, lựa chọn menuInsert -> Functions sẽ thấy hộp thoại như hình dưới đây: