怎么在VBA指令中調(diào)用Excel函數(shù)
怎么在VBA指令中調(diào)用Excel函數(shù)
有時(shí)在編寫VBA程序時(shí),會(huì)發(fā)現(xiàn)沒有與Excel函數(shù)相對應(yīng)的VBA指令,在此情況下,只能想辦法通過引用Excel函數(shù)來達(dá)到目地.
下面小編就教你怎么在VBA指令中調(diào)用Excel函數(shù):
打開 Microsoft Office Excel 2007,點(diǎn)擊 “開始” ->“Excel 選項(xiàng)”。
在彈出的對話框中,選擇“常規(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 對象”上點(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)行子過程/用戶窗體”按鈕,在彈出的對話框中選擇“轉(zhuǎn)換”,然后點(diǎn)擊“運(yùn)行”按鈕。
程序彈出對話框,結(jié)果與在Excel中利用公式輸出的結(jié)果一樣,只是有效數(shù)字的位數(shù)不一樣,這可以根據(jù)需要加以取舍。