Excel에서 여러 Excel 파일을 CSV 파일로 일괄 변환하는 방법은 무엇입니까?

Excel 파일을 CSV 형식으로 변환하는 작업은 '다른 이름으로 저장' 기능을 사용하여 수행할 수 있지만, 여러 파일을 하나씩 수동으로 처리하는 것은 시간이 많이 소요됩니다. 여러 Excel 파일을 개별적인 CSV 파일로 일괄 변환해야 하는 경우 이 가이드에서는 두 가지 효율적인 방법을 제공합니다.

VBA를 사용하여 폴더의 Excel 파일을 일괄적으로 CSV 파일로 변환하기

Kutools for Excel을 사용하여 통합 문서의 시트를 별도의 CSV 파일로 변환하기

VBA를 사용하여 폴더의 Excel 파일을 일괄적으로 CSV 파일로 변환하기

Excel에는 VBA를 사용하지 않는 한 이 작업을 빠르게 수행할 수 있는 내장 기능이 없습니다.

1. Excel을 실행하고 Alt + F11 키를 눌러 Microsoft Visual Basic for Applications 창을 엽니다.

2. 삽입 > 모듈을 클릭하여 새 모듈을 생성합니다.

3. 아래 코드를 복사하여 새 모듈 창에 붙여넣습니다.

VBA: 여러 Excel 파일을 CSV로 일괄 변환하기

Sub WorkbooksSaveAsCsvToFolder()
'UpdatebyExtendoffice20181031
Dim xObjWB As Workbook
Dim xObjWS As Worksheet
Dim xStrEFPath As String
Dim xStrEFFile As String
Dim xObjFD As FileDialog
Dim xObjSFD As FileDialog
Dim xStrSPath As String
Dim xStrCSVFName As String
Dim xS  As String
    Application.ScreenUpdating = False
    Application.EnableEvents = False
    Application.Calculation = xlCalculationManual
    Application.DisplayAlerts = False
    On Error Resume Next
Set xObjFD = Application.FileDialog(msoFileDialogFolderPicker)
    xObjFD.AllowMultiSelect = False
    xObjFD.Title = "Kutools for Excel - Select a folder which contains Excel files"
    If xObjFD.Show <> -1 Then Exit Sub
    xStrEFPath = xObjFD.SelectedItems(1) & "\"
    Set xObjSFD = Application.FileDialog(msoFileDialogFolderPicker)
    xObjSFD.AllowMultiSelect = False
    xObjSFD.Title = "Kutools for Excel - Select a folder to locate CSV files"
    If xObjSFD.Show <> -1 Then Exit Sub
    xStrSPath = xObjSFD.SelectedItems(1) & "\"
    xStrEFFile = Dir(xStrEFPath & "*.xls*")
    Do While xStrEFFile <> ""
       xS = xStrEFPath & xStrEFFile
        Set xObjWB = Application.Workbooks.Open(xS)
        xStrCSVFName = xStrSPath & Left(xStrEFFile, InStr(1, xStrEFFile, ".") - 1) & ".csv"
        xObjWB.SaveAs Filename:=xStrCSVFName, FileFormat:=xlCSV
        xObjWB.Close savechanges:=False
        xStrEFFile = Dir
  Loop
    Application.Calculation = xlCalculationAutomatic
    Application.EnableEvents = True
    Application.ScreenUpdating = True
    Application.DisplayAlerts = True
End Sub

4. F5 키를 누르고, 첫 번째 팝업 대화상자에서 CSV 파일로 변환하려는 Excel 파일이 포함된 폴더를 선택합니다.

5. 확인을 클릭한 다음, 두 번째 팝업 대화상자에서 CSV 파일을 저장할 폴더를 선택합니다.

6. 확인을 클릭하면 이제 폴더의 Excel 파일이 CSV 파일로 변환되어 다른 폴더에 저장됩니다.

Kutools for Excel을 사용하여 통합 문서의 시트를 별도의 CSV 파일로 변환하기

우리가 알고 있듯이, Excel의 '다른 이름으로 저장' 기능을 사용하면 전체 통합 문서를 하나의 CSV 파일로만 변환할 수 있습니다. 때때로 개별 시트를 CSV 파일로 변환해야 할 수도 있습니다. 이러한 경우 Kutools for Excel의 워크북 분리(Split Workbook) 기능이 도움이 될 수 있습니다.

1. 별도의 CSV 파일로 변환하려는 통합 문서를 열고, Kutools Plus > 통합 문서 > 워크북 분리.

2. 워크북 분리 대화상자에서 분리하려는 시트 이름을 선택합니다(기본적으로 모든 시트가 선택됨). 다른 이름으로 저장 유형을 선택하고, 드롭다운 목록에서 CSV(쉼표로 구분된) (*.csv) 를 선택합니다.

3. 분할 을 클릭하여 폴더 찾아보기 대화상자를 열고 CSV 파일을 저장할 폴더를 선택하거나 새로 생성합니다.

4. 확인을 클릭하면 통합 문서가 별도의 CSV 파일로 분리됩니다.

데모: Kutools for EXCEL을 사용하여 워크북 분리하기