Pada kesempatan kali ini, kita akan membahas mengenai cara membuat fungsi sendiri dengan referensi di VBA Excel. Sebelum membahas lebih lanjut, kita perlu mengetahui terlebih dahulu apa itu VBA dan apa kegunaan VBA dalam Excel.
VBA atau Visual Basic for Applications adalah bahasa pemrograman yang secara khusus digunakan untuk mengembangkan aplikasi yang berjalan dalam aplikasi Microsoft Office yang meliputi Excel, Word, dan PowerPoint. Dalam Excel, VBA digunakan untuk mengembangkan makro yang menawarkan kemampuan untuk mengotomatisasi tugas-tugas yang kompleks.
Membuat fungsi sendiri dalam Excel dengan menggunakan VBA dapat menghemat waktu dan memudahkan pengguna dalam melakukan tugas-tugas tertentu. Selain itu, kita juga dapat menambahkan fitur-fitur baru pada Excel yang tidak tersedia secara bawaan.
Berikut adalah langkah-langkah untuk membuat fungsi sendiri dengan referensi di VBA Excel:
1. Buka lembar kerja baru pada Excel dan masuk ke mode developer dengan mengklik “File” dan memilih “Options”. Pilih “Customize Ribbon” dan aktifkan pilihan “Developer” untuk ditampilkan pada ribbon Excel.
2. Setelah itu, klik pada tab “Developer” dan pilih “Visual Basic”. Halaman baru akan terbuka yang menampilkan editor VBA.
3. Pada editor VBA, pilih “Insert” dan pilih “Module”. Ini akan membuat modul baru di mana kita dapat menulis kode VBA kita.
4. Tulis kode VBA yang ingin kita tambahkan. Misalnya, jika kita ingin membuat fungsi untuk menghitung jumlah huruf dalam sebuah teks, kita bisa menulis kode berikut:
Function CountChars(ByVal text As String) As Integer
CountChars = Len(text)
End Function
5. Setelah menulis kode VBA, kita perlu memberi nama fungsi dan menyimpan modul. Misalnya, jika kita ingin memberi nama fungsi di atas dengan nama “Hitungkarakter”, kita perlu menyimpan modul dengan nama yang sama.
6. Setelah menyimpan modul, kita perlu mengakses fungsi yang kita telah buat. Untuk melakukan itu, kita perlu klik pada tab “Formulas” pada Excel dan pilih “Insert Function”.
7. Pilih “User Defined” untuk menemukan fungsi yang kita buat dan masukan parameter. Kita akan melihat fungsi yang telah kita buat di bagian “Function name”.
8. Masukan parameter yang diinginkan. Pada contoh di atas, parameter yang diinginkan adalah teks yang ingin dihitung jumlah karakternya.
9. Klik “OK” dan hasil akan langsung ditampilkan pada sel Excel.
Dengan langkah-langkah yang telah dijelaskan di atas, kita dapat mengembangkan fitur-fitur baru di Excel dengan menggunakan VBA. Selanjutnya, mari kita lihat beberapa contoh fungsi yang dapat kita buat.
Contoh Fungsi Pertama
Kita akan membuat fungsi untuk menghitung jumlah kata dalam teks. Berikut adalah kode yang tepat untuk melakukan itu:
Function CountWords(ByVal text As String) As Integer
Dim words As Integer
words = 1 + Len(text) – Len(Replace(text, ” “, “”))
CountWords = words
End Function
Kode di atas memerlukan input teks dan menghitung jumlah spasi di dalamnya. Kemudian, jumlah spasi ditambahkan dengan 1 untuk mendapatkan jumlah kata.
Contoh Fungsi Kedua
Kita akan membuat fungsi untuk mengkonversi angka menjadi huruf dalam bentuk terbilang. Berikut adalah kode yang tepat untuk melakukan itu:
Function Terbilang(ByVal angka As Long) As String
Dim huruf As String, satuan As Integer, puluhan As Integer
Select Case angka
Case 0
huruf = “Nol”
Case 1 To 9
huruf = Array(“Satu”, “Dua”, “Tiga”, “Empat”, “Lima”, “Enam”, “Tujuh”, “Delapan”, “Sembilan”)(angka – 1)
Case 10 To 19
huruf = Array(“Sepuluh”, “Sebelas”, “Dua Belas”, “Tiga Belas”, “Empat Belas”, “Lima Belas”, “Enam Belas”, “Tujuh Belas”, “Delapan Belas”, “Sembilan Belas”)(angka Mod 10)
Case 20 To 99
puluhan = angka \ 10
satuan = angka Mod 10
huruf = Array(“Dua Puluh”, “Tiga Puluh”, “Empat Puluh”, “Lima Puluh”, “Enam Puluh”, “Tujuh Puluh”, “Delapan Puluh”, “Sembilan Puluh”)(puluhan – 2) & IIf(satuan <> 0, ” ” & Terbilang(satuan), “”)
Case 100 To 199
huruf = “Seratus” & IIf(angka Mod 100 <> 0, ” ” & Terbilang(angka Mod 100), “”)
Case 200 To 999
huruf = Terbilang(angka \ 100) & ” Ratus” & IIf(angka Mod 100 <> 0, ” ” & Terbilang(angka Mod 100), “”)
Case 1000 To 1999
huruf = “Seribu” & IIf(angka Mod 1000 <> 0, ” ” & Terbilang(angka Mod 1000), “”)
Case 2000 To 999999
huruf = Terbilang(angka \ 1000) & ” Ribu” & IIf(angka Mod 1000 <> 0, ” ” & Terbilang(angka Mod 1000), “”)
Case 1000000 To 999999999
huruf = Terbilang(angka \ 1000000) & ” Juta” & IIf(angka Mod 1000000 <> 0, ” ” & Terbilang(angka Mod 1000000), “”)
End Select
Terbilang = huruf
End Function
Kode di atas akan mengkonversi angka dalam bentuk terbilang. Fungsi akan mengkonversi angka hingga 999.999.999 menjadi bahasa Indonesia yang mudah dimengerti.
Sekarang, kita sudah mengetahui cara membuat fungsi sendiri dengan referensi di VBA Excel. Selain itu, kita juga sudah melihat beberapa contoh fungsi yang dapat kita gunakan.
Untuk lebih memahami penggunaan VBA dalam Excel, Anda dapat menambahkan fitur-fitur baru pada Excel Anda dan mengunduh kode VBA yang sama seperti yang telah dijelaskan pada artikel ini.
FAQ:
1. Bagaimana cara mengubah parameter pada fungsi yang telah dibuat?
Jawaban: Untuk mengubah parameter pada fungsi yang telah dibuat, Anda perlu mengubah kode VBA pada editor. Kemudian, menyimpan kode tersebut dan kembali ke Excel untuk mengakses fungsi yang telah diperbarui.
2. Apakah kita perlu mengetahui syntax VBA untuk membuat fungsi sendiri?
Jawaban: Ya, Anda perlu mengetahui syntax VBA untuk membuat fungsi sendiri. Tanpa pengetahuan syntax VBA, sangat sulit untuk membuat fungsi yang benar dan terstruktur dengan baik. Namun, syntax VBA dapat dipelajari dengan mudah melalui berbagai tutorial dan sumber daya online.
Untuk lebih memahami penggunaan VBA dalam Excel, Anda juga dapat menyaksikan video tutorial berikut:
https://www.youtube.com/watch?v=DsV9eyyGZSs
Video di atas akan memberikan contoh nyata tentang bagaimana membuat fungsi sendiri dengan referensi di VBA Excel dan bagaimana menggunakannya di Excel. Tutorial ini akan membantu Anda untuk memahami konsep VBA dengan lebih baik dan menambahkan fitur-fitur baru pada Excel.
