Fungsi VBA ROUND

Fungsi Putaran VBA Excel

Fungsi bulat di VBA adalah fungsi matematika yang seperti namanya itu sendiri menyarankannya untuk membulatkan atau membulatkan angka yang diberikan ke kumpulan tempat desimal tertentu yang ditentukan oleh pengguna, fungsi ini menggunakan logika putaran genap yang berarti dibutuhkan 5 sebagai referensi dan angka apa pun dengan digit terakhir setelah desimal di bawah 5 kemudian dibulatkan ke bawah dan sebaliknya.

Anda dapat membulatkan angka menjadi desimal dua digit, desimal tiga digit, atau tanpa desimal sama sekali. Misalnya, jika Anda memiliki nomor 5.8697. Jika anda membulatkan angka menjadi desimal dua digit maka akan menjadi 5,87 jika dibulatkan menjadi tiga digit kemudian dibulatkan menjadi 5,870, jika anda ingin membulatkan menjadi nol maka menjadi 6.-

Dalam bilangan perbankan, semua tempat desimal yang kurang dari 0,5 akan dibulatkan ke bawah ke nilai bilangan bulat sebelumnya dan semua tempat desimal yang lebih besar dari atau sama dengan 0,5 akan dibulatkan ke atas ke nilai bilangan bulat berikutnya.

Saya harap Anda telah menggunakan fungsi ROUND di lembar kerja. Di VBA juga kita bisa menggunakan fungsi ini tapi kita punya perbedaan dengan fungsi ini. Kita akan melihat perbedaan antara kedua fungsi ini nanti di artikel ini.

Sintaksis

Lihatlah sintaks dari fungsi Round.

Angka: Ini adalah angka yang kami coba bulatkan.

[Jumlah Digit setelah Desimal]: Berapa banyak digit yang Anda butuhkan setelah nilai desimal.

Contoh

Anda dapat mendownload Template Excel Fungsi Bulat VBA ini di sini - Template Excel Fungsi Bulat VBA

Asumsikan Anda memiliki angka 4,534 dan Anda ingin membulatkan menjadi dua digit.

Ikuti langkah-langkah di bawah ini.

Langkah 1: Deklarasikan variabel sebagai Variant.

Kode:

 Sub Round_Example1 () Dim K Sebagai Variant End Sub 

Langkah 2: Untuk variabel " k " ini, tetapkan nilai melalui fungsi ROUND.

Kode:

 Sub Round_Example1 () Dim K Sebagai Varian K = Round (End Sub 

Langkah 3: Bilangan tidak lain adalah bilangan yang ingin kita bulatkan, dalam hal ini angkanya 4,534

Kode:

 Sub Round_Example1 () Dim K Sebagai Varian K = Round (4,534, End Sub 

Langkah 4: Berapa digit yang perlu kita bulatkan, dalam hal ini, kita perlu membulatkan menjadi 2 digit .

Kode:

 Sub Round_Example1 () Dim K Sebagai Varian K = Round (4,534, 2) End Sub 

Langkah 5: Sekarang tunjukkan nilai variabel "k" di kotak pesan VBA.

Kode:

 Sub Round_Example1 () Dim K Sebagai Varian K = Round (4,534, 2) MsgBox K End Sub 

Jalankan kode ini dan lihat apa yang kami dapatkan.

Kami mendapat hasil sebagai 4,53 saat kami membulatkan menjadi 2 digit.

Sekarang saya akan mengubah angka dari 4,534 menjadi 4,535 . Lihat apa yang terjadi sekarang.

Kode:

 Sub Round_Example1 () Dim K Sebagai Varian K = Round (4,535, 2) MsgBox K End Sub 

Sekarang jalankan kodenya dan lihat apa hasilnya.

Kami mendapat hasil sebagai 4,54 satu desimal lebih tinggi dari nilai sebelumnya 4,53. Hal ini karena pada contoh ini kita telah memasukkan angka sebagai 4,535, maka setelah angka 3 angka selanjutnya adalah 5 sehingga dibulatkan ke angka selanjutnya sehingga 3 menjadi 4.

Sekarang saya akan memberikan angka sebagai 2,452678 dan saya akan mencoba membulatkan menjadi 3 digit.

Kode:

 Sub Round_Example2 () Dim K Sebagai Varian K = Round (2.452678, 3) MsgBox K End Sub 

Jalankan kode ini untuk melihat hasilnya.

Hasilnya adalah 2,453 .

2.45 2678 Berikut angka setelah tempat desimal ke-2 adalah 2678. Setelah angka 2, angka selanjutnya adalah 6 yang lebih besar dari atau sama dengan 5 sehingga dibulatkan menjadi angka desimal berikutnya.

Sekarang saya akan menggunakan angka yang sama untuk membulatkan ke nol dan melihat apa yang terjadi.

Kode:

 Sub Round_Example3 () Dim K Sebagai Varian K = Round (2.452678, 0) MsgBox K End Sub 

Jalankan kode dan lihat apa yang kami dapatkan.

Karena saya telah menggunakan putaran ke nol, kami mendapatkan hasil sebagai 2.

Alasan mengapa kita mendapat hasil sebagai 2 karena di sini bilangan desimal pertama adalah 4 yang kurang dari 0,5 jadi dibulatkan ke bawah.

Perbedaan Antara Fungsi Excel dan VBA ROUND

Terutama ada 2 perbedaan.

# 1 - Sintaks dari Kedua Fungsi:

Jika Anda melihat sintaks dari kedua fungsi tersebut, kami memiliki perbedaan di sini.

Sintaks Bulat Excel: Bulat (Bilangan, Jumlah Digit Setelah Desimal)
VBA Round Syntax: Round (Bilangan, [Jumlah Digit Setelah Desimal])

Di excel, kedua argumen tersebut wajib tetapi dalam VBA, argumen kedua bersifat opsional.

Di VBA, jika Anda mengabaikan argumen kedua, argumen default dianggap nol sehingga kita akan mendapatkan bilangan bulat.

# 2 - Hasil:

Hasil yang diberikan oleh kedua fungsi ini berbeda. Di bawah ini adalah beberapa contoh