Vba에서 날짜에서 일수를 빼는 방법(예제 포함)

VBA에서 음수와 함께 DateAdd 함수를 사용하여 날짜에서 특정 일 수를 뺄 수 있습니다.

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

 Sub SubtractDays()

    Dim i As Integer
    
    For i = 2 To 10
        Range(" B " & i) = DateAdd(" d ", -4, Range(" A " & i))
    Next i
    
End Sub

이 특정 매크로는 A2:A10 범위의 각 날짜에서 4일을 빼고 B2:B10 범위의 새 날짜를 표시합니다.

DateAdd 함수의 “d” 인수는 다른 시간 단위가 아닌 날짜에서 일수를 빼도록 지정합니다.

DateAdd 함수에서 사용할 수 있는 전체 단위 목록은 VBA 설명서 페이지를 참조하세요.

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

예: VBA의 날짜에서 일수 빼기

Excel에 다음과 같은 날짜 목록이 있다고 가정합니다.

각 날짜에서 4일을 빼고 B열에 새 날짜를 표시한다고 가정합니다.

이를 위해 다음 매크로를 생성할 수 있습니다:

 Sub SubtractDays()

    Dim i As Integer
    
    For i = 2 To 10
        Range(" B " & i) = DateAdd(" d ", -4, Range(" A " & i))
    Next i
    
End Sub

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

B 열에는 A 열의 각 날짜에서 4일을 뺀 날짜가 포함되어 있습니다.

각 날짜에서 다른 일수를 빼려면 DateAdd 함수의 숫자 값을 자유롭게 변경하세요.

참고 : 여기에서 VBA의 DateAdd 함수에 대한 전체 문서를 찾을 수 있습니다.

추가 리소스

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

VBA에서 날짜를 비교하는 방법
VBA에서 문자열을 날짜로 변환하는 방법
VBA에서 두 날짜 사이의 일수를 계산하는 방법