怎么在VBA指令中調用Excel函數

怎么在VBA指令中調用Excel函數

　　有時在編寫VBA程序時，會發現沒有與Excel函數相對應的VBA指令，在此情況下，只能想辦法通過引用Excel函數來達到目地.

　　下面小編就教你怎么在VBA指令中調用Excel函數:

　　打開 Microsoft Office Excel 2007，點擊 “開始” ->“Excel 選項”。

　　在彈出的對話框中，選擇“常規”選項卡，并在右側點選“在功能區顯示‘開發工具’選項卡”，并單擊“確定"。

　　在單元格A1中輸入“弧度”，單元格B1中輸入“角度”，單元格A2中輸入“3.14”，然后在單元格B2中輸入公式"=DEGREES(A2)"在按下回車后，該單元格輸出結果為179.9087477。

　　注：DEGREES函數的作用是將弧度轉化為角度。

　　接下來，我們用VBA實現同樣的功能。點擊“開發工具”選項卡，單擊“Visual Basic”，啟動Visual Basic編輯器。

　　在“Microsoft Excel 對象”上點鼠標右鍵，依次點擊“插入” -> “模塊”，創建“模塊1”，并在該模塊中輸入內容：

　　Sub 轉換()

　　MsgBox Application.WorksheetFunction.Degrees(3.14)

　　End Sub

　　點擊“運行子過程/用戶窗體”按鈕，在彈出的對話框中選擇“轉換”，然后點擊“運行”按鈕。

　　程序彈出對話框，結果與在Excel中利用公式輸出的結果一樣，只是有效數字的位數不一樣，這可以根據需要加以取舍。