...

Cara Membuat Rumus Terbilang di Excel

Pendidikan

Halo, pembaca yang budiman! Apakah Anda pernah kesulitan dalam mengonversi angka ke dalam kata-kata saat membuat laporan keuangan atau dokumen penting lainnya di Excel? Jangan khawatir, karena di artikel ini saya akan memberikan cara membuat rumus terbilang di Excel yang mudah dan praktis. Dengan menggunakan rumus ini, Anda dapat menghemat waktu dan memudahkan proses mengonversi angka ke dalam kata-kata. Mari simak artikel ini secara detail dan pastikan untuk mencoba sendiri rumus terbilang di Excel.

Cara Membuat Rumus Terbilang di Excel

Mengapa Membuat Rumus Terbilang di Excel Penting

Membuat rumus terbilang di Excel dapat memberikan banyak manfaat, terutama untuk keperluan bisnis atau pekerjaan yang membutuhkan presentasi data secara profesional. Berikut adalah beberapa alasan mengapa membuat rumus terbilang di Excel penting:

Memudahkan Pembacaan Data

Saat kita melihat sebuah angka di lembaran Excel, terkadang sulit bagi kita untuk mengubahnya menjadi bentuk kalimat atau terbilang. Dengan membuat rumus terbilang di Excel, angka-angka tersebut dapat diubah menjadi kata-kata, sehingga lebih mudah dibaca dan dipahami oleh pembaca. Dalam hal keuangan atau akuntansi, rumus terbilang juga dapat membantu untuk menghindari kesalahan penulisan atau interpretasi data.

Meningkatkan Profesionalitas Dokumen

Dalam dunia bisnis, seringkali data harus dipresentasikan dalam bentuk grafik atau tabel. Pembaca akan memberikan nilai yang lebih pada dokumen yang terlihat profesional dan mudah dipahami. Dengan menggunakan rumus terbilang di Excel, kita dapat menambahkan elemen profesionalitas dan atensi pada presentasi data yang dibuat. Ini juga dapat membantu meningkatkan citra perusahaan atau organisasi kita.

Meningkatkan Produktivitas

Salah satu keuntungan utama dari menggunakan rumus terbilang di Excel adalah meningkatkan produktivitas. Tanpa rumus terbilang, kita harus mengalih-kan data dari Excel ke program pengolah kata untuk mengubah angka menjadi terbilang, dan kemudian menyalin hasilnya kembali ke Excel. Dengan menggunakan rumus terbilang di Excel, kita dapat menghemat waktu dan meluangkan lebih banyak waktu untuk fokus pada hal-hal lain yang penting dalam pekerjaan kita.

Cara Membuat Rumus Terbilang di Excel

Untuk membuat rumus terbilang di Excel, pertama-tama, kita perlu mengimpor modul VBA yang disebut sebagai “SpellNumber”. Modul ini dapat diunduh secara gratis dari banyak sumber online. Setelah mengimpor modul tersebut, langkah-langkah selanjutnya adalah sebagai berikut:

  1. Masukkan angka yang ingin kita ubah menjadi terbilang di lembar kerja Excel.
  2. Klik pada cell kosong di lembar kerja Excel yang telah tersedia
  3. Pilih “Alt + F11” untuk membuka Visual Basic Editor
  4. Pada menu bar, klik “Insert”, lalu pilih “Module”
  5. Salin kode VBA di bawah ini ke dalam modul

Function SpellNumber(ByVal MyNumber)
Dim Dollars, Cents, Temp
Dim DecimalPlace, Count
ReDim Place(9) As String
Place(2) = " ribu "
Place(3) = " juta "
Place(4) = " miliar "
Place(5) = " triliun "
MyNumber = Trim(Str(MyNumber))
DecimalPlace = InStr(MyNumber, ".")
If DecimalPlace > 0 Then
Cents = GetTens(Left(Mid(MyNumber, DecimalPlace + 1) & _
"00", 2))
MyNumber = Trim(Left(MyNumber, DecimalPlace - 1))
End If
Count = 1
Do While MyNumber <> ""
Temp = GetHundreds(Right(MyNumber, 3))
If Temp <> "" Then Dollars = Temp & Place(Count) & DollarsIf Len(MyNumber) > 3 ThenMyNumber = Left(MyNumber, Len(MyNumber) - 3)ElseMyNumber = ""
End If
Count = Count + 1
Loop
Select Case Dollars
Case ""
Dollars = "nol rupiah saja"
Case "satu"
Dollars = "satu rupiah"
Case Else
Dollars = Dollars & " rupiah"
End Select
Select Case Cents
Case ""
Cents = " dan nol sen saja"
Case "satu"
Cents = " dan satu sen"
Case Else
Cents = " dan " & Cents & " sen saja"
End Select
SpellNumber = Dollars & Cents
End Functionfunction GetHundreds(ByVal MyNumber)
Dim Result As String
If Val(MyNumber) = 0 Then Exit Function
MyNumber = Right("000" & MyNumber, 3)
If Mid(MyNumber, 1, 1) <> "0" Then
Result = GetDigit(Mid(MyNumber, 1, 1)) & " ratus "
End If
If Mid(MyNumber, 2, 1) <> "0" Then
Result = Result & GetTens(Mid(MyNumber, 2))
Else
Result = Result & ""
End If
If Mid(MyNumber, 3, 1) <> "0" Then
Result = Result & GetDigit(Mid(MyNumber, 3))
Else
Result = Result & ""
End If
GetHundreds = Result
End Functionfunction GetTens(TensText)
Dim Result As String
Result = ""If Val(Left(TensText, 1)) = 1 Then
Select Case Val(TensText)
Case 10: Result = "sepuluh"
Case 11: Result = "sebelas"
Case 12: Result = "dua belas"
Case 13: Result = "tiga belas"
Case 14: Result = "empat belas"
Case 15: Result = "lima belas"
Case 16: Result = "enam belas"
Case 17: Result = "tujuh belas"
Case 18: Result = "delapan belas"
Case 19: Result = "sembilan belas"
Case Else
End Select
Else
Select Case Val(Left(TensText, 1))
Case 2: Result = "dua puluh "
Case 3: Result = "tiga puluh "
Case 4: Result = "empat puluh "
Case 5: Result = "lima puluh "
Case 6: Result = "enam puluh "
Case 7: Result = "tujuh puluh "
Case 8: Result = "delapan puluh "
Case 9: Result = "sembilan puluh "
Case Else
End Select
Result = Result & GetDigit _
(Right(TensText, 1))
End If
GetTens = Result
End Functionfunction GetDigit(Digit)
Select Case Val(Digit)
Case 1: GetDigit = "satu"
Case 2: GetDigit = "dua"
Case 3: GetDigit = "tiga"
Case 4: GetDigit = "empat"
Case 5: GetDigit = "lima"
Case 6: GetDigit = "enam"
Case 7: GetDigit = "tujuh"
Case 8: GetDigit = "delapan"
Case 9: GetDigit = "sembilan"
Case Else: GetDigit = ""
End Select
End Function
  1. Kembali ke lembar kerja Excel, dan ketikkan “=spellnumber(A1)” di cell yang telah dipilih sebelumnya.
  2. Hasilnya akan muncul di kolom baru dan telah berubah menjadi terbilang.

Dengan menggunakan rumus terbilang di Excel, kita dapat meningkatkan profesionalitas dokumen, memudahkan pembacaan data, dan meningkatkan produktivitas kerja. Jangan ragu untuk mencoba membuat rumus terbilang di Excel untuk proyek Anda berikutnya.

Cara Membuat Rumus Terbilang di Excel

Membuat rumus terbilang di Excel sangatlah mudah. Anda hanya perlu mengetahui rumus sederhana yang dapat mengubah angka menjadi kalimat terbilang. Berikut cara membuatnya:

Langkah 1: Buka Dokumen Excel

Untuk membuat rumus terbilang di Excel, pertama-tama Anda harus membuka dokumen Excel terlebih dahulu. Anda dapat membuat dokumen baru atau membuka dokumen yang sudah ada.

Langkah 2: Tulis Rumus TERBILANG(Cell)

Setelah dokumen Excel terbuka, langkah selanjutnya adalah menuliskan rumus TERBILANG(Cell) pada cell yang akan diubah menjadi kalimat terbilang. Anda dapat menggunakan huruf kecil atau huruf besar untuk menulis rumus tersebut.

Rumus TERBILANG(Cell) berguna untuk mengubah angka menjadi kalimat terbilang. Di sini, “Cell” mengacu pada sel yang berisi angka yang ingin diubah menjadi kalimat terbilang.

Langkah 3: Masukkan Nomor yang Ingin diubah menjadi Kalimat Terbilang pada Cell yang Dimaksud

Setelah menuliskan rumus TERBILANG(Cell), langkah terakhir adalah memasukkan angka yang ingin diubah menjadi kalimat terbilang pada cell yang dimaksud. Anda dapat memasukkan angka tersebut secara manual atau memasukkannya melalui rumus.

Jika Anda ingin memasukkan angka secara manual, cukup klik pada cell yang dimaksud dan ketik angka tersebut pada keyboard. Namun, jika Anda ingin memasukkan angka melalui rumus, maka Anda harus mengetik rumus tersebut pada cell yang berbeda.

Sebagai contoh, jika angka yang ingin diubah menjadi kalimat terbilang adalah 100, maka rumus TERBILANG(Cell) akan menjadi =TERBILANG(A1) jika angka tersebut dimasukkan pada cell A1.

Dengan begitu, angka 100 akan diubah menjadi “seratus” di cell yang sama.

Penutup

Demikianlah cara membuat rumus terbilang di Excel. Dengan menggunakan rumus TERBILANG(Cell), Anda dapat dengan mudah mengubah angka menjadi kalimat terbilang dalam bahasa Indonesia. Semoga artikel ini dapat membantu Anda dalam mengolah data di Excel.

© Copyright 2023, infokemendikbud.com