ActiveWorkbook.SaveAs Filename:= _
"C:\Documents and Settings\administrator\桌面\qqqqq.xls", FileFormat:=xlNormal, _
Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False
ActiveWindow.Close
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024