Sabtu, 08 November 2025

Cara membuat rumus terbilalang di excel

Assalamu'alaikum

Ilmu baru ni bro, memang gak terlalu pening tapi sedikit memudahkan kita

Cara membuat rumus terbilang di excel ,  seper ini 

Kalau kamu maksud terbilang otomatis, contoh rumus sederhananya seperti ini (dengan bantuan fungsi VBA, karena Excel tidak punya fungsi terbilang bawaan):

Langkah-langkah buat angka otomatis jadi teks (terbilang)

  1. Tekan Alt + F11 → buka Visual Basic Editor

  2. Klik Insert → Module

  3. Paste kode berikut:


Function Terbilang(ByVal x As Double) As String
    Dim angka As Variant, huruf As Variant
    Dim hasil As String
    angka = Array("", "Satu", "Dua", "Tiga", "Empat", "Lima", "Enam", "Tujuh", "Delapan", "Sembilan")
    If x < 10 Then
        hasil = angka(x)
    ElseIf x < 20 Then
        hasil = angka(x - 10) & " Belas"
    ElseIf x < 100 Then
        hasil = angka(Int(x / 10)) & " Puluh " & angka(x Mod 10)
    Else
        hasil = x
    End If
    Terbilang = Application.WorksheetFunction.Trim(hasil)
End Function

Tutup editor (Alt + Q)  lalu  Di sel E3, tulis rumus: =Terbilang(e3)

Artikel Terkait:

0 Comments:

Posting Komentar

Monggo sarannya