| 楼主 yjzstar |
Q:如何通过VBA实现对文件属性的设置？如设置将文件设置成只读。 A:利用SetAttr语句便可以轻松的通过VBA来设置某一指定文件的属性，让文件的属性在不知不觉中改变！
0代表常规； 1代表只读； 2代表隐藏； 4代表系统文件。  设置文件属性.rar |
| 2楼 xyf2210 |
学习了 |
| 3楼 蝈锅 |
 |
| 4楼 sc__liuqiang |
怎么才能取消属性呢？ |
| 5楼 peter-chen |
以下是查看文件是否将"属性"设置成只读,Const READ_ONLY = 1 Dim objFSO Dim objFile Set objFSO = CreateObject("Scripting.FileSystemObject") Set objFile = objFSO.GetFile(ThisWorkbook.FullName) If objFile.Attributes And READ_ONLY Then objFile.Attributes = objFile.Attributes Xor READ_ONLY End If 能否修改下成为查看文件是否只读和隐藏?谢谢 |