excel中VBA程序調(diào)用函數(shù)的方法
有時(shí)在編寫VBA程序時(shí),會(huì)發(fā)現(xiàn)沒有與Excel函數(shù)相對(duì)應(yīng)的VBA指令,在此情況下,只能想辦法通過引用Excel函數(shù)來達(dá)到目地,今天,學(xué)習(xí)啦小編就教大家如何利用VBA程序調(diào)用Excel函數(shù)的方法。
Excel中VBA程序調(diào)用函數(shù)的方法如下:
打開 Microsoft Office Excel 2007,點(diǎn)擊 “開始” ->“Excel 選項(xiàng)”。
在彈出的對(duì)話框中,選擇“常規(guī)”選項(xiàng)卡,并在右側(cè)點(diǎn)選“在功能區(qū)顯示‘開發(fā)工具’選項(xiàng)卡”,并單擊“確定"。
在單元格A1中輸入“弧度”,單元格B1中輸入“角度”,單元格A2中輸入“3.14”,然后在單元格B2中輸入公式"=DEGREES(A2)"在按下回車后,該單元格輸出結(jié)果為179.9087477。
注:DEGREES函數(shù)的作用是將弧度轉(zhuǎn)化為角度。
接下來,我們用VBA實(shí)現(xiàn)同樣的功能。點(diǎn)擊“開發(fā)工具”選項(xiàng)卡,單擊“Visual Basic”,啟動(dòng)Visual Basic編輯器。
在“Microsoft Excel 對(duì)象”上點(diǎn)鼠標(biāo)右鍵,依次點(diǎn)擊“插入” -> “模塊”,創(chuàng)建“模塊1”,并在該模塊中輸入內(nèi)容:
Sub 轉(zhuǎn)換()
MsgBox Application.WorksheetFunction.Degrees(3.14)
End Sub
點(diǎn)擊“運(yùn)行子過程/用戶窗體”按鈕,在彈出的對(duì)話框中選擇“轉(zhuǎn)換”,然后點(diǎn)擊“運(yùn)行”按鈕。
程序彈出對(duì)話框,結(jié)果與在Excel中利用公式輸出的結(jié)果一樣,只是有效數(shù)字的位數(shù)不一樣,這可以根據(jù)需要加以取舍。
總結(jié):在進(jìn)行VBA編程時(shí),可以通過WorkSheetFunction方法來實(shí)現(xiàn)對(duì)Excel函數(shù)的引用,借此,可以方便我們對(duì)函數(shù)的引用,避免花費(fèi)更多的時(shí)間在自定義函數(shù)上,有效的提高了工作效率。