{"id":162,"date":"2025-08-16T07:12:02","date_gmt":"2025-08-16T07:12:02","guid":{"rendered":"https:\/\/www.warunginter.net\/2017\/08\/pengertian-rumus-terbilang-dan-cara-menampilkan-tab-developer.html"},"modified":"2025-08-16T07:12:02","modified_gmt":"2025-08-16T07:12:02","slug":"pengertian-rumus-terbilang-dan-cara-menampilkan-ta","status":"publish","type":"post","link":"https:\/\/flycai.warunginter.net\/?p=162","title":{"rendered":"Pengertian Rumus Terbilang dan Cara Menampilkan Tab Developer Pada Microsoft Excel"},"content":{"rendered":"<div class=\"post-body entry-content\" id=\"post-body-6016734593291677938\">\n<div class=\"post-body-artikel\">\nMasih banyak perusahaan dan sekolahan yang masih menggunakan Microsoft Excel sebagai media transaksi dan juga pembelajaran. Terkadang kita sering menjumpai angka yang harus diubah menjadi huruf, contohnya Rp. 600.000 akan menjadi Enam ratus ribu rupiah.<br \/>\n\u00a0 <br \/>\nSebenarnya bisa dilakukan secara manual, tapi coba bayangkan jika kantor atau sekolahan mu membutuhkan banyak data, apa efesian jika di input satu &#8211; persatu??? Tidak kan, pastnya akan memakan waktu banyak.<\/p>\n<div class=\"separator\" style=\"clear: both; text-align: center;\">\n<a href=\"https:\/\/flycai.warunginter.net\/wp-content\/uploads\/2026\/06\/rumusterbilang.png\" imageanchor=\"1\" style=\"margin-left: 1em; margin-right: 1em;\"><img loading=\"lazy\" decoding=\"async\" border=\"0\" data-original-height=\"503\" data-original-width=\"840\" height=\"238\" src=\"https:\/\/flycai.warunginter.net\/wp-content\/uploads\/2026\/06\/rumusterbilang.png\" width=\"400\"\/><\/a><\/div>\n<p>Untuk itu admin akan menjelaskan cara efesien agar data otomatis menjadi huruf yaitu dengan rumus terbilang, untuk menggunakan rumus terbilang kamu harus menambahkan script di Visual Basic nantinya.<br \/>\n<b>Baca Juga :<\/b> <a href=\"http:\/\/www.warunginter.net\/2017\/08\/cara-membuat-kwitansi-dengan-menggunakan-microsoft-excel.html\">Cara Membuat Format Kwitansi Pada Microsoft Excel<\/a><\/p>\n<div class=\"separator\" style=\"clear: both; text-align: center;\">\n<\/div>\n<div class=\"separator\" style=\"clear: both; text-align: center;\">\n<\/div>\n<table align=\"center\" cellpadding=\"0\" cellspacing=\"0\" class=\"tr-caption-container\" style=\"margin-left: auto; margin-right: auto; text-align: center;\">\n<tbody>\n<tr>\n<td style=\"text-align: center;\"><a href=\"https:\/\/flycai.warunginter.net\/wp-content\/uploads\/2026\/06\/viewkode.png\" imageanchor=\"1\" style=\"margin-left: auto; margin-right: auto;\"><img loading=\"lazy\" decoding=\"async\" border=\"0\" data-original-height=\"346\" data-original-width=\"453\" height=\"244\" src=\"https:\/\/flycai.warunginter.net\/wp-content\/uploads\/2026\/06\/viewkode.png\" width=\"320\"\/><\/a><\/td>\n<\/tr>\n<tr>\n<td class=\"tr-caption\" style=\"text-align: center;\">View Code<\/td>\n<\/tr>\n<\/tbody>\n<\/table>\n<div class=\"separator\" style=\"clear: both; text-align: center;\">\n<\/div>\n<div class=\"separator\" style=\"clear: both; text-align: center;\">\n<\/div>\n<table align=\"center\" cellpadding=\"0\" cellspacing=\"0\" class=\"tr-caption-container\" style=\"margin-left: auto; margin-right: auto; text-align: center;\">\n<tbody>\n<tr>\n<td style=\"text-align: center;\"><a href=\"https:\/\/flycai.warunginter.net\/wp-content\/uploads\/2026\/06\/tabdeveloperdiexcel.png\" imageanchor=\"1\" style=\"margin-left: auto; margin-right: auto;\"><img loading=\"lazy\" decoding=\"async\" border=\"0\" data-original-height=\"577\" data-original-width=\"971\" height=\"190\" src=\"https:\/\/flycai.warunginter.net\/wp-content\/uploads\/2026\/06\/tabdeveloperdiexcel.png\" width=\"320\"\/><\/a><\/td>\n<\/tr>\n<tr>\n<td class=\"tr-caption\" style=\"text-align: center;\">Tab Developer<\/td>\n<\/tr>\n<\/tbody>\n<\/table>\n<div class=\"separator\" style=\"clear: both; text-align: center;\">\n<\/div>\n<p>Agar kamu bisa mengakses Visual Basic\u00a0 ada 2 cara, yang pertama kamu bisa klik kanan di sheet yang kamu ingin tambahkan script Terbilang kemudian pilih view kode. Yang kedua kamu bisa pilih Tab Developer kemudian pilih Visual Basic. Jika sudah masuk ke Visual Basic klik insert -&gt; pilih module dan masukan script dibawah ini.<\/p>\n<p><\/p>\n<pre>'Fungsi Terbilang dengan VBA untuk MS Office\n\n'Ditulis oleh maseko\n\n\n\n'Fungsi penterjemahan masing-masing angka\n\nPrivate Function KeKata(Nomor)\n\nTrjKata = Array(\"\", \"satu\", \"dua\", \"tiga\", \"empat\", \"lima\", \"enam\", \"tujuh\", \"delapan\", \"sembilan\")\n\nKeKata = TrjKata(Nomor)\n\nEnd Function\n\n\n\n'Mulai penulisan Fungsi Terbilang\n\nPublic Function terbilang(Nilai_Angka, Optional Style = 4, Optional Satuan = \"\")\n\nAngka = Fix(Abs(Nilai_Angka))\n\n'Desimal dibelakang koma\n\ndes1 = Mid(Abs(Nilai_Angka), Len(Angka) + 2, 1)\n\ndes2 = Mid(Abs(Nilai_Angka), Len(Angka) + 3, 1)\n\n\n\nIf des2 = \"\" Then\n\n\u00a0\u00a0\u00a0 If des1 = \"\" Or des1 = \"0\" Then\n\n\u00a0\u00a0\u00a0 Koma = \"\"\n\n\u00a0\u00a0\u00a0 Else\n\n\u00a0\u00a0\u00a0 Koma = \" koma \" &amp; KeKata(des1)\n\n\u00a0\u00a0\u00a0 End If\n\nElseIf des2 = \"0\" Then\n\n\u00a0\u00a0\u00a0 If des1 = \"0\" Then\n\n\u00a0\u00a0\u00a0 Koma = \"\"\n\n\u00a0\u00a0\u00a0 ElseIf des1 = \"1\" Then\n\n\u00a0\u00a0\u00a0 Koma = \" koma sepuluh\"\n\n\u00a0\u00a0\u00a0 Else\n\n\u00a0\u00a0\u00a0 Koma = \" koma \" &amp; KeKata(des1) &amp; \" puluh\"\n\n\u00a0\u00a0\u00a0 End If\n\nElse\n\n\u00a0\u00a0\u00a0 If des1 = \"0\" Then\n\n\u00a0\u00a0\u00a0 Koma = \" koma nol \" &amp; KeKata(des2)\n\n\u00a0\u00a0\u00a0 ElseIf des1 = \"1\" Then\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 If des2 = \"1\" Then\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 Koma = \" koma sebelas\"\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 Else\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 Koma = \" koma \" &amp; KeKata(des2) &amp; \" belas\"\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 End If\n\n\u00a0\u00a0\u00a0 Else\n\n\u00a0\u00a0\u00a0 Koma = \" koma \" &amp; KeKata(des1) &amp; \" puluh \" &amp; KeKata(des2)\n\n\u00a0\u00a0\u00a0 End If\n\nEnd If\n\n'Misahin Angka\n\nNo1 = Left(Right(Angka, 1), 1)\n\nNo2 = Left(Right(Angka, 2), 1)\n\nNo3 = Left(Right(Angka, 3), 1)\n\nNo4 = Left(Right(Angka, 4), 1)\n\nNo5 = Left(Right(Angka, 5), 1)\n\nNo6 = Left(Right(Angka, 6), 1)\n\nNo7 = Left(Right(Angka, 7), 1)\n\nNo8 = Left(Right(Angka, 8), 1)\n\nNo9 = Left(Right(Angka, 9), 1)\n\nNo10 = Left(Right(Angka, 10), 1)\n\nNo11 = Left(Right(Angka, 11), 1)\n\nNo12 = Left(Right(Angka, 12), 1)\n\nNo13 = Left(Right(Angka, 13), 1)\n\nNo14 = Left(Right(Angka, 14), 1)\n\nNo15 = Left(Right(Angka, 15), 1)\n\n'Satuan\n\nIf Len(Angka) &gt;= 1 Then\n\n\u00a0\u00a0\u00a0 If Len(Angka) = 1 And No1 = 1 Then\n\n\u00a0\u00a0\u00a0 Nomor1 = \"satu\"\n\n\u00a0\u00a0\u00a0 ElseIf Len(Angka) = 1 And No1 = 0 Then\n\n\u00a0\u00a0\u00a0 Nomor1 = \"Nol\"\n\n\u00a0\u00a0\u00a0 ElseIf No2 = \"1\" Then\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 If No1 = \"1\" Then\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 Nomor1 = \"sebelas\"\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 ElseIf No1 = \"0\" Then\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 Nomor1 = \"sepuluh\"\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 Else\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 Nomor1 = KeKata(No1) &amp; \" belas\"\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 End If\n\n\u00a0\u00a0\u00a0 \n\n\u00a0\u00a0\u00a0 Else\n\n\u00a0\u00a0\u00a0 Nomor1 = KeKata(No1)\n\n\u00a0\u00a0\u00a0 End If\n\nElse\n\nNomor1 = \"\"\n\nEnd If\n\n\n\n'Puluhan\n\nIf Len(Angka) &gt;= 2 Then\n\n\u00a0\u00a0\u00a0 If No2 = 1 Or No2 = \"0\" Then\n\n\u00a0\u00a0\u00a0 Nomor2 = \"\"\n\n\u00a0\u00a0\u00a0 Else\n\n\u00a0\u00a0\u00a0 Nomor2 = KeKata(No2) &amp; \" puluh \"\n\n\u00a0\u00a0\u00a0 End If\n\nElse\n\nNomor2 = \"\"\n\nEnd If\n\n'Ratusan\n\nIf Len(Angka) &gt;= 3 Then\n\n\u00a0\u00a0\u00a0 If No3 = \"1\" Then\n\n\u00a0\u00a0\u00a0 Nomor3 = \"seratus \"\n\n\u00a0\u00a0\u00a0 ElseIf No3 = \"0\" Then\n\n\u00a0\u00a0\u00a0 Nomor3 = \"\"\n\n\u00a0\u00a0\u00a0 Else\n\n\u00a0\u00a0\u00a0 Nomor3 = KeKata(No3) &amp; \" ratus \"\n\n\u00a0\u00a0\u00a0 End If\n\nElse\n\nNomor3 = \"\"\n\nEnd If\n\n'Ribuan\n\nIf Len(Angka) &gt;= 4 Then\n\n\u00a0\u00a0\u00a0 If No6 = \"0\" And No5 = \"0\" And No4 = \"0\" Then\n\n\u00a0\u00a0\u00a0 Nomor4 = \"\"\n\n\u00a0\u00a0\u00a0 ElseIf (No4 = \"1\" And Len(Angka) = 4) Or (No6 = \"0\" And No5 = \"0\" And No4 = \"1\") Then\n\n\u00a0\u00a0\u00a0 Nomor4 = \"seribu \"\n\n\u00a0\u00a0\u00a0 ElseIf No5 = \"1\" Then\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 If No4 = \"1\" Then\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 Nomor4 = \"sebelas ribu \"\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 ElseIf No4 = \"0\" Then\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 Nomor4 = \"sepuluh ribu \"\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 Else\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 Nomor4 = KeKata(No4) &amp; \" belas ribu \"\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 End If\n\n\n\n\u00a0\u00a0\u00a0 Else\n\n\u00a0\u00a0\u00a0 Nomor4 = KeKata(No4) &amp; \" ribu \"\n\n\u00a0\u00a0\u00a0 End If\n\nElse\n\nNomor4 = \"\"\n\nEnd If\n\n'Puluhan ribu\n\nIf Len(Angka) &gt;= 5 Then\n\n\u00a0\u00a0\u00a0 If No5 = \"1\" Or No5 = \"0\" Then\n\n\u00a0\u00a0\u00a0 Nomor5 = \"\"\n\n\u00a0\u00a0\u00a0 Else\n\n\u00a0\u00a0\u00a0 Nomor5 = KeKata(No5) &amp; \" puluh \"\n\n\u00a0\u00a0\u00a0 End If\n\nElse\n\nNomor5 = \"\"\n\nEnd If\n\n'Ratusan Ribu\n\nIf Len(Angka) &gt;= 6 Then\n\n\u00a0\u00a0\u00a0 If No6 = \"1\" Then\n\n\u00a0\u00a0\u00a0 Nomor6 = \"seratus \"\n\n\u00a0\u00a0\u00a0 ElseIf No6 = \"0\" Then\n\n\u00a0\u00a0\u00a0 Nomor6 = \"\"\n\n\u00a0\u00a0\u00a0 Else\n\n\u00a0\u00a0\u00a0 Nomor6 = KeKata(No6) &amp; \" ratus \"\n\n\u00a0\u00a0\u00a0 End If\n\nElse\n\nNomor6 = \"\"\n\nEnd If\n\n'Jutaan\n\nIf Len(Angka) &gt;= 7 Then\n\n\u00a0\u00a0\u00a0 If No9 = \"0\" And No8 = \"0\" And No7 = \"0\" Then\n\n\u00a0\u00a0\u00a0 Nomor7 = \"\"\n\n\u00a0\u00a0\u00a0 ElseIf No7 = \"1\" And Len(Angka) = 7 Then\n\n\u00a0\u00a0\u00a0 Nomor7 = \"satu juta \"\n\n\u00a0\u00a0\u00a0 ElseIf No8 = \"1\" Then\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 If No7 = \"1\" Then\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 Nomor7 = \"sebelas juta \"\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 ElseIf No7 = \"0\" Then\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 Nomor7 = \"sepuluh juta \"\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 Else\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 Nomor7 = KeKata(No7) &amp; \" belas juta \"\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 End If\n\n\n\n\u00a0\u00a0\u00a0 Else\n\n\u00a0\u00a0\u00a0 Nomor7 = KeKata(No7) &amp; \" juta \"\n\n\u00a0\u00a0\u00a0 End If\n\nElse\n\nNomor7 = \"\"\n\nEnd If\n\n'Puluhan juta\n\nIf Len(Angka) &gt;= 8 Then\n\n\u00a0\u00a0\u00a0 If No8 = \"1\" Or No8 = \"0\" Then\n\n\u00a0\u00a0\u00a0 Nomor8 = \"\"\n\n\u00a0\u00a0\u00a0 Else\n\n\u00a0\u00a0\u00a0 Nomor8 = KeKata(No8) &amp; \" puluh \"\n\n\u00a0\u00a0\u00a0 End If\n\nElse\n\nNomor8 = \"\"\n\nEnd If\n\n'Ratusan juta\n\nIf Len(Angka) &gt;= 9 Then\n\n\u00a0\u00a0\u00a0 If No9 = \"1\" Then\n\n\u00a0\u00a0\u00a0 Nomor9 = \"seratus \"\n\n\u00a0\u00a0\u00a0 ElseIf No9 = \"0\" Then\n\n\u00a0\u00a0\u00a0 Nomor9 = \"\"\n\n\u00a0\u00a0\u00a0 Else\n\n\u00a0\u00a0\u00a0 Nomor9 = KeKata(No9) &amp; \" ratus \"\n\n\u00a0\u00a0\u00a0 End If\n\nElse\n\nNomor9 = \"\"\n\nEnd If\n\n'Milyar\n\nIf Len(Angka) &gt;= 10 Then\n\n\u00a0\u00a0\u00a0 If No12 = \"0\" And No11 = \"0\" And No10 = \"0\" Then\n\n\u00a0\u00a0\u00a0 Nomor10 = \"\"\n\n\u00a0\u00a0\u00a0 ElseIf No10 = \"1\" And Len(Angka) = 10 Then\n\n\u00a0\u00a0\u00a0 Nomor10 = \"satu milyar \"\n\n\u00a0\u00a0\u00a0 ElseIf No11 = \"1\" Then\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 If No10 = \"1\" Then\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 Nomor10 = \"sebelas milyar \"\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 ElseIf No10 = \"0\" Then\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 Nomor10 = \"sepuluh milyar \"\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 Else\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 Nomor10 = KeKata(No10) &amp; \" belas milyar \"\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 End If\n\n\n\n\u00a0\u00a0\u00a0 Else\n\n\u00a0\u00a0\u00a0 Nomor10 = KeKata(No10) &amp; \" milyar \"\n\n\u00a0\u00a0\u00a0 End If\n\nElse\n\nNomor10 = \"\"\n\nEnd If\n\n'Puluhan Milyar\n\nIf Len(Angka) &gt;= 11 Then\n\n\u00a0\u00a0\u00a0 If No11 = \"1\" Or No11 = \"0\" Then\n\n\u00a0\u00a0\u00a0 Nomor11 = \"\"\n\n\u00a0\u00a0\u00a0 Else\n\n\u00a0\u00a0\u00a0 Nomor11 = KeKata(No11) &amp; \" puluh \"\n\n\u00a0\u00a0\u00a0 End If\n\nElse\n\nNomor11 = \"\"\n\nEnd If\n\n'Ratusan Milyar\n\nIf Len(Angka) &gt;= 12 Then\n\n\u00a0\u00a0\u00a0 If No12 = \"1\" Then\n\n\u00a0\u00a0\u00a0 Nomor12 = \"seratus \"\n\n\u00a0\u00a0\u00a0 ElseIf No12 = \"0\" Then\n\n\u00a0\u00a0\u00a0 Nomor12 = \"\"\n\n\u00a0\u00a0\u00a0 Else\n\n\u00a0\u00a0\u00a0 Nomor12 = KeKata(No12) &amp; \" ratus \"\n\n\u00a0\u00a0\u00a0 End If\n\nElse\n\nNomor12 = \"\"\n\nEnd If\n\n'Triliun\n\nIf Len(Angka) &gt;= 13 Then\n\n\u00a0\u00a0\u00a0 If No15 = \"0\" And No14 = \"0\" And No13 = \"0\" Then\n\n\u00a0\u00a0\u00a0 Nomor13 = \"\"\n\n\u00a0\u00a0\u00a0 ElseIf No13 = \"1\" And Len(Angka) = 13 Then\n\n\u00a0\u00a0\u00a0 Nomor13 = \"satu triliun \"\n\n\u00a0\u00a0\u00a0 ElseIf No14 = \"1\" Then\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 If No13 = \"1\" Then\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 Nomor13 = \"sebelas triliun \"\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 ElseIf No13 = \"0\" Then\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 Nomor13 = \"sepuluh triliun \"\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 Else\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 Nomor13 = KeKata(No13) &amp; \" belas triliun \"\n\n\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 End If\n\n\n\n\u00a0\u00a0\u00a0 Else\n\n\u00a0\u00a0\u00a0 Nomor13 = KeKata(No13) &amp; \" triliun \"\n\n\u00a0\u00a0\u00a0 End If\n\nElse\n\nNomor13 = \"\"\n\nEnd If\n\n'Puluhan triliun\n\nIf Len(Angka) &gt;= 14 Then\n\n\u00a0\u00a0\u00a0 If No14 = \"1\" Or No14 = \"0\" Then\n\n\u00a0\u00a0\u00a0 Nomor14 = \"\"\n\n\u00a0\u00a0\u00a0 Else\n\n\u00a0\u00a0\u00a0 Nomor14 = KeKata(No14) &amp; \" puluh \"\n\n\u00a0\u00a0\u00a0 End If\n\nElse\n\nNomor14 = \"\"\n\nEnd If\n\n'Ratusan triliun\n\nIf Len(Angka) &gt;= 15 Then\n\n\u00a0\u00a0\u00a0 If No15 = \"1\" Then\n\n\u00a0\u00a0\u00a0 Nomor15 = \"seratus \"\n\n\u00a0\u00a0\u00a0 ElseIf No15 = \"0\" Then\n\n\u00a0\u00a0\u00a0 Nomor15 = \"\"\n\n\u00a0\u00a0\u00a0 Else\n\n\u00a0\u00a0\u00a0 Nomor15 = KeKata(No15) &amp; \" ratus \"\n\n\u00a0\u00a0\u00a0 End If\n\nElse\n\nNomor15 = \"\"\n\nEnd If\n\n\n\nIf Len(Angka) &gt; 15 Then\n\nbilang = \"Digit Angka Terlalu Banyak\"\n\nElse\n\n\u00a0\u00a0\u00a0 If IsNull(Nilai_Angka) Then\n\n\u00a0\u00a0\u00a0 bilang = \"\"\n\n\u00a0\u00a0\u00a0 ElseIf Nilai_Angka &lt; 0 Then\n\n\u00a0\u00a0\u00a0 bilang = \"minus \" &amp; Trim(Nomor15 &amp; Nomor14 &amp; Nomor13 &amp; Nomor12 &amp; Nomor11 &amp; Nomor10 &amp; Nomor9 &amp; Nomor8 &amp; Nomor7 _\n\n\u00a0\u00a0\u00a0 &amp; Nomor6 &amp; Nomor5 &amp; Nomor4 &amp; Nomor3 &amp; Nomor2 &amp; Nomor1 &amp; Koma &amp; \" \" &amp; Satuan)\n\n\u00a0\u00a0\u00a0 Else\n\n\u00a0\u00a0\u00a0 bilang = Trim(Nomor15 &amp; Nomor14 &amp; Nomor13 &amp; Nomor12 &amp; Nomor11 &amp; Nomor10 &amp; Nomor9 &amp; Nomor8 &amp; Nomor7 _\n\n\u00a0\u00a0\u00a0 &amp; Nomor6 &amp; Nomor5 &amp; Nomor4 &amp; Nomor3 &amp; Nomor2 &amp; Nomor1 &amp; Koma &amp; \" \" &amp; Satuan)\n\n\u00a0\u00a0\u00a0 End If\n\nEnd If\n\nIf Style = 4 Then\n\nterbilang = StrConv(Left(bilang, 1), 1) &amp; StrConv(Mid(bilang, 2, 1000), 2)\n\nElse\n\nterbilang = StrConv(bilang, Style)\n\nEnd If\n\nterbilang = Replace(terbilang, \"\u00a0 \", \" \", 1, 1000, vbTextCompare)\n\n\n\nEnd Function\n\n\n\nSub Macro2()\n\n'\n\n' Macro2 Macro\n\n'\n\n\n\n'\n\n\u00a0\u00a0\u00a0 Application.Goto Reference:=\"Macro2\"\n\nEnd Sub\n\n<\/pre>\n<p>Untuk menampilkan kamu hanya perlu menambahkan rumus terbilang, yakni =terbilang(alamat cell) Alamat Cell yang dimaksud disini adalah alamat cell yang dijadikan huruf.<\/p>\n<div class=\"separator\" style=\"clear: both; text-align: center;\">\n<a href=\"https:\/\/flycai.warunginter.net\/wp-content\/uploads\/2026\/06\/menampilkanterbilang.png\" imageanchor=\"1\" style=\"margin-left: 1em; margin-right: 1em;\"><img loading=\"lazy\" decoding=\"async\" border=\"0\" data-original-height=\"328\" data-original-width=\"816\" height=\"160\" src=\"https:\/\/flycai.warunginter.net\/wp-content\/uploads\/2026\/06\/menampilkanterbilang.png\" width=\"400\"\/><\/a><\/div>\n<p>Jika ingin menambahkan rupiah di belakangnya =terbilang(alamat cell)&amp; &#8221; rupiah&#8221;<\/p>\n<blockquote class=\"tr_bq\"><p>\n<b>Baca Juga: <a href=\"https:\/\/www.warunginter.net\/2018\/05\/aplikasi-pengolah-angka-microsoft-excel.html\">Fungsi-fungsi Pada Aplikasi Pengolah Angka Microsoft Excel<\/a><\/b><\/p><\/blockquote>\n<p><\/p>\n<div class=\"separator\" style=\"clear: both; text-align: center;\">\n<a href=\"https:\/\/flycai.warunginter.net\/wp-content\/uploads\/2026\/06\/tambahkanrupiah.png\" imageanchor=\"1\" style=\"margin-left: 1em; margin-right: 1em;\"><img loading=\"lazy\" decoding=\"async\" border=\"0\" data-original-height=\"348\" data-original-width=\"798\" height=\"173\" src=\"https:\/\/flycai.warunginter.net\/wp-content\/uploads\/2026\/06\/tambahkanrupiah.png\" width=\"400\"\/><\/a><\/div>\n<p>Jika ingin menampilkan huruf besar diawal =proper(terbilang(alamat cell)&amp; &#8221; rupiah&#8221;) <br \/>\n<b><span style=\"color: red;\">Note :<\/span><\/b> untuk rumus proper tidak berguna karena script di Visual BAsic tadi sudah Otomatis huruf besar diawal.<\/p>\n<div class=\"separator\" style=\"clear: both; text-align: center;\">\n<a href=\"https:\/\/flycai.warunginter.net\/wp-content\/uploads\/2026\/06\/menampilkanhurufbesardiawalpadamicrosoftexcel.png\" imageanchor=\"1\" style=\"margin-left: 1em; margin-right: 1em;\"><img loading=\"lazy\" decoding=\"async\" border=\"0\" data-original-height=\"304\" data-original-width=\"829\" height=\"146\" src=\"https:\/\/flycai.warunginter.net\/wp-content\/uploads\/2026\/06\/menampilkanhurufbesardiawalpadamicrosoftexcel.png\" width=\"400\"\/><\/a><\/div>\n<p>\nJika ingin menampilkan huruf besar semua =upper(terbilang(alamat cell)&amp; &#8221; rupiah&#8221;)<\/p>\n<p>Jika ingin menampilkan huruf kecil semua =lower(terbilang(alamat cell)&amp; &#8221; rupiah&#8221;)<\/p>\n<p>Saya rasa cukup artikel kali ini, semoga bermanfaat untuk kamu sob.\n<\/p><\/div>\n<\/div>\n","protected":false},"excerpt":{"rendered":"<p>Masih banyak perusahaan dan sekolahan yang masih menggunakan Microsoft Excel sebagai media transaksi dan juga pembelajaran. Terkadang kita sering menjumpai angka yang harus diubah menjadi huruf, contohnya Rp. 600.000 akan&#8230; <a class=\"read-more-link\" href=\"https:\/\/flycai.warunginter.net\/?p=162\">Read more &raquo;<\/a><\/p>\n","protected":false},"author":1,"featured_media":2041,"comment_status":"closed","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[64,63],"tags":[],"class_list":["post-162","post","type-post","status-publish","format-standard","has-post-thumbnail","hentry","category-msoffice","category-source-code"],"_links":{"self":[{"href":"https:\/\/flycai.warunginter.net\/index.php?rest_route=\/wp\/v2\/posts\/162","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/flycai.warunginter.net\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/flycai.warunginter.net\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/flycai.warunginter.net\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/flycai.warunginter.net\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=162"}],"version-history":[{"count":1,"href":"https:\/\/flycai.warunginter.net\/index.php?rest_route=\/wp\/v2\/posts\/162\/revisions"}],"predecessor-version":[{"id":1569,"href":"https:\/\/flycai.warunginter.net\/index.php?rest_route=\/wp\/v2\/posts\/162\/revisions\/1569"}],"wp:featuredmedia":[{"embeddable":true,"href":"https:\/\/flycai.warunginter.net\/index.php?rest_route=\/wp\/v2\/media\/2041"}],"wp:attachment":[{"href":"https:\/\/flycai.warunginter.net\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=162"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/flycai.warunginter.net\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=162"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/flycai.warunginter.net\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=162"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}