1. vba关闭excel自动保存
呵呵，这小白需求，无语。实现起来倒是很容易：每个工作表下面写这个：
Private Sub Worksheet_Change(ByVal Target As Range)ThisWorkbook.SaveEnd Sub只要有单元格被改就自动保存。总体感觉这需求毫无意义也没有必要用VBA实现。
2. vba关闭excel并保存
1. 全局禁用（作用于所有工作簿）：
Application.AutoRecover.Enabled = False
对应【Excel 选项】
取消勾选【保存工作簿】中的【保存自动恢复信息时间间隔】复选框：
2. 局部禁用（作用于此工作簿，若要禁用其他工作簿请替换 ThisWorkbook 对象）：
ThisWorkbook.EnableAutoRecover = False
对应【Excel 选项】
取消勾选【自动恢复例外情况】中的【仅禁用此工作簿的自动恢复】复选框：
3. excel保存直接关闭
2007版excel：左上方圆形图标--下方的“excel选项”--左侧“保存”--取消“保存自动回复信息时间间隔”复选框--确认！！就可以了。
4. vba关闭excel文件并保存
VBA可以做到
代码如下
Sub 关闭sheet自动重算()
Sheets("sheet1").EnableCalculation = False
End Sub
Sub 启用sheet自动重算()
Sheets("sheet1").EnableCalculation = True
End Sub
可以用按钮设置，也可以设置快捷键。
5. VBA自动保存
1、在新工作表的Sheet1上点击右键2、选择查看代码3、点击倒三角，选择Worksheet4、点击右边倒三角，选择触发方式，如BeforeDoubleClick表示在双击鼠标左键时触发5、点击候出现如下代码框架6、输入以下语句：Sheet1.Cells(1, 3) = Sheet1.Cells(1, 1) + Sheet1.Cells(1, 2)意为将A1、B1单元格求和并放在C1单元格7、点击保存，然后关闭VBA窗口8、由于A1,B1没有数据，所以C1为09、输入数据后，会发现即使按了回车，C1也不变，因为设置的是双击鼠标左键触发。
10、就可以用EXCELVBA保存文件了。
6. excel保存自动关闭怎么解决
答：excel表格总自动清空怎么办？excel十分常见和实用性强。答案打开【Excel】，选择【查找】，点击【替换】，它的快捷键是【Ctrl+H】，选择【选项】，点击【查找内容】中的【格式】，选择【设置格式】，点击【字体】，颜色选择为【红色】，点击【确定】，【替换为】空置不填，点击【全部替换】即可。记得收藏。
7. Excel关闭自动保存
Excel表格出现这种情况:是因为Excel的默认设置,只要对表格进行了操作，关闭时就会提醒是否需要保存，即使只是鼠标点击了其中一个单元格，没有进行任何修改，都是如此。
可以通过关闭“自动重算”功能解决这个问题，具体操作步骤如下：文件——选项——公式勾选自动重算——确定，即可完成设置。
8. excel如何设置关闭时自动储存
提示磁盘已满就是字面的意思，存储盘已经没有空间了，检查一下你的EXCEL文件存储的位置是不是已经没有空间了，一般来讲放在硬盘理不太可能出现这个情况，因为EXCEL的文件很小，除非你是放在U盘或者软盘（现在还有人用么）里，总之先检查你编辑的EXCEL文件所在的硬盘是否已经空间不足，尤其是如果是放在C盘的话，C盘由于会产生虚拟内存的页面文件，即使剩个几百M的空间也可能会被缓存填满。
解决办法最好就是把EXCEL文件复制到D,E,F等后面的盘符里。
EXCEL如果使用后无响应很大可能是因为编辑时间过长，内存数据堆栈产生混乱而死机。
也有可能你是在网络硬盘上编辑的EXCEL因为一时的网络堵塞在自动保存的时候发生死机。
解决这个情况，首先由于是电脑硬件的问题，更换电脑是最直接的办法。
不想换电脑的话，那就请在编辑EXCEL的时候将其他任务关闭，不要同时打开许多EXCEL文件并长时间的编辑。
如果是在网络硬盘上的EXCEL文件，可以先下载到自己电脑硬盘上编辑好了再上传。最后最保险的，养成5－10分钟保存一次的习惯。
9. vba excel不保存关闭
答解决方法如下
操作步骤
1、打卡Excel表格单击菜单栏“工具”→“选项”。
2、进入“选项”设置，点击“安全性”在“个人信息选项”下勾掉“保存时从文件属性中删除个人信息”即可解决问题。
3、还有一种方法就是用VBA代码解决这个问题，按ALT+F11进入VBA界面，选择ThisWorkbook。
4、在“ThisWorkbook”窗口内输入以下代码，然后关闭Excel在打开即可。
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean， Cancel As Boolean)
ActiveWorkbook.RemovePersonalInformation = False
End Sub
- 相关评论
- 我要评论
-