Peter는 “Index”라는 이름의 워크 시트를 제외하고 통합 문서의 모든 워크 시트를 삭제하는 매크로를 개발했습니다. 이 매크로는 잘 작동합니다. 그러나 매크로를 실행 한 후 새 워크 시트를 추가하면 기본값으로 “Sheet1″이라는 이름이 지정 될 것으로 예상하지만 실제로는 “Sheet3″또는 “Sheet4″와 같은 이후 번호로 이름이 지정됩니다. Peter는 시트 번호를 예상 된 기본값으로 재설정하는 데 무엇이 필요한지 궁금합니다.

시트 번호 매기기를 재설정하는 가장 쉬운 방법은 통합 문서를 닫고 다시 여는 것입니다. 그러나 여기에는 수동 단계가 포함됩니다. 매크로를 통해 새 워크 시트를 추가하는 경우 통합 문서를 수동으로 닫았다가 다시 열고 싶지 않을 수 있습니다.

원하는 경우 닫기 및 다시 열기 프로세스를 수행하는 간단한 매크로를 만들 수 있습니다. 매크로가 닫는 통합 문서가 아니라 개인용 매크로 통합 문서에 저장되어있는 한 작동합니다.

Sub Reopen()

Dim wb As Excel.Workbook     Dim sPath As String

Set wb = ThisWorkbook     sPath = wb.FullName

Application.OnTime Now + TimeValue("00:00:01"), _       Application.Workbooks.Open(sPth)

wb.Close (True)

End Sub

매크로는 현재 통합 문서의 이름을 확인한 다음 1 초 후에 통합 문서를 열도록 OnTime 이벤트를 설정합니다. 그러나이 1 초 동안 통합 문서가 닫히고 저장되므로 성공적으로 다시 열 수 있습니다.

원하는 경우 매크로를 통해 새 워크 시트를 추가하도록 선택할 수도 있습니다.

다음 짧은 매크로는 워크 시트를 추가 한 다음 즉시 원하는 이름으로 바꿉니다.

Sub AddWs()

Worksheets.Add after:=Sheets(Sheets.Count)

Sheets(Sheets.Count).Name = "Sheet" & Sheets.Count - 1 End Sub

특히 이미 존재하는 매크로와 솔루션을 통합하려는 경우 이러한 솔루션을 사용하여 자신의 요구에 가장 적합한 솔루션을 찾고 싶을 것입니다.

_ExcelTips_는 비용 효율적인 Microsoft Excel 교육을위한 소스입니다.

이 팁 (6103)은 Microsoft Excel 2007, 2010, 2013 및 2016에 적용됩니다.