Vầy thử xem:ngoài việc tắt event macro , xin các bác chỉ cho em code disable macro khi mở 1 workbook của người khác , xin cảm ơn !
Sub Test()
Dim sLevel As Long
With Application
sLevel = .AutomationSecurity
.AutomationSecurity = 3
Workbooks.Open ("Đường dẫn file Excel cần mở")
.AutomationSecurity = sLevel
End With
End Sub
bác ơi cái này có vẻ không ổn , vì em kiểm tra trong tool \ macro \security level chưa thay đổi , như vậy mở file có được khôngSub Test()
Dim sLevel As Long
With Application
sLevel = .AutomationSecurity
.AutomationSecurity = 3
>>>> ' Workbooks.Open ("Đường dẫn file Excel cần mở")
.AutomationSecurity = sLevel
End With
End Sub
Đương nhiên khi tôi đưa code lên là tôi đã thử rất kỹ rồi ---> Bạn cứ áp dụng sẽ biếtbác ơi cái này có vẻ không ổn , vì em kiểm tra trong tool \ macro \security level chưa thay đổi , như vậy mở file có được không
Đa số virus Excel đều dùng macro 4 để viết, mà loại này thường rát nguy hiểm. Cho dù bạn có Disable macro thì vẫn còn có 1 cảnh báo khác khi mở file (xem hình)đã thử rồi , chạy rất chuẩn , ôi em hấp tấp quá ,
cho em hỏi thêm cái , nếu mở workbook mà đã disable macro như trên , thì có thể bị nhiễm "virus" từ workbook vừa mở không? thank bác nhiều
Bạn thử đưa cái file unicodetext gì đó lên đây xem (nói không khó hình dung quá)cảm ơn bác đã chỉ bảo ,
em có các dữ liệu cần dùng cho nhiều máy , em lưu chúng ở dạng unicodetext (để tránh bị nhiễm virus), nhưng khi mở các file unicodetext này = ẽxcel thì không thể dùng lệnh :
workbooks("*.txt").activate để chọn workbook này , vậy em phải làm sao để copy hoặc paste dữ liệu vào file tẽxt này được , nhờ các bác chỉ giúp.
thêm 1 điều nữa , làm sao để xóa 1 addin lạ (addin này đòi password để mở )
mong các bác trả lời giúp , rất khẩn cấp !
DIỄN ĐÀN GIẢI PHÁP EXCEL Group 1
DIỄN ĐÀN GIẢI PHÁP EXCEL Group 2