Minggu, 01 Januari 2012

Membuat Fungsi / Function Sendiri di Ms. Excel


Terkadang kita memiliki rumus sendiri yang tidak terdapat dalam excel. Namun, Excel hanya menyediakan fungsi yang umum. Itulah terkadang saya kurang dapat bekerja cepat. Sebagai contoh untuk menghitung luas segitiga atau luas persegi panjang dan juga bangun ruang atau bidang datar lain. Rumusan-rumusan diatas bisa kita buat dengan formula matematika biasa, namun bisa pula kita buat fungsi sendiri sebagai contoh, ketika kita akan membuat menghitung luas segitiga cara biasa adalah membuat formula sebagai berikut :

Luas Segitiga = 1/2 x alas x tinggi
maka formula di excel
=0.5*10*5

Ada cara lain yaitu dengan membuat fungsi matematika untuk menghitung luas, sehingga untuk menghitungluas kita menggunakan fungsi sebagai berikut (misal)
=luas_segitiga(alas;tinggi)

maka fungsi nya :
=luas_segitiga(10;5)

Nah pada contoh kasus kali ini kita akan membuat fungsi sendiri. Itulah yang saya pelajari ddan mencari sesulit apapun akhirnya bisa dan share pada anda. Dalam contoh kali ini kita akan membuat fungsi untuk menghitung :

luas segitiga, dengan fungsi luas_segitiga(alas;tinggi)
luas persegi panjang, dengan fungsi luas_persegipanjang(panjang;tinggi)

Pembuatan fungsi sendiri (User Defined Function) dilakukan dengan menggunkan bahasa pemrogaman Visual Basic Appliaction dalam hal ini Macro untuk excel. Langkah-langkahnya adalah :

Buka jendela macro editor dengan menekan tombol ALT+F11
Pada Project browser klik kanan ThisWorksheet klik insert kemudian pilih Module


Pada jendela module ketik fungsi fungsi seperti tampak pada gambar berikut 

 
dari tiga contoh diatas maka format penulisan nya adalah :
Function nama_fungsi(parameter_1,parameter_2,parameter_n)
nama_fungsi=formula
End Function
 
Tutup jendela macro editor dan kembali ke lembar kerja excel, jika terdapat kotak dialog seperti tampak pada gambar dibawah klik tombol No

 
Simpan file excel dengan memilih filetype nya Excel 97-2003 workbook (*.xls) atau Excel Macro-enabled workbook (*.xlsm) 


Tutup file
Buka kembali lembar kerja excel anda, lalu aktifkan macro dengan cara menglik tombol option pada section security option diatas formula bar 
Nah, ini yang mulai membuat saya bingung. Tapi, ada jalan. Pilih enabled this content, dan klik ok 
Saatnya menguji apakah fungsi berjalan atau tidak. Kenapa ya, saya dulu selalu dag dig dug dapat hal seperti ini
Buatlah table data seperti gambar dibawah ini, pada Cell D3 untuk luas segitiga panggil fungsi sbb :
=luas_segitiga(B3;C3) tekan enter maka hasil perhitungan akan ditampilkan.
Haduh, ,saya sepertinya sudah sedikit bingung melihat semua ini. Nah, anda bisa bantu saya supaya tidak bingung. Beri saya comment dan saran. Pesan saya :Keep read and visit this blog. Thanks.
Uji hal lain, dengan fungsi anda sendiri. ;)

Tidak ada komentar: