Bagaimana cara mengubah angka menjadi kata di dokumen Word?

Artikel ini berbicara tentang metode untuk mengubah angka menjadi kata-kata bahasa Inggris di dokumen Word, silakan lanjutkan untuk melihat detailnya jika Anda tertarik.

Ubah angka menjadi kata-kata bahasa Inggris dengan VBA

Ubah angka menjadi kata-kata bahasa Inggris di Excel dengan Kutools for Excel

Ubah angka menjadi kata-kata bahasa Inggris dengan VBA

1. Pilih nomor yang ingin Anda ubah menjadi kata-kata, tekan Alt + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.

2. klik Menyisipkan > Modul, dan salin kode di bawah ini dan tempelkan ke Modul Script.

VBA: Mengonversi angka menjadi kata

Sub ConvertNumberToWord()
'UpdatebyExtendoffice20181010
    Dim xDigit As Double
    Dim xBuff As String
    On Error Resume Next
    Selection.MoveLeft wdWord, 1, wdMove
    Selection.MoveRight wdWord, 1, wdExtend
    xDigit = Val(Trim(Selection.Text))
    If xDigit = 0 And Str(xDigit) <> Trim(Selection.Text) Then Exit Sub
    If xDigit > 999999 Then
        If xDigit <= 999999999 Then
            xBuff = Trim(Int(Str(xDigit / 1000000)))
            Selection.Fields.Add Selection.Range, wdFieldEmpty, "= " + xBuff + " \* CardText", True
            Selection.MoveLeft wdWord, 1, wdExtend
            xBuff = Selection.Text & " million "
            xDigit = Right(Str(xDigit), 6)
        End If
    End If
    If xDigit <= 999999 Then
        Selection.Fields.Add Selection.Range, wdFieldEmpty, "= " + Str(xDigit) + " \* CardText", True
        Selection.MoveLeft wdWord, 1, wdExtend
        xDigit = xBuff & Selection.Text
        Selection.TypeText xDigit + " "
    Else
        MsgBox "Number too large", vbOKOnly, "Kutool for Word"
    End If
End Sub

3. tekan F5 kunci untuk menjalankan kode, sekarang angkanya telah diubah menjadi kata-kata.

Note: Kode ini hanya berfungsi untuk satu nomor setiap kali.

Ubah angka menjadi kata-kata bahasa Inggris dengan Kutools for Excel

Jika Anda ingin mengonversi angka menjadi kata di lembar Excel, ada alat praktis - Angka ke Kata dari Kutools for Excel, yang dapat mengonversi angka menjadi kata-kata bahasa Inggris atau Cina, atau mengonversi angka ke mata uang Inggris atau mata uang Cina.

Setelah pemasangan gratis Kutools for Excel, lakukan seperti di bawah ini:

1. Pilih sel yang ingin Anda ubah angka menjadi kata, lalu klik Kutools > Konten > Angka ke Kata.

2. Pada dialog popping, periksa Inggris dan Tidak dikonversi ke Mata Uang Pilihan.

3. klik Ok or Mendaftar, nomor yang dipilih akan diubah menjadi kata-kata.

Alat Produktivitas Kantor Terbaik

Kutools for Word - Tingkatkan Pengalaman Kata Anda dengan Over 100 Fitur Luar Biasa!

🤖 Fitur AI Kutools: Hasilkan Konten / Menulis Ulang Teks / Tanya Jawab Dokumen / Dapatkan Jawaban Cepat / Terjemahkan dokumen / Dokumen Polandia (Format Pertahankan)...

📘 Penguasaan Dokumen: Halaman Terpisah / Gabungkan Dokumen / Ekspor Pilihan dalam Berbagai Format (PDF/TXT/DOC/HTML...) / Konversi Batch ke PDF...

✏ Pengeditan Isi: Temukan dan Ganti Batch di Beberapa File / Ubah Ukuran Semua Gambar / Ubah Urutan Baris dan Kolom Tabel / Ubah Tabel menjadi Teks...

🧹 Bersih dengan Mudah: Menyapu Spasi Ekstra / Bagian Istirahat / Teks box / Hyperlink / Untuk alat penghapus lainnya, kunjungi Hapus kelompok...

➕ Sisipan Kreatif: Memasukkan Seribu Pemisah / Kotak Centang / Tombol Radio / Kode QR / barcode / Banyak Gambar / Temukan lebih lanjut di Menyisipkan kelompok...

🔍 Pilihan Presisi: Tepat Halaman Tertentu / Meja / bentuk / Paragraf Judul / Tingkatkan navigasi dengan lebih Pilih fitur...

⭐ Peningkatan Bintang: Navigasi ke Lokasi Mana Pun / Sisipkan Otomatis Teks Berulang / Beralih Antar Jendela Dokumen / 11 Konversi Tools...

👉 Ingin mencoba fitur-fitur tersebut? Unduh Kutools untuk Word sekarang! 🚀

Free download     Beli sekarang     Pelajari Lebih Lanjut tentang Kutools untuk Word

 

Alat Produktivitas Kantor Terbaik

Kutools for Word - 100+ Alat untuk Word

• 🤖 Fitur AI Kutools: Menghasilkan, Menulis kembali, Meringkaskan, Menterjemahkan Dokumen / Dapatkan Jawaban Cepat / Dokumen Polandia (Format Pertahankan)
• 📘 Penguasaan Dokumen: Halaman Terpisah / Gabungkan Dokumen / Konversi Batch ke PDF
• ✏ Pengeditan Isi: Temukan dan Ganti Batch / Ubah Ukuran Semua Gambar
• 🧹 Bersih dengan Mudah: Hapus Spasi Ekstra / Hapus Bagian Breaks
• ➕ Sisipan Kreatif: Masukkan Seribu Pemisah / Sisipkan Kotak Centang / Buat Kode QR

Free download Beli sekarang Pelajari Lebih Lanjut tentang Kutools