Membuat Formula/ Fungsi Baru di Excel
Oleh Deni Hendraya
Mungkin kita bosan sama formula - formula yang sudah ada. Hanya =blah*blah, =average(blah,blah), =mid(blah,blah) eh... =mid(blah,blah,blah). Bukannya lebih seru klo ada ekstranya? Misalnya formula baru seperti ini:
=LuasPersegi(sisi)
=LuasPersegiPanjang(p,l)
=LuasSegitiga(a,t)
dsb.
Lebih baguskan? KEREN! Pengen buat sendiri? Mudah saja. Excel sudah terintegrasi dengan Visual Basic for Application atau VBA. Dengan menscripting Visual Basic 6, kita dapat membuat formula baru!
Nah, bagaimana cara masuk ke VBA, ini step-by-stepnya
Microsoft Office 2003 kebawah
Klik View > Toolbars dan beri tanda centang pada Visual Basic
Microsoft Office 2007
Klik Office Button, lalu klik tombol Excel Option. Sekarang, pada bagianPopular beri tanda centang pada Show Developer Tab. Sekarang, akan muncul tab baru pada Excel, yaitu Developer. Klik itu, lalu pilih Visual Basic
Microsoft Office 2010
Memang, versi ini tidak semua mempunyai. Tapi, gak ada salahnya memberi tahu. Klik Office Button lalu pada bagian Excel pilih Options. Lalu, pilih Customize Ribbon dan beri tanda centang padaDeveloper yang ada pada list dibagian paling kanan
Sekarang, tutorialnya.
Buatlah sebuah module baru
Lalu, pada window yang muncul, ketikkanlah kode berikut:
Public Function LuasPersegi(sisi As Integer)
LuasPersegi = sisi * sisi
End Function
Public Function LuasPersegiPanjang(p As Integer, l As Integer)
LuasPersegiPanjang = p * l
End Function
Public Function LuasSegitiga(a As Integer, t As Integer)
LuasSegitiga = 0.5 * a * t
End Function
Sekarang, tutuplah VBA. Dan coba ketikkan pada cell Excel:
Cell A1: Luas Persegi Sisi 5
Cell B1: =LuasPersegi(5)
Cell A2: Luas Persegi Panjang p = 5; l = 2
Cell B2: =LuasPersegiPanjang(5,2)
Cell A3: Luas Segitiga a = 6; l = 10
Cell B3: =LuasSegitiga(6, 10)
Lihatlah hasilnya. Pasti hasilnya seperti ini:
