Thuộc tính ẩn file

[thuyloitienlu]

các bạn cho tôi hỏi cách viết macro để tạo thuộc tính ẩn của file ?

 

[tedaynui]

các bạn cho tôi hỏi cách viết macro để tạo thuộc tính ẩn của file ?

Bạn thử dùng lệnh sau :

Shell ("c:\windows\system32\attrib.exe [B]C:\Test.xls[/B] +h")

bạn lưu ý :
+ File Test.xls phải đang đóng
+ File Test.xls phải được ghi đường dẫn đầy đủ
+ Đặt Hidden (+h) ; Unhidden (-h)

TDN

 

[thuyloitienlu]

Cảm ơn bạn Tedaynui. tôi lấy code của bạn và làm được rồi.

 

[tedaynui]

Mình đã tìm được lệnh VBA dùng để đặt thuộc tính cho File :

SetAttr pathname, attributes

attributes :
vbNormal (0) : Normal (default).
vbReadOnly (1) : Read-only.
vbHidden (2) : Hidden.
vbSystem (4) : System file. Not available on the Macintosh.
vbArchive (32) : File has changed since last backup.
vbAlias (64) : Specified file name is an alias. Available only on the Macintosh.

Ví dụ :
SetAttr "TESTFILE", vbHidden
SetAttr "TESTFILE", vbHidden + vbReadOnly

TDN