이미지 크레디트: mavoimages/iStock/게티 이미지
기본 제공 프로그래밍 언어 VBA 또는 Visual Basic for Applications에서 Excel의 "반올림" 기능을 사용하는 방법을 배우면 VBA에서 Excel 기능을 실행하는 데 도움이 됩니다. Excel에는 VBA에 없는 많은 기능이 있고 VBA 프로그램에서 적용해야 할 수도 있기 때문에 이 기술이 유용합니다. "반올림" 기능을 사용할 수 있는 VBA 기능은 표준 워크시트 인터페이스를 사용할 때처럼 잘못된 구문이나 인수에 대해 경고하지 않습니다.
목적
Excel "반올림" 기능은 숫자를 지정한 자릿수로 반올림합니다. 예를 들어 "Roundup (2.2, 0)"을 실행하면 Excel에서 숫자 2.2를 다음 정수로 반올림하도록 지시합니다. 두 번째 인수의 "0"은 Excel에 소수점 이하 자릿수를 원하지 않는다는 것을 알려줍니다. 이는 정수 답변을 원한다고 말하는 것과 같습니다.
오늘의 비디오
VBA 라운드 함수
VBA에는 "반올림" 기능이 내장되어 있지 않습니다. 가장 가까운 기능은 "반올림" 기능으로, 반올림하려는 숫자의 끝 자릿수가 5보다 크거나 작은지에 따라 반올림 또는 내림합니다. 예를 들어 VBA "즉시" 창에 "Round (2.2, 0)"을 입력하면 Excel "Roundup" 함수가 반올림하는 3 대신 2가 됩니다.
"수식" 속성
VBA에는 자체적으로 "반올림" 기능이 없지만 Excel의 "반올림" 기능을 사용할 수 있습니다. VBA에 이 작업을 수행하도록 지시하려면 "Range" 가상 개체의 "Formula" 속성을 "Roundup" 기능으로 설정하십시오. 다음 예에서는 이 작업을 수행하는 방법을 보여줍니다. Excel 내에서 "Alt"와 "F11"을 동시에 눌러 VBA 개발 환경을 엽니다. "Immediate" 창에서 마우스를 클릭한 다음 "Range ("A1").Formula = "=Roundup (2.2, 0)" 명령문을 입력하십시오. 방금 설명한 "Alt-F11" 키 누름을 사용하여 Excel로 돌아갑니다.. A1 셀에 결과 "3"이 표시되며 이는 해당 명령문이 Excel의 "반올림" 기능을 성공적으로 적용했음을 나타냅니다.
대화식 예
사용자로부터 "반올림" 함수에 대한 인수를 수락하고 해당 함수의 결과를 표시하는 대화형 VBA 프로그램을 만들 수 있습니다. VBA 개발 환경을 연 후 다음 프로그램을 창에 붙여넣습니다.
Public Sub roundUpANumber() Dim a1, a2, s a1 = CDbl(InputBox("반올림할 숫자를 입력하세요.")) a2 = CInt(InputBox("반올림할 소수점 이하 자릿수를 입력하세요. 방금 입력한 숫자를 반올림하고 싶습니다.")) s = "=Roundup(" & a1 & "," & a2 & ")" Range("A1").Formula = s Range("A1") .Calculate MsgBox (Range("A1").Value) 끝 보결
명령문 중 하나를 클릭한 다음 "실행" 메뉴의 "실행" 명령을 클릭하여 프로그램을 실행하십시오. Excel에서 함수의 인수를 입력하라는 메시지가 표시되면 입력하고 "Enter" 키를 누릅니다. 프로그램은 입력한 인수에 대한 "반올림" 기능의 결과를 표시합니다.
