excel表格的宏怎么啟用 Excel表格中定時(shí)啟動(dòng)宏的操作步驟，【excel助手】今天為大家分享一篇干貨知識(shí)，如何設(shè)置excel表格的宏怎么啟用countif函數(shù)查重復(fù)excel表格的宏怎么啟用 Excel表格中定時(shí)啟動(dòng)宏的操作步驟”快跟著小編來(lái)看看這一干貨文章吧！

所謂的定時(shí)啟動(dòng)宏，指的是讓宏在規(guī)定的時(shí)間或以設(shè)定的時(shí)間間隔自動(dòng)啟動(dòng)，該功能是通過(guò)使用Application.OnTime方法來(lái)實(shí)現(xiàn)的，本文介紹了Excel表格中定時(shí)啟動(dòng)宏的操作步驟。

1、啟動(dòng)Excel并打開(kāi)包含宏的工作表，在“開(kāi)發(fā)工具”選項(xiàng)卡的“代碼”組中單擊"Visual Basic"按鈕打開(kāi)VBA編輯器，如圖1所示。

圖1　單擊

2、在工程資源管理器中雙擊“模塊1”選項(xiàng)打開(kāi)宏所在模塊的代碼窗口，在其中輸入代碼新建一個(gè)名為“計(jì)劃運(yùn)行過(guò)程”的Sub過(guò)程，如圖2所示。具體的程序代碼如下所示：

Sub計(jì)劃運(yùn)行過(guò)程(Optional WaitHour As Integer=0,_

Optional WaitMin As Integer=5,Optional WaitSec As Integer=0)

Dim strProcName As String,strScheName As String

Dim NextTime As Variant

strScheName="計(jì)劃運(yùn)行過(guò)程" '保存本過(guò)程的名稱(chēng)

strProcName="創(chuàng)建宏" '保存需運(yùn)行宏或過(guò)程的名稱(chēng)

NextTime=Time+TimeSerial(WaitHour,WaitMin,WaitSec) '設(shè)置下一個(gè)計(jì)劃運(yùn)行時(shí)間

Application.OnTime NextTime,strProcName '開(kāi)始一個(gè)新過(guò)程運(yùn)行計(jì)劃

Application.Run strScheName '計(jì)劃完成后，重新調(diào)用本過(guò)程

End Sub

圖2　在“代碼”窗口中創(chuàng)建一個(gè)新過(guò)程

提示

上述過(guò)程可以接收3個(gè)參數(shù)，分別是小時(shí)數(shù)、分鐘數(shù)及秒數(shù)。這3個(gè)參數(shù)決定了定時(shí)運(yùn)行宏或過(guò)程的時(shí)間間隔。在過(guò)程中，使用TimeSerial函數(shù)來(lái)確定該值。TimeSerial函數(shù)根據(jù)接收到的3個(gè)參數(shù)產(chǎn)生Date數(shù)據(jù)。用戶(hù)在使用上述過(guò)程時(shí)，不一定需要輸入?yún)?shù)，這3個(gè)參數(shù)都是可選的，并且具有默認(rèn)值。

默認(rèn)情況下，時(shí)間間隔為5分鐘。當(dāng)用戶(hù)啟動(dòng)運(yùn)行該過(guò)程后，“創(chuàng)建宏”宏過(guò)程將每隔5分鐘被執(zhí)行一次。這里要注意的是，該過(guò)程并不一定保證“設(shè)置表頭格式”過(guò)程兩次執(zhí)行間的時(shí)間差絕對(duì)等于5分鐘，有可能由于用戶(hù)意外地進(jìn)入單元格的編輯模式等原因造成該宏過(guò)程一次都無(wú)法按計(jì)劃執(zhí)行。