Fungsi Kustom Excel - Buat Fungsi Buatan Pengguna Kustom

Bagaimana Cara Membuat Fungsi Excel Khusus? (dengan Contoh)

Untuk membuat fungsi kustom, kita perlu menulis kode untuk menjalankan fungsi kita sendiri, dan itu disebut "UDF". Fungsi Kustom adalah fungsi yang ditentukan pengguna di excel, jadi untuk membuat fungsi tersebut, Anda perlu mengetahui pengkodean VBA secara menyeluruh.

Contoh # 1 - Tambahkan Dua Angka Apa Pun

Misalnya, jika Anda ingin menambahkan dua angka, kami akan menunjukkan kepada Anda User Defined Function (UDF) sederhana.

  • Tekan Alt + F11 dan masukkan modul.
  • Tulis kode dalam modul untuk membuat fungsi kustom.

Fungsi kustom apa pun harus dimulai dengan kata "Fungsi", diikuti dengan nama rumus.

Setiap fungsi juga memiliki argumen atau parameter yang mirip dengan fungsi kustom; kita perlu mendefinisikan parameter tersebut. Karena kita hanya menambahkan dua angka, mari kita tentukan parameter tersebut dan tetapkan tipe data ke variabel argumen tersebut.

Setelah parameter ditentukan dengan tipe data, kita perlu menentukan tipe data hasil juga. Mari kita definisikan hasilnya sebagai nilai "Integer".

Di dalam "Prosedur Fungsi" ini, kita akan menulis kode rumusnya.

Kode:

Penambahan Fungsi (Num1 Sebagai Integer, Num2 Sebagai Integer) Sebagai Penjumlahan Integera = Num1 + Num2 Fungsi Akhir

Ini mengatakan hasil nama fungsi "Penjumlahan" akan menjadi jumlah nilai Num1 dan Num2.

  • Sekarang kembali ke lembar kerja dan masukkan dua bilangan bulat.
  • Kami akan menambahkan dua angka ini sekarang. Buka tanda sama dengan dan masukkan nama fungsi kustom "Addition".

Pilih nomor pertama dan kedua dengan memasukkan pemisah sebagai koma (,).

  • Tekan tombol enter untuk mendapatkan hasilnya.

Wow!!! Seperti fungsi SUM, kami mendapatkan hasil dari jumlah dua angka.

Sekarang, lihat angka-angka ini.

Coba tambahkan dua angka ini sekarang.

Kami mendapatkan nilai kesalahan karena argumen tipe data "Num1 & Num2" adalah "Integer," yaitu, kedua argumen ini dapat menampung nilai antara -32767 hingga 32767, jadi apa pun yang lebih dari ini akan menyebabkan kesalahan ini.

Sekarang coba tambahkan dua angka ini.

Bahkan ini akan menyebabkan nilai kesalahan di bawah ini.

Meskipun nilai argumen individual berada dalam batas tipe data Integer, kami masih mendapatkan kesalahan ini karena jumlah total angka-angka ini lebih dari nilai batas integer.

Karena kita telah mendeklarasikan jenis hasil juga sebagai "integer," hasil dari penambahan dua bilangan juga harus berupa batas bilangan bulat.

Contoh # 2 - Tambahkan Semua Angka Ganjil

Excel tidak memiliki fungsi bawaan apa pun, yang bisa menambahkan semua angka ganjil dari daftar angka. Tapi tidak perlu khawatir, kami akan membuat fungsi custom excel untuk mendukungnya.

Buka jendela editor VBA dan beri nama untuk prosedur Fungsi.

Berikan parameter untuk fungsi ini sebagai "Range".

Ini berarti bahwa untuk fungsi ini, kami memberikan nilai input untuk fungsi ini sebagai "Range" dari nilai sel.

Karena kita perlu melakukan loop melalui lebih dari satu sel, kita perlu menggunakan loop "For Each" di VBA, jadi buka loop "For Each".

Di dalam loop ini, tambahkan kode di bawah ini.

Kode:

Fungsi AddOdd (Rng As Range) Untuk Setiap sel Dalam Rng Jika cell.Value Mod 2 0 Kemudian AddOdd = AddOdd + sel. Nilai Sel Berikutnya Selesai Fungsi

Kita harus menggunakan fungsi "MOD" untuk menguji nomor tersebut. Ketika setiap nilai sel dibagi dengan angka 2 dan nilai sisanya tidak sama dengan nol, maka kode kita harus menambahkan semua nilai angka ganjil.

Sekarang kembali ke lembar kerja dan buka fungsi kustom excel.

Pilih rentang nomor dari A1 hingga D8.

Tekan tombol enter untuk mendapatkan hasil angka "ganjil". "

Jadi, pada rentang A1 hingga D8, kita memiliki jumlah bilangan ganjil yaitu 84.

Contoh # 3 - Tambahkan Semua Angka Genap

Demikian pula, fungsi di bawah ini akan menambahkan semua bilangan genap.

Kode:

Fungsi AddEven (Rng As Range) Untuk Setiap sel Dalam Rng Jika cell.Value Mod 2 = 0 Kemudian AddEven = AddEven + cell.Value Sel Berikutnya Selesai Fungsi

Fungsi ini hanya akan menambahkan bilangan genap. Dalam hal ini, kami telah menggunakan logika jika setiap nilai sel dibagi 2, dan sisanya sama dengan nol, maka kode hanya akan menambahkan nilai sel tersebut.

Seperti ini, dengan menggunakan pengkodean VBA, kita dapat membuat fungsi khusus sendiri.

Hal-hal untuk diingat

  • Buat fungsi Kustom tidak lain adalah Fungsi Buatan Pengguna.
  • Untuk membuat fungsi kustom, seseorang harus memiliki pengetahuan tentang keterampilan pengkodean VBA tingkat lanjut.
  • Saat membuat fungsi custom excel, penting untuk memperhatikan argumen dan tipe datanya.

Artikel yang menarik...