■ Excel/ㅡExcel Study

엑셀 Q&A : VBA 범위 입력 받기와 매크로 단축키

with seok 2020. 3. 30. 14:41
유튜브 채널 : 네이버 지식인으로 공부하는 엑셀 with Seok
https://www.youtube.com/channel/UCgYsxzJqH2X9upa6TbLxi3A

아직은 다른 질문/해결 동영상이 하나 밖에 없지만

좋아요/구독 부탁드립니다. ^^

엑셀 결과 파일 다운로드

날짜변경(2).xlsm
0.02MB

아래의 매크로를 긁어서 입력하세요.

Sub 일년더하기()

On Error Resume Next

Dim rngTarget As Range
Set rngTarget = Application.InputBox("범위를 입력하세요", , , , , , , 8)

If TypeName(rngTarget) = "Nothing" Then
        MsgBox "취소하셨습니다.", vbOKOnly, "[취소]"
        Exit Sub
End If

    For Each Rng In rngTarget
        Rng.Value = Rng.Value + 365
    Next
MsgBox ("작업이 끝났습니다.")
End Sub

728x90