win7系統(tǒng)下載
當(dāng)前位置: 首頁 > 硬件軟件教程 > 詳細頁面

用VBA代碼設(shè)置Word自動保存的步驟

發(fā)布時間:2022-02-22 文章來源:xp下載站 瀏覽:

軟件是一系列按照特定順序組織的計算機數(shù)據(jù)和指令的集合。一般來講軟件被劃分為編程語言、系統(tǒng)軟件、應(yīng)用軟件和介于這兩者之間的中間件。硬件是“計算機硬件”的簡稱。與“軟件”相對,電子計算機系統(tǒng)中所有實體部件和設(shè)備的統(tǒng)稱。

  有時候,在使用Word進行文字編輯的時候,突然遇到斷電,或者電腦自動關(guān)機、死機等故障的時候,導(dǎo)致辛辛苦苦做出來的勞動成果全部泡湯,是很多網(wǎng)友都非常抓狂的事情。今天小編就教大家利用VBA代碼,實現(xiàn)自動備份功能,使Word每隔幾分鐘可以自動備份,而不影響正在編輯的文件。接下來就一起來了解一下吧!

  1、打開Word文件的 VBA編輯器,快捷鍵 Alt+F11,右擊【ThisDocument】-》 【插入模塊】;

  用VBA代碼設(shè)置Word自動保存的步驟

  用VBA代碼設(shè)置Word自動保存的步驟

  2、雙擊剛才插入的【模塊1】,添加如下代碼:

  Sub 自動備份()

  Dim NewTime

  NewTime = Now + TimeValue(“00:05:10”)

  Dim myPath$, myName$

  myPath = ActiveDocument.Path

  myName = Left$(ActiveDocument.Name, Len(ActiveDocument.Name) - 4)

  ChangeFileOpenDirectory myPath

  ActiveDocument.SaveAs FileName:=myName & “_temp.doc”, ReadOnlyRecommended:=True

  ActiveDocument.SaveAs FileName:=myName & “.doc”, ReadOnlyRecommended:=False

  Application.OnTime NewTime, “自動備份”

  CreateObject(“Wscript.shell”).popup “備份成功,備份文件名為:” & myName & “_temp.doc”, 2, “提示!2秒后自動關(guān)閉!”

  End Sub

  用VBA代碼設(shè)置Word自動保存的步驟

  用VBA代碼設(shè)置Word自動保存的步驟

  用VBA代碼設(shè)置Word自動保存的步驟

  用VBA代碼設(shè)置Word自動保存的步驟


硬件是實在的,有模有樣的。軟件是程序性的。是一系列的指令。有了軟件,硬件才會實現(xiàn)更豐富的功能。

當(dāng)前原文鏈接:http://m.91mp3.cn/soft/soft-28388.html
主站蜘蛛池模板: 综合国产在线观看无码| 婷婷综合另类小说色区| 亚洲精品综合一二三区在线| 久久精品综合网| 高清欧美色欧美综合网站| 日韩欧美色综合网站| 狠狠色丁香久久婷婷综合图片| 色欲色香天天天综合网站| 93精91精品国产综合久久香蕉| 国产AV综合影院| 激情综合色五月六月婷婷| 久久综合九色综合精品| 色欲色香天天天综合网站| 91精品一区二区综合在线| 色综合久久久久网| 国产欧美日韩综合一区在线播放 | 久久久久久久综合综合狠狠| 亚洲日韩在线中文字幕综合| 一本一道久久a久久精品综合| 在线综合亚洲欧美日韩| 久久综合中文字幕| 色综合视频一区二区三区| 亚洲国产天堂久久综合网站| 天天做天天爱天天综合网2021| 亚洲综合久久夜AV | 大香网伊人久久综合网2020| 色婷婷综合缴情综免费观看 | 五月综合激情婷婷六月色窝| 国产成人精品综合久久久久 | 亚洲国产aⅴ综合网| 亚洲五月综合缴情在线观看| 狠狠人妻久久久久久综合| 亚洲综合一区二区国产精品| 一本久道久久综合狠狠爱| 国产精品综合AV一区二区国产馆| 久久综合久久综合九色| 图图资源网亚洲综合网站| 国产成人人综合亚洲欧美丁香花| 天天干天天射综合网| 久久一本综合| 色综合久久精品中文字幕首页|