设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 7801|回复: 6
打印 上一主题 下一主题

[基础应用] 请问怎样动实现关闭EXCEL文件时自动保存副本文件。

[复制链接]
跳转到指定楼层
1#
发表于 2004-10-20 07:33:00 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
请问怎样动实现关闭EXCEL文件时自动保存副本文件。

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
2#
发表于 2004-10-30 16:38:00 | 只看该作者
帮顶!
3#
发表于 2004-10-30 17:42:00 | 只看该作者
在excel打开文件时,打开按钮有下拉菜单,选“以副本方式打开”这样就建立了副本了。
4#
发表于 2004-11-24 22:03:00 | 只看该作者
在文件菜单下点另存为,在弹出窗口中点右上角的工具->常规选项,在弹出的保存选项中选中”生成备份文件"
5#
发表于 2005-6-22 21:10:00 | 只看该作者
能不能让备份保存在不同的文件夹里?
6#
发表于 2005-6-22 21:30:00 | 只看该作者
如果只利用系统自身功能,不能
7#
发表于 2005-6-23 18:20:00 | 只看该作者
以下是引用ywjxp在2005-6-22 13:10:00的发言:



能不能让备份保存在不同的文件夹里?



使用下面的宏,每次关闭时,都会提示输入备份的完整路径和文件名,就可实现上述要求了:

Private Sub Workbook_BeforeClose(Cancel As Boolean)

pathfname = Application.InputBox("请输入要备份的完整路径和文件名:")

    ActiveWorkbook.SaveAs Filename:=pathfname, FileFormat:=xlNormal, _

        Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _

        CreateBackup:=False

End Sub

您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-9-23 16:24 , Processed in 0.097127 second(s), 31 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表