Documents
Resources
Learning Center
Upload
Plans & pricing Sign in
Sign Out

Membuat Fungsi Terbilang Pada Exel

VIEWS: 618 PAGES: 6

Membuat Fungsi Terbilang Pada Exel

More Info
									Membuat Fungsi Terbilang Excel

Ari Fadli
fadli.te.unsoed@gmail.com
http://fadli84.wordpress.com


 Lisensi Dokumen:
 Copyright © 2003-2009 IlmuKomputer.Com
 Seluruh dokumen di IlmuKomputer.Com dapat digunakan, dimodifikasi dan disebarkan secara bebas
 untuk tujuan bukan komersial (nonprofit), dengan syarat tidak menghapus atau merubah atribut penulis
 dan pernyataan copyright yang disertakan dalam setiap dokumen. Tidak diperbolehkan melakukan
 penulisan ulang, kecuali mendapatkan ijin terlebih dahulu dari IlmuKomputer.Com.




Pada tulisan kali ini penulis akan sedikit berbagi ilmu mengenai membuat fungsi
terbilang dalam Microsoft Office Excel. Microsoft Office Excel yang digunakan penulis
kali ini Microsoft Office Excel 2007 (Penulis pun pernah mencobanya di Microsoft
Office Excel 2003), untuk membuat fungsi ini di Microsoft Excel caranya sebagai
berikut :


Pendahuluan
Microsoft Excel atau Microsoft Office Excel adalah sebuah program aplikasi lembar
kerja spreadsheet yang dibuat dan didistribusikan oleh Microsoft Corporation untuk
sistem operasi Microsoft Windows dan Mac OS. Aplikasi ini memiliki fitur kalkulasi
dan pembuatan grafik yang, dengan menggunakan strategi marketing Microsoft yang
agresif, menjadikan Microsoft Excel sebagai salah satu program komputer yang populer
digunakan di dalam komputer mikro hingga saat ini. Bahkan, saat ini program ini
merupakan program spreadsheet paling banyak digunakan oleh banyak pihak, baik di
platform PC berbasis Windows maupun platform Macintosh berbasis Mac OS,
semenjak versi 5.0 diterbitkan pada tahun 1993. Aplikasi ini merupakan bagian dari
Microsoft Office System, dan versi terakhir adalah versi Microsoft Office Excel 2007
yang diintegrasikan di dalam paket Microsoft Office System 2007




Komunitas eLearning IlmuKomputer.Com                                                              1
Copyright © 2003-2009 IlmuKomputer.Com
Langkah demi langkah membuat fungsi terbilang
Sebelum anda dapat membuat fungsi terbilang dalam Microsoft Office Excel ada
beberapa hal yang harus anda siapkan terlebih dahulu :
  1. Pastikan dalam komputer anda telah terisntal Microsoft Office Excel
  2. Jalankan Microsoft Office Excel seperti tampak pada gambar 1




                         gambar 1. Menjalankan Microsoft Office Excel




Komunitas eLearning IlmuKomputer.Com                                       2
Copyright © 2003-2009 IlmuKomputer.Com
Setelah jendela Microsoft Office Excel, tampak maka perhatikan dan ikutilah langkah-
langkah dalam membuat fungsi terbilang dalam Microsoft Office Excel berikut ini :


Langkah 1
Buatlah sebuah dokumen baru, atau dokumen lama yang telah ada, yang ingin anda
tambahkan sebuah fungsi terbilang.


Langkah 2
Kemudian buka Microsoft Visual Basic Editor dari menu Tools > Macro > Visual
Basic Editor atau langsung tekan tombol Alt + F11 (seperti tampak pada gambar 2
dibawah ini) :




                             gambar 2. Jendela Visual Basic Editor




Komunitas eLearning IlmuKomputer.Com                                                3
Copyright © 2003-2009 IlmuKomputer.Com
Langkah 3
Buat sebuah Module baru dengan cara klik menu Insert  Module kemudian
tambahkan script berikut.

 Function Terbilang(n As Long) As String „max 2.147.483.647
 Dim satuan As Variant
 On Error GoTo terbilang_error
 satuan = Array(“”, “Satu”, “Dua”, “Tiga”, “Empat”, “Lima”, “Enam”, “Tujuh”, “Delapan”,
 “Sembilan”, “Sepuluh”, “Sebelas”)
 Select Case n
 Case 0 To 11
 Terbilang = ” ” + satuan(Fix(n))
 Case 12 To 19
 Terbilang = Terbilang(n Mod 10) + ” Belas”
 Case 20 To 99
 Terbilang = Terbilang(Fix(n / 10)) + ” Puluh” + Terbilang(n Mod 10)
 Case 100 To 199
 Terbilang = ” Seratus” + Terbilang(n – 100)
 Case 200 To 999
 Terbilang = Terbilang(Fix(n / 100)) + ” Ratus” + Terbilang(n Mod 100)
 Case 1000 To 1999
 Terbilang = ” Seribu” + Terbilang(n – 1000)
 Case 2000 To 999999
 Terbilang = Terbilang(Fix(n / 1000)) + ” Ribu” + Terbilang(n Mod 1000)
 Case 1000000 To 999999999
 Terbilang = Terbilang(Fix(n / 1000000)) + ” Juta” + Terbilang(n Mod 1000000)
 Case Else
 Terbilang = Terbilang(Fix(n / 1000000000)) + ” Milyar” + Terbilang(n Mod 1000000000)
 End Select
 Exit Function
 terbilang_error:
 MsgBox Err.Description, vbCritical, “^_^Terbilang Error”
 End Function

                              gambar 3. Screen awal proses instalasi




                    gambar 4. Tanda masih ada error dalam penulisan scriptnya


Komunitas eLearning IlmuKomputer.Com                                                      4
Copyright © 2003-2009 IlmuKomputer.Com
Langkah 4
Jika dalam Visual Basis Editor anda masih ditemui error maka akan tampak seperti
gambar 4 diatas, tanda warna merah pada tulisan menandakan adanya kesalahan pada
script yang anda masukan. Jika semuanya sudah benar, maka tutup kembali Visual Basis
Editor dan kembali ke lembar kerja excel, coba ketikkan angka sembarang di sembarang
tempat. Misal di cell F5 ketikkan 1200120 (nb : Maksimal 2147483647), kemudian
lakukan seperti tampak pada gambar 5




                               gambar 5. Hasil fungsi terbilang


Atau jika anda bingung cara memasukkan Function diatas perhatikan langkahnya
berikut ini (lihat gambar 6 dibawah ini) :




                               gambar 6. Insert fungsi terbilang




Komunitas eLearning IlmuKomputer.Com                                             5
Copyright © 2003-2009 IlmuKomputer.Com
Penutup
Akhir kata penulis berharap semoga tulisan ini bermanfaat bagi setiap pembacanya, dan
Tidak mungkin kita mencapai keberhasilan usaha tanpa sebuah kerja keras dan jangan
lupa pula mulailah hidupmu dari mimpimu, karena dengan mimpi yang ada dalam
pikiranmu kau bisa menaklukan dunia. Sebelum dan sesudahnya penulis juga ingin
mengucapkan terima kasih pada Komunitas Ilmukomputer.com terutama pada
pak Romi yang sudah mengexplore tulisan saya dan harapan saya kedepan saya bisa
menjadi penulis tetap di ilmukomputer.com ini, sampai jumpa di episode lain dari
tulisan saya, terima kasih.

Referensi
http://id.wikipedia.org/wiki/Microsoft_Excel


Biografi Penulis
                      Ari Fadli, Lahir di Cirebon, 31 Juli 1984. Menamatkan SMU di
                      SMU Negeri 4 Cirebon. Menyelesaikan program S1 dari Jurusan
                      Teknik Program Studi Teknik Elektro, Universitas Jenderal
                      Soedirman Puwokerto pada tahun 2007. Saat ini menjadi dosen di
                      Jurusan Teknik Program Studi Teknik Elektro, Universitas
                      Jenderal Soedirman Puwokerto. Kompetensi awalnya adalah
                      bidang basis data, sistem informasi, sistem pakar dan saat ini
                      sedang bergerak ke arah open source


.




Komunitas eLearning IlmuKomputer.Com                                              6
Copyright © 2003-2009 IlmuKomputer.Com

								
To top