Cara Membuat Terbilang Nilai Ijazah di Excel Otomatis Menggunakan UDF

oleh | 9 Mei 2025 | VBA Macro | 0 Komentar

Cara Membuat Terbilang Nilai Ijazah di Excel Otomatis – Dalam penulisan ijazah atau dokumen resmi lain di sekolah, terkadang kita diminta untuk menuliskan nilai siswa dalam bentuk huruf atau yang biasa disebut dengan “terbilang”. Misalnya nilai 89,25 harus ditulis sebagai delapan puluh sembilan koma dua lima. Jika dilakukan secara manual, tentu akan memakan waktu, terutama jika jumlah siswa sangat banyak. Untungnya, Excel memungkinkan kita untuk mengotomatisasi tugas ini dengan bantuan VBA (Visual Basic for Applications).

Dalam artikel ini, Anda akan belajar cara membuat terbilang nilai ijazah di Excel secara otomatis menggunakan kode VBA. Kami akan tunjukkan langkah demi langkah bagaimana menulis skripnya, cara memasangnya di Excel, serta cara penggunaannya. Artikel ini sangat cocok untuk guru, operator sekolah, atau staf administrasi yang bekerja dengan nilai ijazah.

Mengapa Perlu Membuat Terbilang Nilai Ijazah di Excel?

Beberapa alasan kenapa Anda sebaiknya membuat terbilang nilai ijazah di Excel:

  • Untuk mempercepat proses penulisan dokumen resmi.
  • Menghindari kesalahan penulisan angka ke huruf.
  • Menjadikan file Excel Anda lebih otomatis dan profesional.
  • Dapat digunakan ulang untuk tahun-tahun ajaran berikutnya.

Jika Anda sering bekerja dengan nilai akhir siswa, maka kemampuan ini sangat berguna. Maka, simak penjelasan lengkap di bawah ini tentang cara membuat terbilang nilai ijazah di Excel dengan VBA.

Sebagai contoh, misalnya kita punya data sebagai berikut:

Kode VBA untuk Cara Membuat Terbilang Nilai Ijazah di Excel

Berikut ini adalah skrip VBA yang bisa Anda gunakan untuk cara membuat terbilang nilai ijazah di Excel dalam bentuk terbilang:

Function TerbilangNilai(ByVal Angka As Double) As String
    Dim Kata() As String
    Dim BilanganBulat As Long
    Dim Pecahan As String
    Dim Hasil As String
    Dim i As Integer

    Kata = Split("nol satu dua tiga empat lima enam tujuh delapan sembilan sepuluh sebelas")

    BilanganBulat = Int(Angka)
    Pecahan = Format(Angka, "0.00")
    Pecahan = Right(Pecahan, 2)

    Hasil = UbahKeKata(BilanganBulat, Kata)

    If Pecahan <> "00" Then
        Hasil = Hasil & " koma"
        For i = 1 To Len(Pecahan)
            Hasil = Hasil & " " & Kata(CInt(Mid(Pecahan, i, 1)))
        Next i
    End If

    TerbilangNilai = Application.WorksheetFunction.Trim(Hasil)
End Function

Private Function UbahKeKata(ByVal Nilai As Long, Daftar() As String) As String
    Select Case Nilai
        Case 0 To 11
            UbahKeKata = Daftar(Nilai)
        Case 12 To 19
            UbahKeKata = Daftar(Nilai - 10) & " belas"
        Case 20 To 99
            UbahKeKata = Daftar(Nilai \ 10) & " puluh"
            If Nilai Mod 10 <> 0 Then
                UbahKeKata = UbahKeKata & " " & UbahKeKata(Nilai Mod 10, Daftar)
            End If
        Case 100
            UbahKeKata = "seratus"
    End Select
End Function

Cara Memasang Macro Terbilang Nilai di Excel

Berikut ini langkah-langkah untuk mengaktifkan macro dan memasukkan kode:

  1. Buka file Excel Anda.
  2. Tekan tombol Alt + F11 untuk membuka jendela Visual Basic Editor.
  3. Pilih menu Insert → Module.
  4. Salin seluruh kode di atas ke dalam modul yang baru.
  5. Simpan dengan format .xlsm agar macro dapat berfungsi.
  6. Kembali ke lembar kerja Excel.
Baca Juga  Cara Mudah Mengambil Kata yang Tercetak Tebal di Microsoft Excel dengan VBA

Cara Menggunakan Macro Terbilang Nilai

Setelah Anda berhasil memasukkan kode di atas, Anda bisa menggunakan fungsi =TerbilangNilai(...) langsung di dalam sel Excel Anda, seperti menggunakan fungsi biasa.

Contoh:

  • Jika Anda ingin mengubah angka 79,64 di sel D4 menjadi terbilang, Anda bisa menuliskan:
  =TerbilangNilai(D4)

Hasil yang akan keluar di Excel adalah sebagai berikut:

Cara ini sangat membantu untuk cara membuat terbilang nilai ijazah di Excel dengan cepat dan praktis.

Penyesuaian Jika Diperlukan

Karena pada umumnya nilai siswa maksimal adalah 100, fungsi ini hanya mencakup angka hingga seratus. Namun jika Anda ingin memperluas jangkauan hingga ribuan atau jutaan, fungsi UbahKeKata dapat dimodifikasi.

Anda juga bisa mengganti nama fungsi TerbilangNilai jika ingin disesuaikan dengan nama lain seperti TerbilangIjazah atau NilaiHuruf.

Kesimpulan

Dengan menggunakan VBA Macro, Anda bisa membuat terbilang nilai ijazah di Excel dengan cara yang cepat dan otomatis. Ini sangat berguna untuk keperluan sekolah, pencetakan ijazah, SKHUN, atau dokumen resmi lainnya yang membutuhkan angka dalam bentuk huruf.

Download Template Gratis

Bagi Anda yang ingin mencoba teknik ini secara langsung, kami telah menyiapkan template gratis yang dirancang khusus untuk membantu Anda mempraktikkan Cara Membuat Terbilang Nilai Ijazah di Excel Menggunakan VBA Macro ini. File Excel bisa didownload melalui tautan berikut:

download file Excel

Atau juga jika ingin mempelajari langkah demi langkah secara visual, bisa kunjungi Youtube Channel Depot Excel. Di sana teman-teman akan melihat bagaimana rumusnya bekerja. Semoga bermanfaat!

0 Komentar

Kirim Komentar

Alamat email Anda tidak akan dipublikasikan. Ruas yang wajib ditandai *

Join Our Newsletter