
Tiga hari yang lalu, seorang teman menghubungi saya lewat telepon, bertanya tentang formula untuk mengubah sebuah angka menjadi teks. Dia ingin mengubah, misalnya, angka 145 menjadi seratus empat puluh lima. Seperti tulisan “terbilang” yang ada di kuitansi-kuitansi.
Saya ingat, dulu saya pernah membuat sebuah macro di Excel yang berfungsi seperti ini. Sebenarnya, macro ini aslinya untuk teks berbahasa Inggris (saya lupa dapat dari mana1), kemudian saya mengubahnya menjadi berbahasa Indonesia. Karena adanya perbedaan struktur bahasa, tentu saja perubahan ini menjadi tidak sekadar hanya menerjemahkan.
Silakan unduh kodenya—hasil ubekan dari tumpukan file. Anda tinggal memasukkannya ke bagian module di MS Visual Basic pada berkas Excel Anda. Di worksheet, Anda bisa memanggil fungsi ini dengan menulis =terbilang(x). Angka x dapat Anda isikan langsung, atau dapat pula merupakan referensi ke sel lain.
Tambahan (23-04-2007). Bagi Anda yang kesulitan menerapkan macro ini, berikut adalah petunjuk singkatnya.
- Setelah berkas (file) di atas Anda unduh, bukalah dengan aplikasi pembaca teks. WordPad, misalnya.
- Bukalah berkas Excel yang baru, atau berkas milik Anda yang ingin ditambahi kode ini.
- Pergilah ke Tools > Macro > Visual Basic Editor. Langkah ini dapat pula Anda tempuh dengan menekan Alt + F11. Langkah ini akan membuka satu jendela khusus untuk Visual Basic Editor.
- Di bagian VBAProject di panel sebelah kiri, klik-kanan ThisWorkbook > Insert > Module.
- Di bagian kosong yang terbuka di bagian kanan, tuliskan kode macro yang tadi dibuka di WordPad. Silakan salin-dan-tempel.
- Kembalilah ke jendela Excel Anda, dan cobalah tuliskan formula terbilang di salah satu sel. Misalnya, tulislah
=terbilang(123)maka hasilnya akan berupa tulisanseratus dua puluh tiga rupiah. Anda juga dapat menulis formula dengan=terbilang(B3), misalnya, dan sel B3 berisi angka yang ingin dibuat teks.
Perhatian. Bila macro di aplikasi Excel Anda tidak dapat dijalankan, periksalah bagian Macro security. Pergilah ke Tools > Options…, klik tab Security lalu klik tombol Macro Security di bagian bawah. Ubah pilihan Security level ke Medium (disarankan) atau Low.
Pembaruan. Pengecekan bilangan negatif ditambahkan. Bilangan negatif akan dibaca minus sekian sekian.
19-12-2007. Berkas add-ins untuk fungsi terbilang tersedia untuk diunduh. Terima kasih agus untuk sarannya.
Add-Ins untuk Fungsi Terbilang
Untuk mengaktifkan add-ins ini, simpan berkas .xla yang sudah Anda unduh di komputer Anda. Di Excel, pergilah ke menu Tools > Add-Ins…. Di kotak Add-Ins yang terbuka, klik tombol Browse… dan arahkan ke berkas .xla yang Anda miliki. Add-ins untuk fungsi terbilang kini tampak dalam daftar. Centang kotaknya lalu klik tombol OK. Anda sekarang dapat menggunakan fungsi ini di semua dokumen Excel yang Anda buka.
- Sepertinya sih dari Microsoft KB [↩]
Tags: download, excel, macro, tips
Entri yang Mungkin Terkait
- Excel: Macro dan Conditional Formatting
- Ekstensi yang Saya Pakai di Firefox
- Macro Excel Pengganti VLookup
- Mengatur Tampilan Foto Flickr di Blog
- Mencari Nama Hari dari Sebuah Tanggal di Excel
Komentar. Silakan berikan komentar Anda. Beberapa tag HTML diperbolehkan. Anda juga dapat mendaftar di Gravatar untuk menampilkan foto Anda.
-
anda membuat saya selangkah lebih pandai. semoga menjadi amal jariyah buat saudara dan semoga berguna bagi yang menggunakannya. trims bro.
-
untuk menghilangkan rupiahnya gimana?
-
Makasih atas informasi gratisnya.
Semoga jadi amal baik dan mendapat balasannya.
Mamun A
-
thanks.. semoga sukses selalu
-
top banget terima kasih!!!! baaannyaaaak!!
-
Pak Priyatna yang baik, saya pingin nanya. Saya menggunakan data excel 2007 sebagai sumber mailmerge. Yang menjadi maslah adalah data bilangan dalam format misal Rp. 100.000 tidak dapat ter-merge dengan baik di ms-word sehingga hanya tertulis 100000 tanpa ada titik ditengah.
Begitu pula dengan format ‘date’ misal di excel dalam format ‘date’ tertulis 4 Januari 2012 tapi setelah di-merge kembali ke 1/4/2012. Mohon pencerahan untuk masalah ini.
Terima kasih. -
miftach : untuk merubah angka tanpa koma. Ya kita pakai fungsi round, seperti contoh berikut: =round(A10)
setelah di round baru cell tersebut di =terbilang(A11) -
Alhamdulillah ……terima kasih…….. semoga ilmu yang bapak salurkan senantiasa mendapat pahala dan balasan yang setimpal serta bermanfaat selalu……. Amin..
-
Minta infonya pak… kalau untuk menampilkan bulan saja pada saat ini (misalnya sekarang bulan MARET) yang scara otomatis berganti tiap bulannya, di MS Visual Basic pada Excel gimana caranya pak…?
-
waaaahhhhh,,,, canggih bener… makasih banyak neh ilmunya,,,,
-
MasPri, mo nanya nich……gmn caranya agar kalo kita ngetik di excel : 10051980 di A1 trus munculnya di B1 menjadi 10 Mei 1980 (nama bulannya Indonesia)—–jadi rumusnya bgmna gtu?!
Makasih ya mas bantuannya…. -
Terima kasih banyak ya pak, ilmunya sangat bermanfaat
-
Alhamdulillah ……
terima kasih Sangat membantu
semoga apa yang telah bapakberikan senantiasa mendapat pahala dan balasan yang setimpal ……. Amin.. -
makasih banyak yah mas pri, tapi aku mau tau pengertian dari list programnya dan logikanya dong (baris perbarisnya), soalnya aku mau mempelajarinya lebih lanjut tidak hanya bisa copi doank.
trimakasih banyak aku mulai tertarik untuk memperlajari macro diexcel soalnya jadi penasaran nin, jawabannya saya tunggu secepatnya yah… -
terima kasih…., sungguh luar biasa anda sangat membantu…
sukses selalu…! -
Mau tanya untuk mengganti fungsi sumproduct menggunakan macro gimana pak…? Makasih udah di perhatikan. Kalu sudah dapat solusinya bisakah kirim ke imail saya pak…??? Terimakasih atas Semuanya,….
‹ Previous · 1 · ... · 3 · 4 · 5









220 comments
Comments feed for this article
Trackback link: http://priatna.or.id/2006/03/20/macro-excel-mengubah-angka-menjadi-teks/trackback/