Trong Excel, để giải quyết 1 bảng tính bằng công thức excel thuần túy, việc file năng, tốc độ xử lý chậm trong mỗi lần cập nhật công thức là chuyển thường xuyên của nhân viên văn phòng. Vì thế mà Microsofts đã tạo ra ngôn ngữ lập trình trên Excel, chỉ việc click vào 1 nút thì toàn bộ dữ liệu được cập nhật, không hề có công thức excel trong bảng tinh.

Ví dụ ta có bài toán như sau: Tính tiền hàng, chiết khấu 10% và phải trả các mặt hàng nếu tỉnh là "Hà Nội", để giải bài toán trên ta làm theo các bước sau:

Thủ Tục Tính Chiết Khấu, Tiền Hàng Và Phải Trả Bằng VBA trong Excel 1zb1bi8z2j9gff5zg

​​

Bước 1: Các bạn vào môi trường lập trình của Excel (phím tắt ALT+F11), tạo một module và copy code dưới đây vào trong module đấy:

Mã:

Sub ChietKhau()

Dim I As Long

For I = 5 To 14

Cells(I, 7).Value = Cells(I, 6).Value * Cells(I, 5).Value

Cells(I, Cool.Value = 0

If Cells(I, 3).Value = "Ha Noi" Then

Cells(I, Cool.Value = Cells(I, 7).Value * 0.1

End If

Cells(I, 9).Value = Cells(I, 7).Value - Cells(I, Cool.Value

Next I

End Sub

Thủ Tục Tính Chiết Khấu, Tiền Hàng Và Phải Trả Bằng VBA trong Excel 0zsu1no8x0uaidmzg

​​

Bước 2: Tạo nút bấm: Sau khi các bạn copy xong code, các bạn trở về môi trường bảng tính, vào menu Developer -> Insert -> chọn vào Button.

Thủ Tục Tính Chiết Khấu, Tiền Hàng Và Phải Trả Bằng VBA trong Excel Hgvdsihihdasonyzg

​​

Sau khi click vào Button-> các bạn đặt chuột vào 1 vị trí trong bảng tính, giữ chuột trái và kéo một vùng vừa đủ nút bấm theo mong muốn của bạn. Sẽ hiển thị ra bảng thông báo Assign Macro, bạn chọn vào macro cần gán -> chọn vào OK.

Khi gán xong macro, bạn đổi tên nút bấm theo yêu cầu bài toán.

Thủ Tục Tính Chiết Khấu, Tiền Hàng Và Phải Trả Bằng VBA trong Excel 28x1u2t20mtnlcgzg

​​

Bước 3: Bạn click chuột ra ngoài nút bấm, và click chuột trái lại lên nút bấm đề nhận kết quả.

​

Thủ Tục Tính Chiết Khấu, Tiền Hàng Và Phải Trả Bằng VBA trong Excel Ms758a7k8qzikuuzg

​