如何使用Excel的Open事件及MsgBox函數(shù)制作提示對話框
對于某些具有特殊功能的Excel表格，有時需要在打開Excel工作表時能夠出現(xiàn)提示對話框，對表格的功能、操作以及制作的有關(guān)信息等進(jìn)行說明。以下是學(xué)習(xí)啦小編為您帶來的關(guān)于使用Excel的Open事件及MsgBox函數(shù)制作提示對話框，希望對您有所幫助。
使用Excel的Open事件及MsgBox函數(shù)制作提示對話框
1、啟動Excel并打開工作表，打開Visual Basic編輯器，在工程資源管理器中雙擊"ThisWorkbook"選項(xiàng)打開當(dāng)前工作簿的“代碼”窗口，如圖1所示。具體程序代碼如下所示：
Private Sub workbook_open()
Dim msg As String '聲明變量
msg="歡迎使用小小公積金查詢系統(tǒng)!"&vbCrLf
msg=msg&"請?jiān)趩卧裰休斎肷矸葑C號進(jìn)行查詢!"&vbCrLf '賦值變量
msg=msg&"作者：郭剛"&vbCrLf
msg=msg&"制作日期：2013年1月"&vbCrLf
MsgBox msg,,"歡迎" '顯示歡迎對話框
End Sub
圖1 在“代碼”窗口中輸入代碼
2、切換到Excel工作表，保存當(dāng)前文檔后關(guān)閉文檔。當(dāng)再次打開該文檔時，將自動打開提示對話框，如圖2所示。
圖2 打開文檔時顯示提示歡迎對話框
Excel2003財(cái)務(wù)常用函數(shù)使用總結(jié)
1.ACCRINT
用途：返回定期付息有價證券的應(yīng)計(jì)利息。
語法：ACCRINT(issue，first_interest， settlement，rate，par，frequency， basis)
參數(shù)：Issue為有價證券的發(fā)行日，F(xiàn)irst_interest是證券的起息日，Settlement是證券的成交日(即發(fā)行日之后證券賣給購買者的日期)，Rate為有價證券的年息票利率，Par為有價證券的票面價值(如果省略par，函數(shù) ACCRINT將par看作00)，F(xiàn)requency為年付息次數(shù)(如果按年支付，frequency = 1;按半年期支付，frequency = 2;按季支付，frequency = 4)。
2.ACCRINTM
用途：返回到期一次性付息有價證券的應(yīng)計(jì)利息。
語法：ACCRINTM(issue，maturity，rate， par，basis)
參數(shù)：Issue為有價證券的發(fā)行日，Maturity為有價證券的到期日，Rate為有價證券的年息票利率，Par為有價證券的票面價值，Basis為日計(jì)數(shù)基準(zhǔn)類型(0 或省略時為30/360，1為實(shí)際天數(shù)/實(shí)際天數(shù)，2為實(shí)際天數(shù)/360，3為實(shí)際天數(shù)/365，4為歐洲30/360)。
3.AMORDEGRC
用途：返回每個會計(jì)期間的折舊值。
語法：AMORDEGRC(cost，date_purchased，first_period，salvage，period，rate，basis)
參數(shù)：Cost為資產(chǎn)原值，Date_purchased為購入資產(chǎn)的日期，F(xiàn)irst_period為第一個期間結(jié)束時的日期，Salvage為資產(chǎn)在使用壽命結(jié)束時的殘值，Period是期間，Rate為折舊率，Basis是所使用的年基準(zhǔn)(0 或省略時為360 天，1為實(shí)際天數(shù)，3為一年365天，4為一年 360天)。
猜你喜歡：
1.Excel2010中宏點(diǎn)擊按鈕打開自定義對話框的操作方法
如何使用Excel的Open事件及MsgBox函數(shù)制作提示對話框
