Cách Unblock để chạy các file Excel chứa code VBA bị chặn (Security Risk)
Hướng dẫn 3 cách gỡ chặn (Unblock) triệt để lỗi bảo mật ''Microsoft has blocked macros from running because the source of this file is untrusted'' trên Office 365 và Excel 2021 khi tải file chứa code VBA từ Internet.

Vì lý do bảo mật nên bắt đầu từ đầu tháng 4 này. Tất cả bạn nào đang xài Office 365 sẽ bị Microsoft block các File chứa macro mà bạn đã download từ Internet
Theo dự kiến là các phiên bản sắp tới từ Office 2013 đến 2021 sau khi nhận cập nhật cũng sẽ bị block như vậy.
Microsoft đưa ra lý do của việc làm này là bảo vệ người dùng khỏi những mã độc đang tràn lan trên mạng và tệ hơn nữa là nó được lây lan qua phần mềm Microsoft Office của họ.
Vậy có cách nào để khắc phục không? Đương nhiên là có nhưng không phải chỉ Enable Content như lần trước là được đâu mà chúng ta sẽ phải làm bằng tay từng File như sau.
Bước 1: File > Options > Trust Center > Trust Center Settings > Macro Settings. Bạn sẽ cần chỉnh như hình dưới đây
Bước 2: Sang phần Trusted Locations và Add ổ đĩa của bạn vào đây. Mặc định sẽ chỉ là các đường dẫn trong ổ C mà thôi. Bạn sẽ ấn Add new Location... và add ổ đĩa bạn vào nhé.
Bước 3: Sau khi làm xong bước này thì bạn cần unblock File VBA hoặc chứa macro bạn muốn dùng bằng cách chuột phải vào File đó chọn Properties và chọn Unblock.
Có thể thấy việc này chỉ cần làm 1 lần với File có chứa macro bạn download xuống từ Internet.
Link chi tiết tham khảo về tính năng mới này bạn có thể xem tại đây
Khung Mẫu Tối ưu Tốc độ Thực thi Code VBA trên Bảng tính Lớn
Khi áp dụng các đoạn mã VBA trên bảng tính doanh nghiệp có hàng chục nghìn dòng dữ liệu, bạn hãy bọc code trong khung mẫu tối ưu hiệu năng dưới đây để tăng tốc độ chạy Macro lên gấp 10 – 50 lần:
Sub ERX_Optimized_Macro_Template()
On Error GoTo CleanExit
'' Tắt cập nhật màn hình và tính toán tự động để tăng tốc tối đa
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
Application.EnableEvents = False
'' --- Đặt nội dung xử lý VBA của bạn tại đây ---
CleanExit:
'' Khôi phục trạng thái chuẩn của Excel sau khi hoàn tất
Application.ScreenUpdating = True
Application.Calculation = xlCalculationAutomatic
Application.EnableEvents = True
End Sub
Bài viết liên quan
Thông báo
© 2021 CÔNG TY TNHH ERX VIỆT NAM
Địa chỉ văn phòng: 46/4 Nguyễn Cửu Vân, Phường 17, Quận Bình Thạnh, TP.HCM
share
tweet