엑셀 Q&A : 해당 열의 날짜를 1년 뒤로 변경하는 매크로

with seok 2020. 3. 29. 03:09

엑셀 결과 파일 다운로드

Sub 직사각형2_Click()

Dim Sn
Dim Sx As Integer
Dim iday As Integer

Set Sn = Sheets("날짜변경")
iday = 365

With Sn
    For Sx = 1 To 11
        .Cells(Sx, 1) = .Cells(Sx, 1).Value + iday
    Next Sx
End With

End Sub

728x90

저작자표시 비영리 변경금지 (새창열림)