Vba에서 workday 함수를 사용하는 방법(예제 포함)

VBA에서 WorkDay 메서드를 사용하여 날짜에서 특정 근무일 수를 더하거나 뺄 수 있습니다.

실제로 이 방법을 사용하는 일반적인 방법은 다음과 같습니다.

 SubAddWorkDays ()

Dim i As Integer

For i = 2 To 10
    Range("C" & i) = WorksheetFunction.WorkDay(Range("A" & i), Range("B" & i))
Next i

End Sub

이 특정 매크로는 B2:B10 범위에 지정된 영업일 수를 A2:A10 범위의 각 날짜에 추가하고 C2:C10 범위의 결과를 표시합니다.

다음 예에서는 실제로 이 구문을 사용하는 방법을 보여줍니다.

예: VBA에서 WorkDay 함수를 사용하는 방법

Excel에 날짜 열과 각 날짜에 추가할 영업일 수를 지정하는 다른 열이 있다고 가정해 보겠습니다.

다음 매크로를 생성하여 B열의 영업일 수를 A열의 해당 날짜에 추가할 수 있습니다.

 SubAddWorkDays ()

Dim i As Integer

For i = 2 To 10
    Range("C" & i) = WorksheetFunction.WorkDay(Range("A" & i), Range("B" & i))
Next i

End Sub

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

기본적으로 C열에는 날짜가 일련번호로 표시됩니다.

이 값을 인식 가능한 날짜로 표시하려면 C2:C10 범위를 강조 표시한 다음 상단 리본에서 삽입 탭을 클릭한 다음 숫자 형식 드롭다운 메뉴를 클릭하고 간단한 날짜를 클릭합니다.

이제 각 일련번호가 날짜로 표시됩니다.

C 열에는 A 열의 각 날짜가 B 열의 특정 영업일 수와 함께 표시됩니다.

B 열에 음수를 지정하면 WorkDay 메서드는 A 열의 날짜에서 해당 근무일 수를 뺍니다.

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

추가 리소스

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

VBA:날짜에서 월 이름을 얻는 방법
VBA: 날짜별로 정렬하는 방법
VBA:두 날짜 사이에 추가하는 방법