Cara mengembalikan nilai dari fungsi vba (dengan contoh)

Untuk mengembalikan nilai dari suatu fungsi di VBA, Anda harus menetapkan nilai ke nama fungsi.

Misalnya, kita dapat membuat fungsi berikut untuk membagi dua nilai dan kemudian mengembalikan hasil pembagiannya:

 Function DivideValues(x,y)
    DivideValues = x / y
End Function

Nama fungsi ini adalah DivideValues , jadi untuk mengembalikan nilai dari fungsi ini kita perlu menetapkan hasil x/y ke variabel dengan nama yang sama dari DivideValues .

Jika fungsi Anda melibatkan logika If Else , Anda dapat menetapkan nilai ke nama fungsi beberapa kali.

Misalnya, Anda bisa membuat fungsi berikut yang mengembalikan “Tidak dapat membagi dengan nol” jika Anda mencoba membagi dengan nol, atau cukup mengembalikan hasil pembagian:

 Function DivideValues(x,y)
    If y = 0 Then
      DivideValues = " Cannot divide by zero "
    Else
      DivideValues = x / y
    End If
End Function

Contoh berikut menunjukkan cara menggunakan sintaksis ini dalam praktiknya.

Contoh: Cara mengembalikan nilai dari fungsi VBA

Misalkan kita ingin membuat fungsi di VBA untuk membagi nilai sel A2 dengan nilai sel B2 :

Kita dapat membuat fungsi berikut untuk melakukan ini:

 Function DivideValues(x,y)
    DivideValues = x / y
End Function

Saat kami menjalankan makro ini, kami menerima keluaran berikut:

Fungsi ini mengembalikan nilai 5 yang merupakan hasil dari 50 dibagi 10.

Kita juga bisa membuat fungsi yang menggunakan logika If Else untuk memeriksa terlebih dahulu apakah nilai yang kita bagi tidak sama dengan nol:

 Function DivideValues(x,y)
    If y = 0 Then
      DivideValues = " Cannot divide by zero "
    Else
      DivideValues = x / y
    End If
End Function

Jika kita mengubah nilai di sel B2 dan kemudian menggunakan fungsi ini untuk melakukan pembagian, kita akan mendapatkan hasil sebagai berikut:

Karena kita mencoba membagi dengan nol, “Tidak dapat membagi dengan nol” dikembalikan oleh fungsi tersebut.

Sumber daya tambahan

Tutorial berikut menjelaskan cara melakukan tugas umum lainnya di VBA:

Bagaimana mengomentari blok kode di VBA
Cara memeriksa apakah file ada menggunakan VBA
Cara Membuat Folder Menggunakan VBA