Hiển thị thông báo nếu tổng số cột vượt quá khi sử dụng VBA trong Microsoft Excel
Trong bài viết này, chúng tôi sẽ sử dụng sự kiện thay đổi của trang tính để hiển thị thông báo cảnh báo khi tổng cột vượt quá tổng giá trị.
Dữ liệu thô bao gồm thành phần muối của thuốc. Nó bao gồm tên muối và trọng lượng của nó trên 10 gam.
Tổng tất cả các nguyên liệu muối bằng 10 gam. Khi chúng tôi thay đổi trọng lượng của muối etan từ 0,75 thành 1, một thông báo cảnh báo sẽ bật lên.
Giải thích logic
Trong bài viết này, chúng tôi đã sử dụng sự kiện thay đổi của trang tính để tạo thông báo cảnh báo. Sự kiện thay đổi kiểm tra tổng số cột 2 ^ nd ^, không được vượt quá 10.
Giải thích mã
If Target.Column = 2 Then Đoạn mã trên được sử dụng để hạn chế sự kiện thay đổi chỉ kích hoạt khi giá trị trong cột 2 ^ nd ^ được thay đổi.
WorksheetFunction.Sum (Cột (2))
Đoạn mã trên được sử dụng để lấy tổng của tất cả các giá trị trong cột 2.
Vui lòng theo dõi bên dưới để biết mã
Option Explicit Private Sub Worksheet_Change(ByVal Target As Range) 'Checking whether value is changed in second column If Target.Column = 2 Then 'Checking whether sum of values in second column is greater than 10 If WorksheetFunction.Sum(Columns(2)) > 10 Then MsgBox "Caution, Total has exceeded 10g" End If End If End Sub
Nếu bạn thích blog này, hãy chia sẻ nó với bạn bè của bạn trên Facebook và Facebook.
Chúng tôi rất muốn nghe ý kiến từ bạn, hãy cho chúng tôi biết cách chúng tôi có thể cải thiện công việc của mình và làm cho nó tốt hơn cho bạn. Viết thư cho chúng tôi [email protected]