批处理之家 - Powered by Discuz! Board

标题: 批处理怎样模拟组合键Ctrl s的操作来保存Excel？ [打印本页]

作者: FU8989 时间: 2010-1-1 13:54 标题: 批处理怎样模拟组合键Ctrl s的操作来保存Excel？

本人经常编辑EXCEL文档有时因停电或者电脑突然关机所做的文档没有随时保存而丢失但是在编辑过程中按Ctrl+s快捷键就能随时保存正在编辑的文档然后继续编辑请问各位能否用批处理来完成这一操作谢谢

作者: qzwqzw 时间: 2010-1-1 14:32

还不如使用Office的自动保存定时保存文档呢

作者: FU8989 时间: 2010-1-1 15:40 标题: 回复 2楼的帖子

谢谢你的指教可是office 没有达到我的要求不管你设置时间多少它都是以电脑闲置起算的比如你设置一分钟但是你一直进行不停的编辑一个钟头它照样没有保存不信的话你试试所以我想做的批处理你能帮忙吗

作者: canyuexiaolang 时间: 2010-1-3 09:28

批处理应该做不到吧，这个好像得运用API函数...

作者: qzwqzw 时间: 2010-1-3 11:22

给你一个建议
搜索一下nircmd.exe / nircmdc
这个命令行程序有定位窗口焦点并发送按键的功能

作者: FU8989 时间: 2010-1-3 19:57 标题: 回复 5楼的帖子

谢谢.................................................

作者: yslyxqysl 时间: 2010-1-4 18:26

用vbs的Sendkeys

作者: FU8989 时间: 2010-1-4 21:28 标题: 回复 7楼的帖子

谢谢...........................................

作者: 5566ljlj 时间: 2010-1-5 17:48

可以使用VBS来实现，
set a=createobject("wscript.shell")
创建对象后再使用WHILE循环不断运行以下两句即可
a.sendkeys "^s"
wscript.shell 18000 '3分钟保存一次

作者: FU8989 时间: 2010-1-8 10:40 标题: 回复 9楼的帖子

谢谢你能否整理完整的给我因为我不懂麻烦你了

作者: 5566ljlj 时间: 2010-1-9 20:41

你可以尝试如下代码：

Set a=WScript.CreateObject("WScript.Shell")
a.Run "1.XLS"
WScript.Sleep 5000
While a.AppActivate ("1.XLS")=True
a.SendKeys "^s"
WScript.Sleep 180000
Wend
WScript.Quit
复制代码

将其保存为VBS文件
以上1.XLS是你EXCEL文档的文件名，先打开文档然后打开该VBS文件，并且两者在同一目录下。

作者: FU8989 时间: 2010-1-10 09:14 标题: 回复 11楼的帖子

好的谢谢你....................................................................

欢迎光临批处理之家 (http://www.bathome.net/)