• 中央环保督察“回头看”10省区问责630人 2019-09-19
  • 天津举办改善营商环境专题讲座 2019-09-19
  • 日本核能行业誓言日本将在今年内重新启用核电 2019-09-03
  • 中国保险行业协会发布汽车后市场配件合车标准 2019-09-02
  • 晋中市通报五起违反中央八项规定精神问题 2019-08-30
  • 两小鸟缠绕困路中,公交司机车流中救助 2019-08-30
  • 互联网药品信息服务资格证书 (京)-经营性-2009-0016 2019-08-29
  • 淮南23家存在重大安全隐患单位被挂牌督办 2019-08-29
  • 专属球队定制装饰火爆 足球盛宴更是消费大餐——浙江在线 2019-08-26
  • 驻村工作队帮村民“马”上致富 2019-08-26
  • 特色小镇里的税收服务 定海国地税多措并举提升效能 2019-08-23
  • 【央视快评】让传统文化焕发新时代风采 2019-08-22
  • 后高考时代 孩子们这样致青春 2019-08-12
  • 湖南高校:将十九大精神融入基础课教学建设 2019-08-12
  • 兰州大学“习近平新时代中国特色社会主义思想研究中心”成立 2019-08-10
  • 当前位置 > CPDA数据分析师 > “数”业专攻 > excel重要文件每天自动备份一份,再也不怕文件丢失损坏了

    体彩排列三和值走势图:excel重要文件每天自动备份一份,再也不怕文件丢失损坏了

    浙江快乐彩和值走势图 www.pn-vs.com 来源:数据分析师 CPDA | 时间:2015-08-26 | 作者:admin

    导语

    有同学提问,excel误删除了怎么办?excel损坏了怎么办?...其实如果excel重要的文件如果每天能备份一份,再也不用担心文件丢失和损坏了。今天就教大家如何实现这个功能。

    实现这样“高大尚”的功能现有的excel功能无法完成,还得VBA编程的方法。当然,作为不懂VBA代码的你,只需要按下面步骤复制粘贴即可。
    第1 步:打开要备份的excel文件,在工作表标签上右键单击,点击“查看代码”

    1

    第2步 在打开一个visualbasic窗口,双击工程窗口中的thisworkbook,把下面的代码粘贴到右侧的窗口中。
    代码:

    Private Sub Workbook_BeforeClose(Cancel As Boolean)
    On Error Resume Next
    Dim mypath As String, fname As String
    fname = Format(Date, "yymmdd") & ThisWorkbook.Name
    mypath = ThisWorkbook.Path & "/备份/"
    ThisWorkbook.SaveCopyAs mypath & fname
    End Sub

    2

    第3步:在Visual basic窗口中点击保存命令,会弹出另存启用宏的提示,这时点击“否”按钮。

    3

    在弹出的保存窗口中,选取保存类型为“Excel 启用宏的工作簿”

    4第4步:在当前文件夹中,新建一个名为“备份”的文件夹。

    5

    设置完成!

    当关闭当前文件后,在备份文件夹中会自动产生一个 日期 + 文件名的excel备份文件。

    6当第2天再次关闭文件时,同样会再产生一个当天的备份文件

    7注意:
    以后使用的文件应是xlsm格式的文件。
    当打开文件时,如果提示“启用内容”就点击启用。

    8

    excel由于支持强大的vba开发语言,使得只要我们能想到的功能,都可以用它来实现。如果你想成为Excel高手,建议学习VBA编程。


    (来源:中国统计网)

  • 中央环保督察“回头看”10省区问责630人 2019-09-19
  • 天津举办改善营商环境专题讲座 2019-09-19
  • 日本核能行业誓言日本将在今年内重新启用核电 2019-09-03
  • 中国保险行业协会发布汽车后市场配件合车标准 2019-09-02
  • 晋中市通报五起违反中央八项规定精神问题 2019-08-30
  • 两小鸟缠绕困路中,公交司机车流中救助 2019-08-30
  • 互联网药品信息服务资格证书 (京)-经营性-2009-0016 2019-08-29
  • 淮南23家存在重大安全隐患单位被挂牌督办 2019-08-29
  • 专属球队定制装饰火爆 足球盛宴更是消费大餐——浙江在线 2019-08-26
  • 驻村工作队帮村民“马”上致富 2019-08-26
  • 特色小镇里的税收服务 定海国地税多措并举提升效能 2019-08-23
  • 【央视快评】让传统文化焕发新时代风采 2019-08-22
  • 后高考时代 孩子们这样致青春 2019-08-12
  • 湖南高校:将十九大精神融入基础课教学建设 2019-08-12
  • 兰州大学“习近平新时代中国特色社会主义思想研究中心”成立 2019-08-10
  • 湖北省快三开奖结果 电影斗牛全集免费观看 篮球游戏网页游戏 彩票幸运农场开奖 湖南幸运赛车爱人彩网 九龙六合图库彩图 天津快乐十分技巧讲解 愚公移山两码中特 幸运农场开奖最走势图 平特王日报大全图 韩国快乐8最快开奖网 大乐透开奖 nba猜胜负彩票 2019生肖马报 11选5历史开奖