Excel에서 각 열을 개별 텍스트 파일로 내보내는 방법은 무엇입니까?

Excel에서는 전체 워크시트를 텍스트 파일로 내보내는 것이 '다른 이름으로 저장' 기능을 사용하면 간단합니다. 하지만 각 열을 별도의 텍스트 파일로 저장해야 하는 경우 몇 가지 추가 단계가 필요합니다. 이 가이드에서는 VBA 코드를 사용하여 각 열을 효율적으로 내보내는 방법과, Kutools for Excel의 도움을 받아 여러 워크시트를 개별 텍스트, PDF 또는 CSV 파일로 저장하는 방법을 보여드리겠습니다.

VBA 코드를 사용하여 각 열을 개별 텍스트 파일로 내보내기

Kutools for Excel을 사용하여 여러 워크시트를 개별 텍스트 / PDF / CSV 파일로 내보내기

VBA 코드를 사용하여 각 열을 개별 텍스트 파일로 내보내기

다음 VBA 코드는 Excel에서 각 열의 데이터를 개별 텍스트 파일로 저장하는 데 도움이 됩니다. 다음 단계를 따르세요:

1. ALT + F11 키를 눌러 Microsoft Visual Basic for Applications 창을 엽니다.

2. 삽입 > 모듈을 클릭하고, 모듈 창에 다음 매크로를 붙여넣습니다.

VBA 코드: 각 열을 개별 텍스트 파일로 내보내기:

Sub SaveValueToText()
Dim xFRNum, xFCNum As Long
Dim xStrDir As String
Dim xMaxR, xMaxC As Integer
Dim xCells As Range
Dim xIntX As Long
Dim xObjFD As FileDialog
Set xObjFD = Application.FileDialog(msoFileDialogFolderPicker)
With xObjFD
        .AllowMultiSelect = False
        .Show
        If .SelectedItems.Count > 0 Then
            xStrDir = .SelectedItems.Item(1) & Application.PathSeparator
        Else
            Exit Sub
        End If
End With
Set xCells = ActiveSheet.Cells
xMaxR = xCells.Find(What:="*", After:=[A1], SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row
xMaxC = xCells.Find(What:="*", After:=[A1], SearchOrder:=xlByColumns, SearchDirection:=xlPrevious).Column
For xFCNum = 1 To xMaxC
    Open xStrDir & xFCNum & "_" & ActiveSheet.Cells(1, xFCNum).Text & ".txt" For Output As #1
        For xFRNum = 1 To xMaxR
            Print #1, Cells(xFRNum, xFCNum).Value
        Next xFRNum
    Close #1
Next
End Sub

3. 코드를 붙여넣은 후, F5 키를 눌러 이 코드를 실행하세요. 찾아보기 대화 상자가 나타나면, 내보낸 텍스트 파일을 저장할 폴더를 선택하세요. 스크린샷 참고:

4. 그런 다음 확인 버튼을 클릭하면 활성 워크시트의 각 열 데이터가 개별 텍스트 파일로 내보내집니다. 스크린샷 참고:

Kutools for Excel을 사용하여 여러 워크시트를 개별 텍스트 / PDF / CSV 파일로 내보내기

여러 워크시트를 개별 텍스트, PDF 또는 CSV 파일로 내보내야 하는 경우, Kutools for Excel의 워크북 분리 기능이 도움이 될 수 있습니다.

Kutools for Excel 설치 후, 다음 단계를 수행하세요:

1. Kutools Plus > 통합 문서 > 워크북 분리 를 클릭하세요. 스크린샷 참고:

2. 워크북 분리 대화 상자에서 txt, pdf, csv 파일로 저장하려는 워크시트를 선택하고, 저장 형식 지정 옵션을 체크한 후 원하는 파일 유형을 선택하고, 분리 버튼을 클릭하세요. 표시된 폴더 찾아보기 대화 상자에서 내보낸 파일을 저장할 폴더를 선택하세요. 스크린샷 참고:

3. 그런 다음 확인 버튼을 클릭하면 선택한 워크시트가 필요한 특정 파일 형식으로 개별적으로 내보내집니다. 스크린샷 참고: