Vba에서 값을 반올림하는 방법(예제 포함)
VBA에서 RoundUp 메서드를 사용하여 값을 반올림할 수 있습니다.
이 함수는 다음 기본 구문을 사용합니다.
Sub RoundUpValue()
Range(" B1 ") = WorksheetFunction.RoundUp(Range(" A1 "), 0)
End Sub
이 특정 예에서는 A1 셀의 값을 가장 가까운 정수로 반올림하고 B1 셀에 결과를 표시합니다.
RoundUp 메서드의 두 번째 인수는 반올림할 자릿수를 지정합니다. 여기서:
- -다음 천 단위까지 3 라운드
- -가장 가까운 100 단위까지 2 라운드
- -1은 가장 가까운 10자리로 반올림됩니다.
- 0은 가장 가까운 정수로 반올림됩니다.
- 1은 소수점 이하 한 자리까지 반올림합니다.
- 2는 소수점 이하 2자리까지 반올림됩니다.
- 3은 천분의 일 자리에서 반올림되었습니다(소수점 세 자리).
등등.
다음 예에서는 실제로 RoundUp 메서드를 사용하는 방법을 보여줍니다.
예 1: VBA에서 가장 가까운 정수로 반올림
다음 매크로를 만들어 A1 셀의 값을 가장 가까운 정수로 반올림하고 결과를 B1 셀에 표시할 수 있습니다.
Sub RoundUpValue()
Range(" B1 ") = WorksheetFunction.RoundUp(Range(" A1 "), 0)
End Sub
이 매크로를 실행하면 다음과 같은 출력이 나타납니다.
A1 셀의 값 1432.78은 B1 셀에서 가장 가까운 정수인 1433으로 반올림되었습니다.
예 2: VBA에서 가장 가까운 백 단위로 반올림
다음 매크로를 만들어 A1 셀의 값을 가장 가까운 100 단위로 반올림하고 B1 셀에 결과를 표시할 수 있습니다.
Sub RoundUpValue()
Range(" B1 ") = WorksheetFunction.RoundUp(Range(" A1 "), -2)
End Sub
이 매크로를 실행하면 다음과 같은 출력이 나타납니다.
A1 셀의 값 1432.78은 B1 셀에서 가장 가까운 1500의 백 단위로 반올림되었습니다.
예 3: VBA에서 가장 가까운 10번째 자리로 반올림
다음 매크로를 생성하여 A1 셀의 값을 가장 가까운 10번째 자리(즉, 소수점 이하 한 자리)로 반올림하고 그 결과를 B1 셀에 표시할 수 있습니다.
Sub RoundUpValue()
Range(" B1 ") = WorksheetFunction.RoundUp(Range(" A1 "), 1)
End Sub
이 매크로를 실행하면 다음과 같은 출력이 나타납니다.
A1 셀의 값 1432.78은 B1 셀에서 1432.8의 가장 가까운 10분의 1로 반올림되었습니다.
참고 : VBA RoundUp 메서드에 대한 전체 설명서는 여기에서 찾을 수 있습니다.
추가 리소스
다음 자습서에서는 VBA에서 다른 일반적인 작업을 수행하는 방법을 설명합니다.
VBA: SUMIF 및 SUMIFS 함수 작성 방법
VBA: COUNTIF 및 COUNTIFS 함수 작성 방법
VBA: AVERAGEIF 및 AVERAGEIFS 함수 작성 방법