반응형 한번에 여러 시트를 다를 파일로 저장하기1 [VBA 코드] 시트별로 파일 저장 하기 시트별로 파일 저장하는 VBA 코드 입니다. Sub Split_book() Dim xPath As String xPath = Application.ActiveWorkbook.Path Application.ScreenUpdating = False Application.DisplayAlerts = False For Each xWs In ThisWorkbook.Sheets xWs.Copy Application.ActiveWorkbook.SaveAs Filename:=xPath & "\" & xWs.Name & ".xlsx" Application.ActiveWorkbook.Close False Next Application.DisplayAlerts = True Application.ScreenUpdating =.. 2020. 6. 28. 이전 1 다음 반응형
