关于SaveAs方法的使用?

lyj_rock 2009-08-26 05:51:24
我现在想要实现:直接保存并覆盖已有文件
问题:怎么写?
...全文
444 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
jordan1986 2012-09-25
  • 打赏
  • 举报
回复
[Quote=引用 1 楼 的回复:]
把DisplayAlerts属性给关闭了就可以,

VB code

Application.DisplayAlerts = False
Workbooks("BOOK1.XLS").Close '这时改为调用SaveAs函数就可以了。
Application.DisplayAlerts = True
[/Quote]
我试了 还是要弹出个对话框,点击确定才行,怎么能直接保存上呢?
bigriverhorse 2009-08-26
  • 打赏
  • 举报
回复
把DisplayAlerts属性给关闭了就可以,

Application.DisplayAlerts = False
Workbooks("BOOK1.XLS").Close '这时改为调用SaveAs函数就可以了。
Application.DisplayAlerts = True

5,139

社区成员

发帖
与我相关
我的任务
社区描述
其他开发语言 Office开发/ VBA
社区管理员
  • Office开发/ VBA社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧