如何在 MS Excel 中使用 VBA 使用者自定義函式計算表面積?


使用者可以使用 VBA 使用者自定義函式設計獨特的函式來執行自己的任務。複雜的數學問題也可以透過 VBA 程式碼進行計算。使用者可以使用 VBA 建立宏來自動化繁瑣的操作,並快速建立表單、報表和圖表。在編寫 VBA 程式碼之前,必須學習 VBA 程式的變數和函式的基本結構和語法。

使用 VBA 使用者自定義函式計算表面積

  • 步驟 1 - 開啟一個新的工作表,並輸入如下所示的資料集

  • 步驟 2 - 轉到開發工具選項卡,然後單擊Visual Basic選項卡來編寫所需的程式碼 -

  • 步驟 3 - 在視窗框中編寫以下程式碼 -

'creation of a function S_Area
Function S_Area(ra, Vol, ta)
'define variable
Dim gi As Double
gi = 3.14
'Use if else statement
If ta <> 0 Then
   S_Area = ((2 * Vol) / ra) + ((gi * ra * ra) * ((1 / Sin(ta)) - (1 / Tan(ta))))
Else
   S_Area = 0
End If
End Function

使用ctrl + S儲存工作表,然後轉到 Excel 表格。

  • 步驟 4 - 在工作表中部署 Visual Basic 使用者自定義函式

    • 在 D2 單元格中,寫入 UDF 函式的名稱並輸入三個引數值。

    • 然後按Enter鍵獲取計算出的表面積。

同樣,重複類似的步驟,並在接下來的三列(直到 D5)中輸入 S_area() 函式及其計算出的表面積。

結論

使用者可以學習技巧並提高他們的 VBA 程式設計技能,以熟練掌握 MS Excel。本文逐步演示瞭如何在工作表中給出半徑、體積和角度值的情況下計算表面積。

更新於:2023年10月20日

329 次瀏覽

啟動您的 職業生涯

透過完成課程獲得認證

開始學習
廣告