Cara Menggunakan Function Procedure VBA Excel #09
Setlah memahami bagaimana membuat function procedure pada VBA Excel, tentunya kita juga harus tahu bagaimana cara menjalankan, memangggil atau mengeksekusi prosedur fungsi yg tlah dibuat.
Sebelumnya kita juga sdh mempelajari 9 cara menjalankan sub procedure, apakah untuk function procedure caranya juga sama?
Saygnya cara untuk menggunakan function procedure sedikit terbatas. Secara umum anda dapat menggunakan 3 alternatif cara brkut untuk menjalankan atau memanggil sebuah function procedure:
- Memanggil funtion procedure dari procedure lain.
- Menjalankan function procedure dari Immediate Window.
- Menggunakan function procedure sbgai rumus excel.
Pada seri panduan Excel VBA Dasar kali ini kita akan membahas ketiga cara tersebut.
Sebelum melanjutkan pembahasan tentang cara menggunakan prosedur fungsi pada VBA Excel ini, slahkan anda buat dulu sebuah standart module baru kemudian buatlah sebuah function procedure sprti brkut pada modul tersebut.
Function DISKON(jumlah As Long, harga As Currency, Optional persen As Double = 0.05) 'Deklarasi variabel jmlDiskon Dim jmlDiskon As Currency 'Menghitung jumlah diskon jmlDiskon = jumlah * harga * persen 'Assign return value diskon kpda fungsi DISKON DISKON = jmlDiskon End Function
Anggap saja UDF atau custom function di atas digunakan untuk menghitung diskon penjualan barang dengan menggunakan 3 parameter atau argumen:
- jumlah: menunjukkan jumlah barang yg terjual.
- harga: menunjukkan harga satuan barang yg dijual.
- persen: menunjukkan besaran diskon yg mana nilai defaultnya adalah 0,05 atau 5%.
Umumnya untuk mendapatkan diskon ada kriteria tertentu yg harus terpenuhi, namun agar lebih sederhana diskon penjulana disini kita hitung tanpa kriteria apapun.
Jika sdh dibuat mari kita lanjutkan pada pembahasan cara menggunakan function procedure tersebut.
Cara Memanggil Function Procedure Dari Procedure Yang Lainnya
Cara pertama yg bisa kita gunakan untuk memanggil atau menjalankan function procedure adalah dengan memanggilnya dari procedure lain.
Cara yg umum digunakan yakni dengan menuliskan baris kode yg berisi nama fungsi bedan nilai-nilai argumennya. Misalnya brkut ini:
Sub munculkanDiskon() MsgBox DISKON(10, 1500, 0.25) End Sub
Jika anda menjalankan prosedure diatas hasilnya adalah kotak pesan brkut:
Angka 3750 pada kotak pesan tersebut didapatkan dari hasil kalkulasi oleh fungsi DISKON (10*1500*25%).
Cara lain adalah dengan menggunakan Application.Run method sprti brkut ini:
Sub tampilkanDiskon() MsgBox Application.Run("DISKON", 10, 1500, 0.25) End Sub
Prosedure di atas akan menghasilkan kotak pesan yg sama sprti sebelumnya.
Cara Menjalankan Function Procedure Dari Immediate Window
Cara lain untuk menjalankan sebuah function procedure adalah dengan memanggilnya dari Immediate Window. Sebelum bisa menggunakannya tentunya anda harus menampilkan dulu Immediate Window yg sdh kita bahas pada seri sebelumnya.
Metode ini biasanya digunakan untuk melakukan debug kode VBA, dengan kata lain untuk memeriksa atau menguji apakah kode VBA yg kita buat sdh sesuai keinginan atau ada error tertentu.
Cara yg biasa digunakan adalah dengan menggunakan printah "Print" kemudian diikuti nama fungsi & argumennya kemudian tekan Enter sprti brkut ini:
Anda juga bisa menggantikan perintah "Print" dengan tanda tanya (?) sprti ini:
Nah, mudah bukan?
Cara Menggunakan Function Procedure Sebagai Rumus Excel
Pada pembahasan tentang function procedure, disebutkan bahwa function procedure juga lazim disebut sbgai Custom function & juga sbgai User Defined Funtion (UDF).
Hal ini lebih di sebabkan karena function procedure bisa kita perlakukan layaknya fungsi bawaan excel semisal fungsi SUM, AVERAGE, VLOOKUP, & lain sbgainya.
Jadi kita juga bisa menggunakan function procedure sbgai sebuah rumus excel bahkan dapat juga digunakan pada conditional formatting.
Cara menggunakannya juga sprti saat anda menggunakan fungsi default excel, yakni dengan mengetikkan tanda sama dengan (=) kemudian diikuti dengan nama fungsi, lengkap dengan argumen-argumentnya.
Berikut contohnya:
=DISKON(10; 1500; 0,25)
Cara di atas berlaku jika function procedure yg anda buat anda gunakan pada file yg sama.
Fungsi DISKON diatas, jika anda gunakan untuk file yg lain akan menghasilkan error #NAME? sprti ini:
Jika bermaksud menggunakannya pada workbook yg berbeda maka ikut dankan juga nama file yg menyimpan function procedure DISKON sprti ini.
='-Latihan VBA 6.xlsm'!DISKON(10; 1500; 0,25)
Cara sprti diatas berlaku jika file "-Latihan VBA 6.xlsm" dlm kondisi open(terbuka).
Jika tidak ingin menggunakan nama file anda dapat juga menetapkan referensi pada file/workbook excel yg menyimpan fungsi DISKON tersebut yg bisa anda atur pada Menu Tools VBE.
Masih ada pertanyaan? Silahkan sampaikan pada kolom komentar yg tersedia.
Sumber https://www.kelasexcel.id
Belum ada Komentar untuk "Cara Menggunakan Function Procedure VBA Excel #09"
Posting Komentar