엑셀 vba/시트 없으면 시트 생성하기/On Error Resume Next/Sheets.Add.Name

1. 코드작성

  1) summary 시트이름이 없으면 summary 탭을 만든다. 

  2) 알람을 칠지말지 코드를 참고하자.

Sub 시트없으면만들기()
    Dim ws As Worksheet
    
    '오류가 있어도 실행하라 라는 코드
    On Error Resume Next
    Set ws = Worksheets("summary")
    
    '오류 있으면 알람 치라는 코드
    On Error GoTo 0
    
    If ws Is Nothing Then
        Sheets.Add.Name = "summary"
    End If
End Sub

 

*에러가이드 참고*