ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 Excel Home精品图文教程库
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
300集Office 2010微视频教程 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 15284|回复: 14

大家有没有办法让EXCEL表每天自动备份一次?

[复制链接]

TA的精华主题

TA的得分主题

发表于 2005-3-15 10:38 | 显示全部楼层 |阅读模式
大家有没有办法让EXCEL表每天自动备份一次?

TA的精华主题

TA的得分主题

发表于 2005-4-2 13:42 | 显示全部楼层

我这个办法虽然不是每天备份,但是比每天备份的效果还要好:

假设你的文件都在C:\My document\目录中,并且你希望把这些文件备份在C:\Backup中,你的EXCEL安装在默认目录下

1。先打开记事本,输入以下语句:

Start/W "C:\Program Files\Microsoft office\office\EXCEL.EXE" %1

XCOPY/M/D/Y/S "C:\My document\*.xls" C:\Backup

保存为.bat文件后退出。

2。在桌面为这个文件建个快捷方式,然后右击,选择属性->程序->运行->最小化

以后要打开EXCEL就用这个快捷方式,它会自动打开EXCEL,并且在你退出EXCEL之后自动备份你刚才修改过的EXCEL文件,没有修改的不备份。

3。如果有人喜欢以双击文件的方式打开文件,打开资源管理器->查看->文件夹选项->文件类型,将.xls文件链接到刚才我们做的bat文件上。

4。这种备份方法同样适用于word等其它的程序,而且是全自动的。市面上虽然有很多备份软件,但我个人认为这些软件要么设置烦琐,要么只能定时备份,要么有重复备份等等,没有一个十全十美的。不是我老王卖瓜,我这个方法可谓是完美的备份方法。

5。解释一下这两句命令:

start是启动一个程序,加上/W是等待的意思,也就是说等这个程序关闭才执行下面的语句。

XCOPY的/M参数是指拷贝具有存档属性的文件,几乎所有的程序都会在修改文件后给文件加上存档属性,此文件在拷贝后会去掉存档属性。

XCOPY的/D参数是指拷贝的源文件比目标文件的日期要新。

XCOPY的/Y是指复盖文件不提示。

XCOPY的/S参数是指拷贝子目录。

5。最后声明一下,些方法不是我原创的,是我很久以前在哪里学来的,但时间太长了,实在想不起了。没办法找到原作者的名字让大家知道。

在第一条命令中的%1前需加个空格,现已修正。

[此贴子已经被作者于2005-4-22 14:36:29编辑过]

评分

1

查看全部评分

TA的精华主题

TA的得分主题

发表于 2005-4-2 14:10 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
学习! 但试过不能运行? 不知什么原因??? 系统XP/office2003

TA的精华主题

TA的得分主题

发表于 2005-4-2 16:12 | 显示全部楼层
以下是引用白天睡觉在2005-4-2 13:42:00的发言:

我这个办法虽然不是每天备份,但是比每天备份的效果还要好:

假设你的文件都在C:\My document\目录中,并且你希望把这些文件备份在C:\Backup中,你的EXCEL安装在默认目录下

1。先打开记事本,输入以下语句:

Start/W "C:\Program Files\Microsoft office\office\EXCEL.EXE"%1

XCOPY/M/D/Y/S "C:\My document\*.xls" C:\Backup

保存为.bat文件后退出。

2。在桌面为这个文件建个快捷方式,然后右击,选择属性->程序->运行->最小化

以后要打开EXCEL就用这个快捷方式,它会自动打开EXCEL,并且在你退出EXCEL之后自动备份你刚才修改过的EXCEL文件,没有修改的不备份。

3。如果有人喜欢以双击文件的方式打开文件,打开资源管理器->查看->文件夹选项->文件类型,将.xls文件链接到刚才我们做的bat文件上。

4。这种备份方法同样适用于word等其它的程序,而且是全自动的。市面上虽然有很多备份软件,但我个人认为这些软件要么设置烦琐,要么只能定时备份,要么有重复备份等等,没有一个十全十美的。不是我老王卖瓜,我这个方法可谓是完美的备份方法。

5。解释一下这两句命令:

start是启动一个程序,加上/W是等待的意思,也就是说等这个程序关闭才执行下面的语句。

XCOPY的/M参数是指拷贝具有存档属性的文件,几乎所有的程序都会在修改文件后给文件加上存档属性,此文件在拷贝后会去掉存档属性。

XCOPY的/D参数是指拷贝的源文件比目标文件的日期要新。

XCOPY的/Y是指复盖文件不提示。

XCOPY的/S参数是指拷贝子目录。

5。最后声明一下,些方法不是我原创的,是我很久以前在哪里学来的,但时间太长了,实在想不起了。没办法找到原作者的名字让大家知道。

很不錯的方法,謝謝分享 !!!

[此贴子已经被作者于2005-4-2 16:12:23编辑过]

TA的精华主题

TA的得分主题

发表于 2005-4-4 09:18 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
我想请问一下,可以整个文件夹自动备份吗?可以自动备份到其他机吗?也就是说我想整个文件里面的文件如果有更新的话,自动备份到服务器。

TA的精华主题

TA的得分主题

发表于 2005-4-4 22:12 | 显示全部楼层

我假设读者写过.bat文件,知道基本知识

我的这段代码取得系统日期,并存放到环境变量YYYY MM DD里面

这样就可以在任意批处理文件调用了.

同时以当前系统日期创建一个目录

这样,只要在其它批处理文件检查目录是否存在即可知道是否已经备份

未备份则copy一下即可

@echo off echo.|date>date.rec if '%1'=='' %0 0 1 2 3 4 5 6 7 8 9

:loop if '%1'=='' goto end

find "200%1" date.rec>nul if not errorlevel==1 set YYYY=200%1

find "0%1-" date.rec>nul if not errorlevel==1 set MM=0%1

find "1%1-" date.rec>nul if not errorlevel==1 set MM=1%1

find "-0%1-" date.rec>nul if not errorlevel==1 set DD=0%1

find "-1%1-" date.rec>nul if not errorlevel==1 set DD=1%1

find "-2%1-" date.rec>nul if not errorlevel==1 set DD=2%1

find "-3%1-" date.rec>nul if not errorlevel==1 set DD=3%1

shift goto loop

:end MD %YYYY%%MM%%DD%

set YYYY= set MM= set DD= del date.rec>nul

TA的精华主题

TA的得分主题

发表于 2005-4-13 13:07 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
To 3楼 你的版本好高,我用的是win98+excel2000,没办法帮你试,sorry 建议你请教一下海底眼,他好象是此中高手。

TA的精华主题

TA的得分主题

发表于 2005-4-13 13:11 | 显示全部楼层

To 5楼 可以备份整个目录,只要把XCOPY/M/D/Y/S "C:\My document\*.xls" C:\Backup 中的*.xls改成*.*,把C:\Backup改成服务器的目录就行了

TA的精华主题

TA的得分主题

发表于 2005-4-13 13:18 | 显示全部楼层

To 6楼 海底眼,真乃高手是也。 不过我觉得你实现的功能,用XCOPY的参数就能解决: 判断是否已备份:/M 用时间判断备份文件是否最新:/D

不过我真的很佩服你写.bat文件的功力,有时间跟你讨教几招。

TA的精华主题

TA的得分主题

 楼主| 发表于 2005-5-6 17:22 | 显示全部楼层
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

关闭

最新热点上一条 /1 下一条

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-4-26 08:49 , Processed in 0.042778 second(s), 10 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

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