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, 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)
konversi suhu celcius ke kelvin dengan fungsi celcius_ke_kelvin(celcius)
Pembuatan fungsi sendiri (User Defined Function) dilakukan dengan menggunkan bahasa pemrogaman Visual Basic Appliaction dalam hal ini Macro untuk excel. Adapun 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, dan aktifkan macro dengan cara menglik tombol option pada section security option diatas formula bar
- Pilih enabled this content klik ok
- Saatnya menguji apakah fungsi berjalan atau tidak
- 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. - Pada cell D6 hitung luas persegi panjang, panggil fungi luas_persegi()
=luas_segitiga(B3;C3) tekan enter maka hasil perhitungan akan ditampilkan - Dan untuk menghitung konversi dari celcius ke kelvin gunakan fungsi celcius_ke_kelvin()
misal untuk meng-konversi cell B9 ke kelvin
=celcius_ke_kelvin(B9)
site: http://latihanexcel.web.id/2011/11/membuat-fungsi-sendiri-di-excel/
Tidak ada komentar:
Posting Komentar