Contoh Power Query Terbilang

Table of Contents

Power Query Excel adalah fitur untuk mengimpor, membersihkan, dan mengubah data dari berbagai sumber secara efisien.

Dengan antarmuka berbasis langkah dan bahasa M, pengguna dapat menggabungkan, memfilter, serta memodifikasi data tanpa perlu rumus excel kompleks, menjadikannya alat penting untuk analisis dan otomatisasi data di Excel.

Dengan mengunakan bahasa M, Anda juga bisa membuat Fungsi Terbilang yang dapat digunakan untuk pengolahan data menggunakan Power Query.

Langkah-langkah membuat fungsi Terbilang di Power Query

1️⃣ Buka Power Query:

1. Pilih Data → Get Data → Launch Power Query Editor
2. Klik Home → Advanced Editor
3. Pilih New Query → Blank Query
4. Ganti nama query menjadi Terbilang

2️⃣ Salin kode berikut dan tempelkan:

// Fungsi Terbilang Power Query (versi Bahasa Indonesia)
let
    fxTerbilang = (angka as number) as text =>
    let
        // Daftar kata dasar angka
        Satuan = {"", "Satu", "Dua", "Tiga", "Empat", "Lima", "Enam", "Tujuh", "Delapan", "Sembilan"},

        // Fungsi rekursif bersarang (agar dikenali)
        TerbilangRatusan = (n as number) as text =>
            let
                hasil =
                    if n = 0 then ""
                    else if n < 12 then Satuan{n}
                    else if n < 20 then Satuan{n - 10} & " Belas"
                    else if n < 100 then
                        Satuan{Number.IntegerDivide(n,10)} & " Puluh " & @TerbilangRatusan(Number.Mod(n,10))
                    else if n < 200 then
                        "Seratus " & @TerbilangRatusan(n - 100)
                    else if n < 1000 then
                        Satuan{Number.IntegerDivide(n,100)} & " Ratus " & @TerbilangRatusan(Number.Mod(n,100))
                    else if n < 2000 then
                        "Seribu " & @TerbilangRatusan(n - 1000)
                    else if n < 1000000 then
                        @TerbilangRatusan(Number.IntegerDivide(n,1000)) & " Ribu " & @TerbilangRatusan(Number.Mod(n,1000))
                    else if n < 1000000000 then
                        @TerbilangRatusan(Number.IntegerDivide(n,1000000)) & " Juta " & @TerbilangRatusan(Number.Mod(n,1000000))
                    else if n < 1000000000000 then
                        @TerbilangRatusan(Number.IntegerDivide(n,1000000000)) & " Miliar " & @TerbilangRatusan(Number.Mod(n,1000000000))
                    else
                        @TerbilangRatusan(Number.IntegerDivide(n,1000000000000)) & " Triliun " & @TerbilangRatusan(Number.Mod(n,1000000000000))
            in
                hasil,

        // Proses akhir (membersihkan spasi & menambahkan "Rupiah")
        Hasil = Text.Combine(
            List.Select(
                Text.Split(Text.Trim(TerbilangRatusan(Number.RoundDown(angka))), " "),
                each _ <> ""
            ), " "
        ) & " Rupiah"
    in
        Text.Proper(Text.Trim(Hasil))
in
    fxTerbilang

3️⃣ Cara Menggunakannya di Power Query

Setelah fungsi disimpan:

1. Kembali ke query data Anda.
2. Tambahkan kolom kustom:
• Klik Add Column → Custom Column
• Gunakan rumus:
  
  
  Terbilang([Nominal])
3. Kolom baru akan menampilkan hasil dalam bentuk teks Rupiah.

Biar lebih mudah memahami, Silahkan download contoh File-nya dalam format Excel Workbook (*.xlsx) berikut ini:

Referensi	:	Kumpulan Kasus dan Latihan Excel
Author	:	Masdad Al-Falucky
Min.Version	:	Microsoft Excel 2013

Download

File Size: 18,7 KB

Excel Workbook (*.xlsx)

Jika Link Download Contoh Power Query Terbilang.xlsx diatas rusak atau tidak berfungsi, Silahkan hubungi Admin melalui Facebook Rumus Excel, atau kirim email ke info [at] rumusexcel.com.

Salam Exceler...