TOP

İşlev VBA: Round

Tanım

VBA Round işlevi, bir sayıyı belirtilen ondalık basamak sayısına yuvarlar.


Sözdizimi Round

Round(sayı; ondalık_işaretlerin sayısı)

Örnek VBA Round

Bir sayıyı 2 ondalık basamağa yuvarlamak için Round işlevini kullanma:

  1. Sub RoundExample1()  
  2.   
  3.     number = 12.3456  
  4.       
  5.     round = Round(number, 2)  
  6.       
  7.     MsgBox round '12.35'te dönüyor  
  8.       
  9. End Sub  

Farklı sayısal değerleri yuvarlamak için Round işlevini kullanma:

  1. Sub RoundExample2()  
  2.   
  3.     MsgBox Round(14.2)         'İade: 14  
  4.     MsgBox Round(-14.2)        'İade: -14  
  5.     MsgBox Round("14.2")       'İade: 14  
  6.     MsgBox Round("-14.2")      'İade: -14  
  7.       
  8.     MsgBox Round(9.5)          'İade: 10  
  9.     MsgBox Round(-9.5)         'İade: -10  
  10.       
  11.     MsgBox Round(1.25, 1)      'İade: 1.2  
  12.     MsgBox Round(50, 1)        'İade: 50  
  13.       
  14.     MsgBox Round(4532.6351, 2) 'İade: 4532,64  
  15.       
  16. End Sub