Fungsi Round [VBA]

Fungsi Putaran mengembalikan angka yang dibulatkan ke jumlah digit tertentu.

Ikon Peringatan

Fungsi atau konstanta ini diaktifkan dengan pernyataan Option VBASupport 1 yang ditempatkan sebelum kode program yang dapat dieksekusi dalam sebuah modul.


Sintaksis:

Round( expression as Double [,numdecimalplaces as Integer] ) 

Nilai balikan:

Double

Parameter:

ekspresi: Diperlukan. Ekspresi numerik yang akan dibulatkan.

numdecimalplaces: Pilihan. Menentukan berapa banyak ruang di sebelah kanan desimal yang termasuk dalam pembulatan. Standarnya adalah 0.

Kode kesalahan:

5 Tidak sah dalam pemanggilan prosedur

Contoh:

REM ***** BASIC *****

Option VBASupport 1

Sub Example_Round

 Dim r 

 r = Pi

 print r ' 3,14159265358979

 print Round(r, 5) ' 3,14159

 r = exp(1)

 print r ' 2,71828182845904

 print Round(r) ' 3

End Sub