欢迎访问抖客教程网!

抖客教程网

您现在的位置是:主页 > 办公课堂 > Excel教程 > ExcelVBA实例 >

ExcelVBA实例

excel表格如何看备份数据

发布时间:2024-06-07 08:50:01ExcelVBA实例评论
1.如何查找excel自动生成的备份文件! 一、配置宏安详性 选择“东西→宏→安详性”菜单,将安详级别设为“低”。这样,VBA代码才可以执行。 二、输入VBA代码 1.打开需要备份的Excel文

1.如何查找excel自动生成的备份文件!

一、配置宏安详性

选择“东西→宏→安详性”菜单,将安详级别设为“低”。这样,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城市提示是否备份。选择“是”将在指定的文件夹生成一个同名的备份文件,并生存当前文件。选择“否”则只生存当前文件而不做备份。

2.excel备份文件在那边

首先备份你的Word文件。

这很重要,一旦操纵失误,还可以规复,不然效果自负。 用全部替换法,将各个表格之间的多余段落标志去掉。

如本来有些表格之间大概有两个或多个段落标志符,可以用替换法删除。查找内容中输入^p^p,替换为中输入^p。

重复全部替换多次,就可删除多余的段落标志了。假如尚有非凡的标志,假如这种标志能在记事本中显示,最好保存。

这样可以省去后头的宏呼吁。假如这种标志不能为记事本识别,就必需要删除。

因为我这里的步伐就是借用文本文件举办转化。那些非凡字符,在你运行替换呼吁时,点高级,在非凡标记中一般能找到,本身找吧。

全选,表格-->转换-->文本转换为表格,表格-->转换-->表格转换为文本。 转换时用默认配置就可以。

颠末两步转换,本来的每个单位格都酿成了一个***的段落。 由于每张表的名目应该是完全沟通的,可以用宏呼吁再次举办转换。

预计你需要的最终名目是在Excel表中,每小我私家的信息占用一行。那么我们需要做的就是将同一小我私家的信息变为一个段落,本来的每个单位格之间用特定的标记标识。

再次运行一次编辑-->替换,在查找内容中输入^p,替换为中输入^t可能其它的在整个Word中不行能有的字符(如※),点击替换,使之替换一次,再按编辑-->取消规复到未替换之前的状态,将光标放于文档开头处。这一点很重要,这一步是为了让Word记着你替换的状态,为下一步的宏录制打下一个精采的基本。

下面开始录制宏。东西-->宏-->录制新宏,点键盘,抖客教程网,为你录制的宏指定一个快捷键(如F12),将变动生存在中选择你当前的文档(不要选Normal,不然会影响你此后的事情)。

当箭头形光标上带有一个磁带形的标识时,说明已开始录制宏。此时的操纵必然要小心啊。

首先点击查找下一处,然后不绝所在击替换,直到第一张表的末了处。 遏制录制(有一个新发生的菜单上,按钮图标为实心方框)。

下面,你只需不绝地按F12键,就可把表格转换为每段一小我私家记录的形式,并且本来的单位格内容间由一个制表符离隔。 假如适才你保存有差异表格之间的非凡标记,你就不必录制宏。

而回收全部替换。再将该非凡字符,如统一的表格标题文字等,替换为^p 另存为文本文件。

打开Excel,数据-->导入外部数据-->导入数据, 留意选择脱离标记,而不是牢靠宽度。脱离符为Tab,可能你的非凡标记(※),也可以在其他中输入该字符。

下面的操纵就不消说了吧。

热心评论

评论列表