Cách xử lý lỗi trong Excel 2016 VBA - núm vú

Làm thế nào bạn có thể xác định và xử lý mọi lỗi có thể xảy ra trong Excel 2016? Thông thường, bạn không thể. May mắn thay, VBA cung cấp một cách khác để đối phó với những sai sót pesky.

Xem xét lại thủ tục EnterSquareRoot

Kiểm tra đoạn mã sau. Các thói quen sử dụng một mục đích tất cả Về lỗi báo cáo để bẫy tất cả các lỗi và sau đó kiểm tra để xem liệu các InputBox đã bị hủy bỏ. Trong trường hợp này, bạn có thể thay đổi giá trị mặc định. Sub 'Chèn ActiveCell gốc hình vuông. Giá trị = Sqr (Số) Thoát khỏi Sub BadEntry: Msg = "Đã xảy ra lỗi. "& VbNewLine & vbNewLine Msg = Msg &" Hãy chắc chắn rằng một phạm vi được chọn, "Msg = Msg &" tờ không được bảo vệ, "Msg = Msg &" và bạn nhập một giá trị không âm. "MsgBox Msg, vbCritical End Sub

Bẫy thông thường này

bất kỳ loại lỗi runtime 999 nào. Sau khi gỡ lỗi thời gian chạy, thủ tục EnterSquareRoot đã sửa đổi sẽ hiển thị hộp thông báo này. Hộp thông báo này mô tả các nguyên nhân có thể xảy ra nhất của lỗi.

Một lỗi thời gian chạy trong thủ tục tạo ra thông báo lỗi bán phá giá này.

Ngày Lỗi không hoạt động?

Nếu một câu lệnh On Error không hoạt động như đã được quảng cáo, bạn cần phải thay đổi một trong các cài đặt của mình:

Kích hoạt VBE.

Chọn lệnh Tools → Options.

1. Nhấp vào tab General của hộp thoại Options.

3. Đảm bảo rằng cài đặt Break on All Errors đã bị bỏ chọn.

   Nếu cài đặt này được chọn, Excel sẽ bỏ qua bất kỳ câu lệnh On Error. Bạn thường muốn giữ các tùy chọn Lỗi Trading để Break trên Unhandled lỗi.

4. Về việc sử dụng câu lệnh On Error

   Sử dụng câu lệnh On Error trong mã VBA của bạn cho phép bạn bỏ qua việc xử lý lỗi tích hợp của Excel và sử dụng mã xử lý lỗi của chính bạn. Trong ví dụ trước, một lỗi runtime gây ra thực hiện macro để nhảy vào báo cáo có nhãn BadEntry. Kết quả là, bạn tránh các thông báo lỗi không thân thiện của Excel, và bạn có thể hiển thị thông điệp của riêng bạn cho người dùng.

Lưu ý rằng ví dụ sử dụng một lệnh Exit Sub ngay trước nhãn BadEntry. Câu lệnh này là cần thiết vì bạn không muốn thực hiện mã xử lý lỗi nếu lỗi xảy ra

không

xảy ra.