Xoá file Excel sử dụng VBA trong thời gian 7 ngày (1 người xem)

[cavoi54]

Các bạn giúp mình nhé. Cám ơn rất nhiều......................

 

[sealand]

Đây là đoạn Code dành cho file "tự tử" do AnhTuan 1066 sưu tầm. Bạn tự mà chế biến cho file của mình nha:

[COLOR=#000000][COLOR=#0000BB]Sub Killed[/COLOR][COLOR=#007700]()
[/COLOR][COLOR=#0000BB]Application[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]DisplayAlerts[/COLOR][COLOR=#007700]=[/COLOR][COLOR=#0000BB]False
ThisWorkbook[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]ChangeFileAccess xlReadOnly
Kill ThisWorkbook[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]FullName
ThisWorkbook[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]Close False
End Sub  [/COLOR][/COLOR]

 

[huuthang_bd]

Các bạn giúp mình nhé. Cám ơn rất nhiều......................

Nếu bạn dùng cách này để hạn chế người khác thì tôi e là không ăn thua. Ngày tháng thì phải dựa vào ngày tháng hệ thống của máy. Mà cái này thì người ta có thể thay đổi tùy thích.

 

[ndu96081631]

Nếu bạn dùng cách này để hạn chế người khác thì tôi e là không ăn thua. Ngày tháng thì phải dựa vào ngày tháng hệ thống của máy. Mà cái này thì người ta có thể thay đổi tùy thích.

Vấn đề ngày tháng có thể khắc phục bằng cách đếm số lần mở file (lưu trong registry)... Tuy nhiên cũng không ăn thua nếu viết trên Excel (Disable macros là mọi thứ chỉ là đống rác không hơn không kém)
Học tốt mọi kiến thức có ích trên Excel vẫn tốt hơn là đi tìm cách khóa và bẻ khóa
Hic