Vba에서 값을 반올림하는 방법(예제 포함)


VBA에서 RoundDown 메서드를 사용하여 값을 반올림할 수 있습니다.

이 함수는 다음 기본 구문을 사용합니다.

 Sub RoundDownValue()
    Range(" B1 ") = WorksheetFunction.RoundDown(Range(" A1 "), 0)
End Sub

이 특정 예에서는 A1 셀의 값을 가장 가까운 정수로 반올림하고 B1 셀에 결과를 표시합니다.

RoundDown 메서드의 두 번째 인수는 반올림할 자릿수를 지정합니다.

  • -3 천 단위로 내림
  • -2는 가장 가까운 백 단위로 내림합니다.
  • -1은 가장 가까운 10의 자리에서 내림합니다.
  • 0은 가장 가까운 정수로 내림됩니다.
  • 1은 소수점 이하 한 자리까지 내림합니다.
  • 2는 소수점 이하 2자리까지 내림합니다.
  • 3은 천분의 일 자리(소수점 세 자리)로 내림됨

등등.

다음 예제에서는 실제로 RoundDown 메서드를 사용하는 방법을 보여줍니다.

관련 항목: VBA에서 값을 반올림하는 방법

예 1: VBA에서 가장 가까운 정수로 반올림

다음 매크로를 만들어 A1 셀의 값을 가장 가까운 정수로 반올림하고 결과를 B1 셀에 표시할 수 있습니다.

 Sub RoundDownValue()
    Range(" B1 ") = WorksheetFunction.RoundDown(Range(" A1 "), 0)
End Sub

이 매크로를 실행하면 다음과 같은 출력이 나타납니다.

A1 셀의 값 1432.78은 B1 셀에서 가장 가까운 정수인 1432로 반올림되었습니다.

예 2: VBA에서 가장 가까운 백 단위로 반올림

다음 매크로를 만들어 A1 셀의 값을 가장 가까운 100 단위로 반올림하고 B1 셀에 결과를 표시할 수 있습니다.

 Sub RoundDownValue()
    Range(" B1 ") = WorksheetFunction.RoundDown(Range(" A1 "), -2)
End Sub

이 매크로를 실행하면 다음과 같은 출력이 나타납니다.

A1 셀의 값 1432.78은 B1 셀에서 1400의 가장 가까운 백 단위로 반올림되었습니다.

예 3: VBA에서 가장 가까운 10번째 자리로 반올림

다음 매크로를 만들어 A1 셀의 값을 가장 가까운 10번째 자리(즉, 소수점 1자리)로 반올림하고 그 결과를 B1 셀에 표시할 수 있습니다.

 Sub RoundDownValue()
    Range(" B1 ") = WorksheetFunction.RoundDown(Range(" A1 "), 1)
End Sub

이 매크로를 실행하면 다음과 같은 출력이 나타납니다.

A1 셀의 값 1432.78은 B1 셀에서 1432.7의 가장 가까운 10분의 1로 반내림되었습니다.

참고 : VBA RoundDown 메서드에 대한 전체 설명서는 여기에서 찾을 수 있습니다.

추가 리소스

다음 자습서에서는 VBA에서 다른 일반적인 작업을 수행하는 방법을 설명합니다.

VBA: SUMIF 및 SUMIFS 함수 작성 방법
VBA: COUNTIF 및 COUNTIFS 함수 작성 방법
VBA: AVERAGEIF 및 AVERAGEIFS 함수 작성 방법

의견을 추가하다

이메일 주소는 공개되지 않습니다. 필수 필드는 *로 표시됩니다