Salah satu cara bagaimana menerjemahkan angka ke dalam kata-kata ( Terbilang ) dengan Visual Basic for Application yang juga dikenal sebagai Macro. Ada banyak cara dan juga banyak
Fungsi tersebut akan berguna :
Fungsi tersebut akan berguna :
- Menerjemahkan angka ke dalam kata-kata sampai dengan 15 digit termasuk nilai desimal ( Ratusan Trilian apabila tanpa nilai Desimal ). Angka 15 digit ini merupakan nilai yang dapat ditampung MS Excel sebelum dirubah ke nilai Exponen.
- Desimal yang diterjemahkan sampai dengan dua angka dibelakang koma.
Langkah-langkanya adalah :
- Buka aplikasi MS Excel, Pada Workbook baru pada Sheet mana saja pilih Menu Tools » Macro » Visual Basic Editor atau dengan Shortcut "Alt + F11", akan muncul tampilan seperti gambar dibawah ini.
- Click Menu Insert » Module. Pada Module yang baru dibuat Copy & Paste-kan list program yang sudah saya sediakan di bawah.
- Setelah anda selesai meng-copy click File » Close and Return to Microsoft Excel untuk kembali ke Workbook MS Excel.
- Simpan Workbook tersebut, misalnya dengan nama File Terbilang. Kemuadian pada isian Save As Type pilih Microsoft Excel Add-In (*.xla). Secara default folder yang terbuka untuk menyimpan File type Add-In ini berada pada C:WINDOWS\Aplication Data\Microsoft\AddIns, dan File yang disimpan akan berekstensi Terbilang.xla.
- Setelah anda menyimpannya, tutup MS Excel dan buka kembali dengan Workbook baru.
- Pada Workbook baru tersebut pilih Menu Tools » Add-Ins, Akan muncul dialog box seperti gambar dibawah ini, kemudian aktifkan tanda checkbox pada nama File "Terbilang" yang anda simpan tadi, kemudian Click OK.
- Pada Workbook baru ini, anda sudah dapat menggunakan fungsi Terbilang, begitu pula saat anda nanti membuat File/Workbook baru.
- Anda dapat menonaktifkan Add-In ini dengan menghilangkan tanda checkbox seperti tersbut di atas.
- Sekarang anda dapat mencoba fungsi tersebut dalam Sheet mana saja dalam Workbook tersebut. Misalnya anda ketikan pada Cell B3 angka Rp 100.000.000, Pilih Cell yang akan menampung terjemahan kata-katanya, misalnya di B5.
- Untuk penulisan rumus secara lansung dengan Formula =Terbilang(Cels) » Enter, atau pilih Insert » Function, dari daftar dalam Function Category, pilihlah User Defined, sehingga dalam daftar di Function name muncul nama fungsi Terbilang.
Selamat mencoba...!
Password : www.sqoatydhent.blogspot.com
0 Comments
