Menerapkan Makro VBA adalah metode yang paling efektif, tercepat, dan teraman untuk menjalankan operasi apa pun di Excel. Pada artikel ini, kami akan menunjukkan kepada Anda cara memformat angka di Excel menggunakan VBA .

Unduh Buku Kerja

Anda bisa mengunduh buku kerja Excel latihan gratis dari sini.

Memformat Angka dengan VBA.xlsm

3 Metode untuk Memformat Angka di Excel dengan VBA

Lihatlah contoh berikut ini. Kita menyimpan angka-angka yang sama di kedua Kolom B dan C sehingga ketika kita memformat angka di Kolom C Anda akan tahu dari B Kolom dalam format mana angka itu sebelumnya.

1. VBA untuk Memformat Angka dari Satu Jenis ke Jenis Lainnya di Excel

Pertama, mari kita ketahui cara memformat angka 12345 dari Sel C5 dalam dataset yang kami berikan dengan VBA untuk Mata Uang format.

Langkah-langkah:

• Tekan Alt + F11 pada keyboard Anda atau buka tab Pengembang -> Visual Basic untuk membuka Editor Visual Basic .

• Di jendela kode pop-up, dari bilah menu, klik Sisipkan -> Modul .

• Salin kode berikut ini dan tempelkan ke jendela kode.

 Sub NumberFormat() Range("C5").NumberFormat = "#,##0.0" 'Ini akan memformat angka 12345 menjadi mata uang End Sub 

Kode Anda sekarang siap untuk dijalankan.

• Tekan F5 pada keyboard Anda atau dari bilah menu pilih Jalankan -> Jalankan Sub/UserForm Anda juga bisa mengklik pada ikon Putar kecil di bilah sub-menu untuk menjalankan makro.

Kode ini akan memformat angka 12345 menjadi mata uang dengan nilai desimal.

Jika Anda ingin menampilkan simbol mata uang di dalam sel, maka cukup letakkan simbol sebelum kode.

 Sub NumberFormat() Range("C6").NumberFormat = "$#,##0.0" 'Ini akan memformat angka 12345 menjadi mata uang dengan simbol $ End Sub 

Untuk kasus kami, kami menggunakan dolar ($) Anda bisa menggunakan simbol mata uang apa pun yang Anda inginkan.

Kode ini akan memformat angka ke dalam mata uang dengan a dolar ($) simbol.

Anda juga dapat mengubah format angka ini ke dalam banyak format lainnya. Cukup ikuti kode di bawah ini untuk mengubah angka menjadi format yang Anda butuhkan.

 Sub NumberFormat() 'Original Number 12345 Range("C5").NumberFormat = "#,##0.0" 'Ini akan memformat angka menjadi mata uang Range("C6").NumberFormat = "$#,##0.0" 'Ini akan memformat angka menjadi mata uang dengan simbol $ Range("C7").NumberFormat = "0.00%" 'Ini akan memformat angka menjadi nilai persentase Range("C8").NumberFormat = "#,##.00;[red]-#,##.00" 'Iniakan memformat angka menjadi warna merah (Conditional Formatting) Range("C9").NumberFormat = "#?/?" 'Ini akan memformat angka menjadi pecahan Range("C10").NumberFormat = "0#"" Kg""" 'Ini akan memformat angka dengan teks Range("C11").NumberFormat = "#-#-#-#-#" 'Ini akan memformat angka dengan pemisah Range("C12").NumberFormat = "#,##0.00" 'Ini akan memformat angkaangka dengan koma dan desimal jika ada Range("C13").NumberFormat = "#,##0" 'Ini akan memformat angka menjadi ribuan dengan koma jika ada Range("C14").NumberFormat = "#,##0.00" 'Ini akan memformat angka menjadi jutaan Range("C15").NumberFormat = "dd-mmm-yyyy hh:mm AM/PM" 'Ini akan memformat angka menjadi tanggal & waktu End Sub 

Makro VBA

Ikhtisar

Baca Lebih Lanjut: Format Angka Kustom Excel Beberapa Kondisi

2. Makro untuk Memformat Rentang Angka di Excel

Kita telah melihat cara mengubah format angka untuk sel tunggal. Tetapi jika Anda ingin mengubah format untuk rentang angka maka VBA kali ini, alih-alih melewatkan satu nomor referensi sel tunggal di dalam tanda kurung objek Range, Anda harus melewati seluruh rentang (seperti ini C5:C8) di dalam tanda kurung.

 Sub NumberFormatRng() Range("C5:C8").NumberFormat = "$#,##0.0" End Sub 

Kode ini akan memformat rentang angka tertentu dari kumpulan data Anda di Excel.

Baca Lebih Lanjut: Cara Memformat Angka ke Jutaan di Excel (6 Cara)

Bacaan serupa:

• Excel Membulatkan ke 2 Tempat Desimal (dengan Kalkulator)
• Bagaimana cara Letakkan Tanda Kurung untuk Angka Negatif di Excel
• Cara Memformat Angka dalam Ribuan K dan Jutaan M di Excel (4 Cara)
• Format Angka Kustom: Jutaan dengan Satu Desimal di Excel (6 Cara)
• Cara Mengubah Format Angka dari Koma ke Titik di Excel (5 Cara)

3. Sematkan VBA untuk Mengonversi Angka dengan Fungsi Format di Excel

Anda juga bisa menggunakan Fungsi format di Excel VBA untuk mengkonversi angka-angka. Makro untuk melakukan itu adalah,

Langkah-langkah:

• Cara yang sama seperti sebelumnya, buka Editor Visual Basic dari Pengembang tab dan Sisipkan a Modul di jendela kode.
• Di jendela kode, salin kode berikut dan tempelkan.

 Sub NumberFormatFunc() MsgBox Format(12345, "#,##0.00") End Sub 

Kode Anda sekarang siap untuk dijalankan.

Anda akan mendapatkan nomor yang diformat dalam kotak pesan.

Konten Terkait: Cara Mengonversi Angka menjadi Persentase di Excel (3 Cara Cepat)

Kesimpulan

Artikel ini menunjukkan kepada Anda cara memformat angka di Excel dengan VBA Saya harap artikel ini sangat bermanfaat bagi Anda. Jangan ragu untuk bertanya jika Anda memiliki pertanyaan mengenai topik ini.