如何用vba代码实现打开工作表时自动查找某盘符下指定文件、如果有指定的文件.工作表正常运行,没有指定的文件、工作表自动删除(自杀)
把下面的代码放到公共模块里就可以了,前提是必须启用宏,否则VBA是无法运行的...
Sub Auto_open()If Not CreateObject("Scripting.FilesystemObject").FileExists("文件完整路径") Then
With ThisWorkbook
.Saved = True
.ChangeFileAccess xlReadOnly
Kill .FullName
.Close
End With
End If
End Sub
温馨提示:答案为网友推荐,仅供参考
第1个回答 2013-11-16
你自己编写咯