VBA Round işlevi, bir sayıyı belirtilen ondalık basamak sayısına yuvarlar.
Round(sayı; ondalık_işaretlerin sayısı)
Bir sayıyı 2 ondalık basamağa yuvarlamak için Round işlevini kullanma:
Sub RoundExample1() number = 12.3456 round = Round(number, 2) MsgBox round '12.35'te dönüyor End Sub
Farklı sayısal değerleri yuvarlamak için Round işlevini kullanma:
Sub RoundExample2() MsgBox Round(14.2) 'İade: 14 MsgBox Round(-14.2) 'İade: -14 MsgBox Round("14.2") 'İade: 14 MsgBox Round("-14.2") 'İade: -14 MsgBox Round(9.5) 'İade: 10 MsgBox Round(-9.5) 'İade: -10 MsgBox Round(1.25, 1) 'İade: 1.2 MsgBox Round(50, 1) 'İade: 50 MsgBox Round(4532.6351, 2) 'İade: 4532,64 End Sub