[VBA实现新books的自动生成]Sub Filter() bk = ActiveWorkbook.Name pah = ActiveWorkbook.Path rw = Range(＂B65536＂).End(xlUp).Row Range(Cells(1, 2), Cells(rw, 2)).AdvancedFilter Action:=xlFilte...+阅读
一、设置宏安全性
选择“工具→宏→安全性”菜单，将安全级别设为“低”。这样，VBA代码才可以执行。
二、输入VBA代码
1.打开需要备份的Excel文件，右击任一工作表标签，选择“查看代码”，或选择“工具→宏→Visual Basic编辑器”菜单，打开Visual Basic编辑器。
2.在“工程”窗口中双击“ThisWork book”，此时VBA编辑器标题变为：Microsoft Viusal Basic-“文件名”-[ThisWorkbook（代码）]。
3.将以下代码输入到“代码”窗口中：
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) '指定Excel文件的路径
XlsFilePath = ＂D：＂ '指定备份路径
BackupXlsFilePath = ＂E:＂
If ThisWorkbook.Path = XlsFilePath Then
ExcelFilePath = BackupXlsFilePath
Else
ExcelFilePath = XlsFilePath
End If '提示是否备份
Response = MsgBox（＂保存时是否备份当前Excel文件？＂ & vbCr & ＂备份位置：＂ & ExcelFilePath, vbYesNo， ＂提示备份＂）
If Response = vbYes Then ' 用户按下“是” '两个Excel文件相互备份
ThisWorkbook.SaveCopyAs Filename:=ExcelFilePath & ＂\＂ & ThisWorkbook.Name
End If
End Sub
三、执行
当前Excel文件编辑完成后，只要单击“保存”按钮，Excel都会提示是否备份。选择“是”将在指定的文件夹生成一个同名的备份文件，并保存当前文件。选择“否”则只保存当前文件而不做备份。
以下为关联文档：
wps2013如何插入及自动生成目录WPS文字具有自动生成目录功能，与手动添加的目录不同，自动生成的目录并不是简单的文字符号，而是以域的方式体现，具有自动更新和链接到目录项的功能，下面来看具体操作： 1.首先打开要...
office2013目录怎么自动生成目录在插入目录之前，首先需要设置各级标题的样式，在“开始”选项卡界面的右边有样式设置选项，如下图所示。 选中一级标题，点击样式里的“标题1”，依次将所有的一级标题进行设置，如下图...
wps怎么自动生成目录避免目录和正文对不上号在WPS中如何自动生成目录及相关细节设置图文 现在我们写论文基本上都是用WPS，而一般写论文的过程是先把文章的内容写好之后再去处理文章的目录，但在实际情况当中，很多使用者不...
wps word怎么自动生成目录方法/步骤1 需要生成目录，对于论文的排版是有一些要求的，文章中需要对各个合并段落的标题设置样式，如设置标题1，标题1下再设置几个标题2，这样自动生成后的目录才能将标题按正确的...
如何使用crt软件备份多台路由器设备请教高手在CRT本身就有一个脚本录制的功能，你从用CRT telnet进路由之后，开始录制就行了，直到完成后就停止录制. 但是强烈建议你最好还是别选用这个脚本功能，因为非常容易出错的.原因在它...
MAC如何创建分区想给硬盘备份本人电脑菜鸟求教！第一步：备份所有数据，然后再开始。分区的驱动器可以在极少数情况下，导致数据丢失。在开始之前打印出这些说明。第二步：确保您以系统管理员身份登录到计算机。退出所有应用程序并...
myeclipse怎么自动生成spring配置文件在用spring开发时经常会遇到引用spring的schema空间的格式文件，比如用到aop时需要在xml文件中引入spring-aop-4.1.xsd位置。 1、spring的schema空间的格式文件 2、各个版本的...
如何自动生成财务报表如果你问的是带公式的利润表和资产负债表，是财务软件。只要录入每张凭证，自动生成各种报表，你的单位应该就有财务软件。你可以去天空下一个金簿财务软件3.5，操作很简单，可以自动...
Excel能不能自动生成财务分析报告一、设计报表格式。 要以现行财务报表为基础，然后在项目上进行一些必要的调整，如增加变动成本、贡献毛益、固定成本、税息前利润、速动资产、长期资产等。需要注意：如果采用自...
