EduTech & AI 인공지능 & IT관련 소식

엑셀에서 alt + F11눌러서 아래 코드를 삽입 후, 실행해보세요~!파일이 해당 위치에 시트별로 만들어집니다~ '엑셀에서 시트 파일로 저장하기 Sub Split_sheet() Dim path As String path = Application.ActiveWorkbook.PathApplication.ScreenUpdating = FalseApplication.DisplayAlerts = FalseFor Each sheet In ThisWorkbook.Sheets sheet.Copy Application.ActiveWorkbook.SaveAs Filename:=path & "\" & sheet.Name & ".xlsx" Application.ActiveWorkbook.Close FalseNextApplic..