Gitiho contest
Cùng gitiho contest chinh phục kiến thức, khẳng định bản thân với hệ thống bài test phong phú, đầy đủ các chủ đề để bạn khám phá.
Lộ trình học tập
Khám phá đỉnh cao tri thức cùng Gitiho qua hành trình học tập được thiết kế tỉ mỉ và toàn diện. Với kho tàng lộ trình đa dạng, chuyên sâu trên mọi lĩnh vực, chúng tôi sẽ đồng hành cùng bạn khai phá tiềm năng, chinh phục thách thức và khẳng định giá trị bản thân. Mỗi hành trình đều được nghiên cứu công phu, tạo nên bước đệm vững chắc để bạn tự tin bứt phá và tỏa sáng trên con đường phát triển sự nghiệp."
Gitiho for leading business
Tối ưu và đơn giản hóa hoạt động đào tạo tại doanh nghiệp. Sẵn sàng nền tảng, nội dung đào tạo cho tất cả các vị trí, bộ phận. Ứng dụng MIỄN PHÍ ngay vào doanh nghiệp chỉ với MỘT click.
Đã được tin tưởng sử dụng bởi các doanh nghiệp
Theo em tìm hiểu ApplicationEnableEvents được dùng để ngăn event chạy Ví dụPrivate
Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
Target.Value = UCase(Target.Value)
Application.EnableEvents = True
Columns(Target.Column).AutoFit
End Sub
Cho em hỏi, tại sao chúng ta phải sử dụng Application.EnableEvents thì code trong ví dụ trên mới chạy như mong muốn?
1 câu trả lời
381 lượt xem
vỗ tay
Phần lệnh:
Application.EnableEvents = False
Target.Value = UCase(Target.Value)
Application.EnableEvents = True
ở đây là để tránh các lỗi, các sự kiện có thể xảy ra khi xét Target.Value = UCase(Target.Value)
mà lệnh này không cần thiết lắm (vì không liên quan tới việc AutoFit ở dưới).
Thường chạy code thì tập trung vào 1 số lệnh để tăng tốc:
Application.ScreenUpdating (nháy màn hình)
Application.DisplayArlets (các thông báo)
Application.Calculation (chế độ tính toán)
Còn cũng khá hạn chế việc dùng EnableEvents
---
Ngoài ra khi sử dụng AutoFit thì bạn cần cân nhắc việc khi không có dữ liệu trong cột thì độ rộng cột nên để trở về độ rộng mặc định (ColumnWidth = 8.11)
vỗ tay
Câu hỏi liên quan
Top
Giấy chứng nhận Đăng ký doanh nghiệp số: 0109077145, cấp bởi Sở Kế hoạch và Đầu tư TP. Hà Nội
Giấy phép mạng xã hội số: 588, cấp bởi Bộ Thông tin và Truyền thông