Hàm RoundUp trong Excel VBA
Tương tự như hàm trang tính trong đó chúng ta làm tròn các số thành số nguyên gần nhất, trong VBA chúng ta có hàm RoundUp làm giảm dấu thập phân cho chúng ta và cú pháp để sử dụng hàm làm tròn như sau Làm tròn lên (Số, Số chữ số sau số thập phân ) hai đối số này trong hàm là bắt buộc.
Khi chúng ta làm việc với các con số và phép tính, chúng ta nhận được phân số sau số nguyên, và nó khá phổ biến trong kinh doanh hàng ngày. Chúng tôi thường không bận tâm về các giá trị thập phân vì nó không ảnh hưởng đến kết quả cuối cùng của chúng tôi. Trong những tình huống đó, chúng ta cần làm tròn các số đến số nguyên gần nhất hoặc số nguyên tức thì. Bằng cách sử dụng hàm RoundUp, chúng ta thực sự có thể thực hiện tác vụ này.
Nếu bạn đã tìm kiếm trong VBA cho hàm RoundUp, thì chắc hẳn bạn không tìm thấy nó vì nó là một hàm trang tính. Để truy cập chức năng RoundUp, chúng ta cần sử dụng lớp Chức năng bảng tính VBA.
Trước đó, hãy nhớ lại cú pháp của hàm RoundUp.
Ví dụ
Hãy thực hiện nhiệm vụ làm tròn số “288.5264”. Chúng ta sẽ thấy tất cả các con số với ví dụ này.
Ví dụ # 1 - Khi đối số thứ hai bằng 0
Nhìn vào mã VBA bên dưới.
Mã:
Sub RoundUp_Example1 () Dim k As Double k = WorksheetFunction.RoundUp (288.5264, 0) MsgBox k End Sub
- Khi bạn chạy đoạn mã trên, nó sẽ chuyển đổi số được cung cấp, tức là 288.5264, thành số nguyên gần nhất, tức là 289
Ví dụ # 2 - Khi Đối số thứ hai là 1
Hãy xem đoạn mã dưới đây để xem điều gì sẽ xảy ra khi chúng ta chuyển một làm đối số thứ hai.
Mã:
Sub RoundUp_Example2 () Dim k As Double k = WorksheetFunction.RoundUp (288.5264, 1) MsgBox k End Sub
- Mã này sẽ chuyển đổi số đã cho thành một dấu thập phân, tức là 288,6
Ví dụ # 3 - Khi Đối số thứ hai là 2
Nhìn vào đoạn mã dưới đây để xem điều gì sẽ xảy ra khi chúng ta chuyển hai làm đối số thứ hai.
Mã:
Sub RoundUp_Example3 () Dim k As Double k = WorksheetFunction.RoundUp (288.5264, 2) MsgBox k End Sub
- Mã này sẽ chuyển đổi số đã cho thành hai dấu thập phân, tức là 288,53
Ví dụ # 4 - Khi Đối số thứ hai là 3
Hãy xem đoạn mã dưới đây để xem điều gì sẽ xảy ra khi chúng ta chuyển ba làm đối số thứ hai.
Mã:
Sub RoundUp_Example4 () Dim k As Double k = WorksheetFunction.RoundUp (288.5264, 3) MsgBox k End Sub
- Mã này sẽ chuyển đổi số đã cho thành ba dấu thập phân, tức là 288.527
Ví dụ # 5 - Khi Đối số thứ hai là -1
Hãy xem đoạn mã dưới đây để xem điều gì sẽ xảy ra khi chúng ta chuyển trừ một làm đối số thứ hai.
Mã:
Sub RoundUp_Example5 () Dim k As Double k = WorksheetFunction.RoundUp (288.5264, -1) MsgBox k End Sub
- Mã này sẽ chuyển đổi số đã cho thành mười gần nhất, tức là 290.
Ví dụ # 6 - Khi Đối số thứ hai là -2
Hãy xem đoạn mã dưới đây để xem điều gì sẽ xảy ra khi chúng ta chuyển trừ hai làm đối số thứ hai.
Mã:
Sub RoundUp_Example6 () Dim k As Double k = WorksheetFunction.RoundUp (288.5264, -2) MsgBox k End Sub
- Mã này sẽ chuyển đổi số đã cho thành hàng trăm gần nhất, tức là 300.
Ví dụ # 7 - Khi Đối số thứ hai là -3
Hãy xem đoạn mã dưới đây để xem điều gì sẽ xảy ra khi chúng ta chuyển trừ ba làm đối số thứ hai.
Mã:
Sub RoundUp_Example7 () Dim k As Double k = WorksheetFunction.RoundUp (288.5264, -3) MsgBox k End Sub
- Mã này sẽ chuyển đổi số thành hàng nghìn gần nhất, tức là 1000.
Như vậy, chúng ta có thể sử dụng hàm ROUNDUP trong VBA như một phần của lớp hàm trang tính để làm tròn các số dựa trên đối số thứ hai được cung cấp.
