刪除文件,及excel中保存文件

来源:互联网 发布:大学生软件培训班 编辑:程序博客网 时间:2024/06/02 22:46

Declare Function DeleteFile Lib "kernel32" Alias "DeleteFileA" (ByVal lpFileName As String) As Long


       Call del_file("d:/test.xls")
       wkbk.SaveAs FileName:="d:/test.xls", FileFormat:=xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, CreateBackup:=False
 

原创粉丝点击